Buchempfehlung
Visual Basic 6 Kochbuch
Visual Basic 6 Kochbuch
Viele praktische Tipps zum Programmieren mit Visual Basic 6, die sich oft auch auf FB übertragen lassen. [Mehr Infos...]
FreeBASIC-Chat
Es sind Benutzer im FreeBASIC-Chat online.
(Stand:  )
FreeBASIC bei Twitter
Twitter FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!

fb:porticula NoPaste

Info
Info / Hilfe
Liste
Übersicht / Liste
Neu
Datei hochladen
Suche
Quellcode suchen
Download
Dateidownload

Punkte durchrutschen lassen

Uploader:MitgliedPMedia
Datum/Zeit:09.09.2007 21:35:41

for i = 24 to 1 step -1
      punktx(i+1) = punktx(i)
      punkty(i+1) = punkty(i)
    next

' soll das selbe machen wie
'    ....
'    punktx(6) = punktx(5)
'    punkty(6) = punkty(5)
'    punktx(5) = punktx(4)
'    punkty(5) = punkty(4)
'    punktx(4) = punktx(3)
'    punkty(4) = punkty(3)
'    punktx(3) = punktx(2)
'    punkty(3) = punkty(2)
'    punktx(2) = punktx(1)
'    punkty(2) = punkty(1)
'    punktx(1) = punktx(0)
'    punkty(1) = punkty(0)