Arbeite am besten mit Variablen:
Als erstes die Y-Variable: Diese lässt du einfach kontinuierlich eins abziehen.
Bei der X-Variable addierst und subtrahierst du nacheinander:

Bsp:
Variable [Y] == 640
Variable [X] == 240
Loop
Variable [Y] -= 5
Variable [X] += 5
Move Pic [wait]
Variable [Y] -= 5
Variable [X] -= 5
Move Pic [wait]
Repeat

Ist nicht ganz vollständig; der Schluss fehlt, sollte aber kein Problem sein.