Enkel Androidprogrammering

Sub timer1_tick()'här börjar programmet..
    can1.DrawColor(Colors.Black)'
    can1.DrawBitmap(b1(0),s(2),ship)'för att förhindra flashning, så ritas skeppet ut även här en gång..
    'hela denna timer är helt fylld med buggfixar.. allt kan nog optimeras.. men funkar det, så får det va! :)
    If cdir=True Then 'denna if-sats vänder på droiderna, samt tar ner dem ett kliv
        If ddir=True Then
            ddir=False    'höger
        Else
            ddir=True    'vänster
        End If
        movedown=True    'ser till att droiderna inte går åt höger eller vänster
    End If
    cdir=False    'ändrar inte håll fören nästa gång nån av droiderna är vid kanten.
    For i=0 To antdroid
        If ddir=False AND movedown=False Then ' ddir=false så rör de sig åt höger annars vänster.
            dx(i)=dx(i)+400dip                    'de rör sig inte i sidled när de rör sig neråt (vid kanterna)
            If droid(i).Right+8dip>activity.Width Then cdir=True 'dessa två rader säger till om det ska vändas på steken
        Else If movedown=False Then
            dx(i)=dx(i)-400dip
            If droid(i).left-8dip<0 Then cdir=True
        Else
            dy(i)=dy(i)+800dip ' neråt ett steg.
        End If
        drawdroid(i)
    Next
    movedown=False    'denna rad behövs för att putta igång droiderna efter att de gått ner ett kliv
                    'annars går det fort att dö :)
    If anim=0 Then' animationer.. växlar mellan två olika.. går säkert optimera på nå't sätt.. fixar det sedan...
        anim=1
    Else
        anim=0
    End If
    activity.Invalidate        'redraw the scene, det sista som ska göras innan timersuben är slut. Alla ändringar
                            'nedan syns inte fören nästa timeranrop.
End Sub