Timer -komento

Voit pyytää apua ohjelmointiongelmiin täältä.
Post Reply
Kerosiinipelle

Timer -komento

Post by Kerosiinipelle »

Eli siis: Miten komennolla Timer saa esimerkiksi jonkun pistemittarin vähenemään säännöllisin väliajoin? Itse en ole saanut sillä muuta aikaan kuin esimerkkikoodin halttauksen.
FuJi
Member
Posts: 70
Joined: Tue Aug 28, 2007 3:09 pm

Re: Timer -komento

Post by FuJi »

Code: Select all

FrameLimit 40

pisteet = 100 //paljonko pisteitä aloitettaessa
timeStamp = Timer()
aika = 100 //1000 = 1 sekunti, 2000 = 2 sekuntia, 100 = 0,1 sekuntia jne.

Repeat
   If Timer() > timeStamp + 100 Then
       timeStamp = Timer()
       pisteet -1
       If pisteet = 0 Then Gosub gameover //jos pisteet on 0
   EndIf
   //tulostetaan pisteet
   Text 10,10, "Pisteet: " +pisteet
   DrawScreen
Forever 

 
gameover:
Cls 

Text 10,10, "Game over"
Text 10,30, "Kuolit"

DrawScreen
WaitKey 
Post Reply