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

Butterweiche Animation

Uploader:MitgliedAndT
Datum/Zeit:27.11.2007 14:37:14

dim as double v1,v2,v3,v4
dim as double v5,x,sp
v1=1024
v2=768
screenres v1,v2,,,1
Do
  screenlock
  for i as integer = 0 to v1
    line(0,v2)-(v1,i),v5
    v5+=x
    v5 = v5
  next
  screensync
  screenunlock
  locate 1,1
  print v5
  print sp
  print x
  v5=0
  sp+=.000001 * 10
  x+=sp

  if inkey=chr(27) then Print "ende":end
loop