Timer -komento
Timer -komento
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.
Re: Timer -komento
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