Buchempfehlung
Windows-Programmierung. Das Entwicklerhandbuch zur WIN32-API
Windows-Programmierung. Das Entwicklerhandbuch zur WIN32-API
"Der" Petzold, das über 1000 Seiten starke Standardwerk zum Win32-API - besonders nützlich u. a. bei der GUI-Programmierung in FreeBASIC! [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

Funzt fast....

Uploader:MitgliedThe_Muh
Datum/Zeit:20.01.2008 02:29:54

    for i2 = 1 to 10
        if PunkteN > punkte(i2) then
            for i3 = 10 to i2 step -1
                punkte(i3+1)  = punkte(i3)
                nam(i3+1)     = nam(i3)
                laenge(i3+1)  = laenge(i3)
            next i3
            Punkte(i2)  = PunkteN
            laenge(i2)  = laengeN
            locate 25, 10 :input "Name eingeben:", Nam(i2)
            exit for
        end if
    next i2