fb:porticula NoPaste

Info / Hilfe Liste

Übersicht / Liste Neu

Datei hochladen Suche

Quellcode suchen

Dateidownload

Triangle example

Uploader:	darksider3
Datum/Zeit:	12.10.2011 17:30:46

'Erstellt einen "Laser" der seine Farbe wechselt, Der

'strahl geht von oben links nach unten unten rechts

#include once "ext/graphics.bi"

#include once "fbgfx.bi"



screenres 320, 220, 32

dim i as integer

i = 0

do while not multikey(FB.SC_ESCAPE)

  i += 1

  screenlock

  cls

  ext.gfx.Triangle( , 1, 1, 1+i, 10+i, 10+i, 1+i, rgb(255-i,0+i,0+i) ) 'Draw a red triangle in the top left corner of the screen

  print str(i)

  screenunlock

  sleep 3

loop 'loop until the user pushes the ESC key

Impressum • Nutzungsbedingungen • Datenschutz

Microsoft, Windows, Windows NT, XBOX und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.