Italian La prossima settimana, VACANZE... ma per ora vado avanti

[LucaMs]

se poi qualcuno la compra, ben...altrimenti, ciccia

Proprio per questo la metterei a 1.99.

Se uno vuole tutto gratis, che tu la metta a 0.99 o 1.99 lui se ne frega.
Se uno invece è disposto a spendere qualcosina, che sia 1 o 2 euro non fa differenza, per costui!

Mi dii retta (alla Fantozzi, hehehe)

 

[LucaMs]

http://www.pierotofy.it/pages/guide...re_applicazioni_per_iPhone_e_trarne_guadagno/

 

[CyclopDroid]

Maremma bucaiola!
Finito una App, eccomi alle prese con quella che mi sta creando più grattacapi, ovvero, "Parolando".
Sembra funzionare tutto bene ma, ora, mi stò impappolando con le animazioni degli sprite che dovrebbero complicare il gioco.
Mi trovo alle prese con il fantasmino che, messo all'interno di una sub (che poi utilizzerò anche per gli alti passando il valore personaggio), non ne vuole sapere di farsi vedere quando si dirigge verso la zona scelta.
Ancora la debbo finire ma, almeno il movimento lo dovrebbe fare...invece, se elimino il

 ImgGhost.Visible=False

(che si trova alla fine della Sub), o vedo apparire immediatamente sulla casella.
Ho provato a mettere una pausa verso la fine del ciclo ma muove solo gli occhi e il corpo e bocca, ma non avanza.
Il richiamo di questa Sub è all'interno di un'altra Sub, quella del Timer_tick.
Il movimento del fantasmino è all'interno di un ciclo FOR:

Sub Ghost(numWord As Int)
    ' muove il fatasmino verso le lettere scelte e le macchia
    Dim xStart,GhDirection As Int
    Dim XStep As Int
    Dim GhostType As String
    GhostType="Ghost"
    Dim GhEye,GhSmile,GhBody, tmp,tmp2,GhPausa As Int
    XStep=1 'Velocità fantasmino
    GhDirection=1

    tmp=0
    tmp2=0
    GhPausa=Rnd(1,10)

    'Muovo fantasmino
    ImgGhost.Left=-14%x
    ImgGhost.Top=imvHeight-ImgGhost.height
    ImgGhost.Height=21%y
    ImgGhost.Width=14%x
    ImgGhost.Visible=True


    For k=0 To UpBox(numWord).Left Step XStep
        Log("FANTASMA POS:" & k)
        'Occhi
        GhEye=Rnd(1,10)
        If GhEye<3 Then GhEye=0 Else GhEye=1
        'Corpo
        tmp=tmp+1
        If tmp>4 Then
            If GhBody=0 Then
                GhBody=1
            Else
                GhBody=0
            End If
        tmp=0
        End If
        'Bocca
        If tmp2=0 Then GhSmile=Rnd(1,10)
        If GhSmile<3 Then
            GhSmile=1
            tmp2=tmp2+1
        Else
            GhSmile=0
        End If
        If tmp2>0 AND tmp2>=GhPausa Then
            tmp2=0
        Else
            '"Uuuuuhhhhhh"
        End If
        ImgGhost.Top=Panel1.height/2
        GhostType="Ghost" & GhEye & GhSmile & GhBody & GhDirection & ".png"
        ImgGhost.Bitmap=LoadBitmap(File.DirAssets,GhostType)
        ImgGhost.Left=k-2%x
   Next
   GhDirection=0
   ImgGhost.Visible=False 
End Sub

Potrebbe essere perché il richiamo è all'interno de _tick?

...Ho provato anche a dichiarare XStart come Double, assegnandogli .1 ma, quando arriva nel ciclo FOR, dove è presente lo STEP... non si fermama esce fuori immediatamente dal ciclo
Ma i valori delle immagini (in questo caso LEFT), non accettano i Double?

 

[CyclopDroid]

OK, mi sono accorto che il problema deriva dalla velocità della CPU e, quindi, non si vede il movimento.
Ho inserito delle pause di 0.1 secodo ma, ho paura che se il gioco venga installato su smath più potenti, o meno potenti, il risultato non sarà lo stesso per entrambi.
C'è un modo per calcolare la velocità del telefono e trovare la pausa giusta da passare?

Io, per ora, uso questa funzione per le Pause, passandogli 0.1:

Sub Attendi(Secondi As Double)
  Dim Ti As Long
  Ti = DateTime.Now + (Secondi * 1000)
  Do While DateTime.Now < Ti
      DoEvents
  Loop
End Sub

 

[CyclopDroid]

Buuaaahahh!!!!
Versione PickUP FREE......0 download!!!!!
Come diamine fare per promuoverla senza spendere?

PS: Manco voi l'avete provata

 

[LucaMs]

Premessa: appena sveglio e con simpatico mal di testa.

Dato l'argomento tecnico, dovrebbe rispondere Umberto HHHUUUUUUUUUUU

Secondo me ti ha funzionato, dopo, non per la pausa, ma per il doevents che sta dentro la pausa. Prova a metterlo dopo
ImgGhost.Left=k-2%x (il DoEvents) senza usare la pausa.

 

[LucaMs]

Buuaaahahh!!!!
Versione PickUP FREE......0 download!!!!!
Come diamine fare per promuoverla senza spendere?

PS: Manco voi l'avete provata

Eh, io l'avevo detto ma poi me lo sono scordato

Accendo e scarico

 

[LucaMs]

azz... attacco alla presa e scarico: era acceso e la batteria sta al 1%

 

[LucaMs]

Come diamine fare per promuoverla

Eh, questo è un altro punto dolente (oltre alla pirateria: ieri sono stato tutto il giorno a pensare come affrontare questo problema e ne sono uscito malconcio ).

Ci sono milioni di app so Google Play: come può capitare un utente sulla tua? Io ricordo che faticai a trovarle pur conoscendone il nome!

Non so, su questo sito si è discusso molto anche di questo.

Probabilmente un modo sarebbe quello di sfruttare Facebook (magari anche Twitter, che io non conosco affatto)

 

[LucaMs]

C'è un modo per calcolare la velocità del telefono e trovare la pausa giusta da passare?

Dato che la routine è richiamata dal timer, senza usare la pausa, la velocità del dispositivo non influirà.

 

[Deleted member 103]

OK, mi sono accorto che il problema deriva dalla velocità della CPU e, quindi, non si vede il movimento.
Ho inserito delle pause di 0.1 secodo ma, ho paura che se il gioco venga installato su smath più potenti, o meno potenti, il risultato non sarà lo stesso per entrambi.
C'è un modo per calcolare la velocità del telefono e trovare la pausa giusta da passare?

Io, per ora, uso questa funzione per le Pause, passandogli 0.1:

Sub Attendi(Secondi As Double)
  Dim Ti As Long
  Ti = DateTime.Now + (Secondi * 1000)
  Do While DateTime.Now < Ti
      DoEvents
  Loop
End Sub

Io uso per la pausa questo Sub e questo funziona di sicuro su tutti i dispositivi.

Dim Thread1 As Thread

Sub Attendi(Secondi As Double)
    Thread1.Sleep(Secondi * 1000)
End Sub

 

[LucaMs]

è quasi la stessa cosa, solo che non usando il doevents, blocca proprio tutto.

 

[LucaMs]

Manco voi l'avete provata

Installata ma ancora non mi funziona.

Mi da l'errore dell'ultima installazione che avevo fatto, cioè mi dice che non c'è spazio sulla Home, che invece è vuota (in quel punto).
La segnala ancora come 5x1.

Poi, è un po' allarmante il fatto che ti dica di concedergli i permessi circa i numeri chiamanti e, soprattutto, che potrebbero essere addebitati costi telefonici. Questo potrebbe far desistere gli "acquirenti"; probabilmente dipende dall'utilizzo della libreria Phone e dai permessi che questa aggiungere al Manifest.

 

[CyclopDroid]

Vabbè, ma quello fa parte delle librerie... che posso farci?
Per il fatto del 5x1 è sempre strano

 

[LucaMs]

uff
dovrei fare mille cose per me (ma tanto, da ieri sono scoraggiato: non ci sono modi per proteggersi dalla pirateria!).

Quindi, provo a vedere se trovo qualcosa su questo 5x1

 

[maxware]

LucaMs dai un cuc alla libreria didedicata per la protezione

 

[LucaMs]

si, la "cuccai"

Probabilmente la userò, ma ieri ho passato tutta la giornata a cercare soluzioni su internet (soprattutto per sw .net) e mi sono cadute le braccia.

Del resto, basta pensare che nemmeno Microsoft ha soluzioni definitive contro la pirateria, figuriamoci un programmatorino scarso come me!

 

[LucaMs]

Vabbè, ma quello fa parte delle librerie... che posso farci?
Per il fatto del 5x1 è sempre strano

Prova a dare un cuc a questo. io per ora dormo sulla sedia

 

[LucaMs]

Devo aver sbagliato dose del mio farmaco, per questo ho sonno (oppure mi si sta addormentando definitivamente il cervello )

 

[LucaMs]

Vabbè, ma quello fa parte delle librerie... che posso farci?
Per il fatto del 5x1 è sempre strano

credo che per un 4x4 il widget debba essere largo al massimo 250dp

E', come al solito, un bel casino!

http://developer.android.com/guide/practices/ui_guidelines/widget_design.html