Seite 2 von 4
Verfasst: 12.01.2005 00:17
von captain third
ääänd thewinner iiiis Sunny
2 zeilen weniger macht gleich momentaner sieger beim puregolf
Verfasst: 12.01.2005 08:42
von DrShrek
Es geht auf jeden Fall noch kürzer!
Code: Alles auswählen
InitSprite()
OpenScreen(640,480,16,"Farb verschwinden test")
InitKeyboard()
Repeat
ExamineKeyboard()
For i=255 To 0 Step -5
StartDrawing(ScreenOutput())
Locate(300,300)
BackColor(0,0,0)
FrontColor(i,i,i)
DrawText("Dies ist ein Verschwindibus test :D")
StopDrawing()
FlipBuffers()
Delay(50)
Next
Until KeyboardPushed(#PB_Key_Escape)
Die Frage ist allerdings:
Was sind die Regeln für dieses PureGolf Turnier?
Verfasst: 12.01.2005 10:56
von freedimension
IceSoft hat geschrieben:Es geht auf jeden Fall noch kürzer!
Hast recht:
Code: Alles auswählen
InitSprite()
OpenScreen(640,480,16,"Farb verschwinden test")
InitKeyboard()
Repeat
ExamineKeyboard()
StartDrawing(ScreenOutput())
Locate(300,300)
BackColor(0,0,0)
c=255-i%255
FrontColor(c,c,c)
DrawText("Dies ist ein Verschwindibus test :D")
StopDrawing()
FlipBuffers()
Delay(50)
i+5
Until KeyboardPushed(1)
Die Frage ist allerdings:
Was sind die Regeln für dieses PureGolf Turnier?
Wer gewinnt bekommt wahlweise einen Ford focus TDI oder eine Weltreise von captain third
Verfasst: 12.01.2005 11:14
von nicolaus
na da mach ich doch mal mit.
Code: Alles auswählen
InitSprite()
OpenScreen(640,480,16,"Farb verschwinden test")
InitKeyboard()
Repeat
ExamineKeyboard()
StartDrawing(ScreenOutput())
Locate(300,300)
BackColor(0,0,0)
FrontColor(255-I%255,255-I%255,255-I%255)
DrawText("Dies ist ein Verschwindibus test :D")
StopDrawing()
FlipBuffers()
Delay(50)
I+5
Until KeyboardPushed(1)
Bekomme ich jetzt das ticket für die Weltreise
Verfasst: 12.01.2005 11:16
von DrShrek
Geht immer noch kürzer!
Code: Alles auswählen
InitSprite()
OpenScreen(640,480,16,"Farb verschwinden test")
InitKeyboard()
Repeat
ExamineKeyboard()
StartDrawing(ScreenOutput())
Locate(300,300)
BackColor(0,0,0)
FrontColor(255-i%255,255-i%255,255-i%255)
DrawText("Dies ist ein Verschwindibus test :D")
StopDrawing()
FlipBuffers()
Delay(50)
i+5
Until KeyboardPushed(1)
Verfasst: 12.01.2005 11:22
von nicolaus
IceSoft hat geschrieben:Geht immer noch kürzer!
Code: Alles auswählen
InitSprite()
OpenScreen(640,480,16,"Farb verschwinden test")
InitKeyboard()
Repeat
ExamineKeyboard()
StartDrawing(ScreenOutput())
Locate(300,300)
BackColor(0,0,0)
FrontColor(255-i%255,255-i%255,255-i%255)
DrawText("Dies ist ein Verschwindibus test :D")
StopDrawing()
FlipBuffers()
Delay(50)
i+5
Until KeyboardPushed(1)
ich war schneller
Verfasst: 12.01.2005 11:29
von DrShrek
nicolaus hat geschrieben:...ich war schneller
'Was hams die jungen Leut aber auch eilig heut.'
Verfasst: 12.01.2005 11:42
von nicolaus
IceSoft hat geschrieben:nicolaus hat geschrieben:...ich war schneller
'Was hams die jungen Leut aber auch eilig heut.'
glaub mir das mit jung hat sich bei mir schon seit ner weile erledigt
Verfasst: 12.01.2005 12:08
von captain third
na toll ihr habt euren spaß und ich muss die reise bezahln??? wisst ihr was???ich kanns am kürzesten
lol
Verfasst: 12.01.2005 12:17
von freedimension
Jungs, hier geht's um die Anzahl an Zeichen und nicht um die der Zeilen