CoolBasic SDK

SetTimerData

Include "cbTimer.cb"

KUVAUS
Asettaa int-tyyppistä tietoa ajastimen data-muuttujaan.

KÄYTTÖ
SetTimerData(timerID, dataValue)
timerID - Ajastimen tunnus

dataValue - Data-muuttujaan talletettava tieto

Katso myös: Ajastintoiminnot

ESIMERKKI
Include "SDK/include/cbTimer.cb"

myRedTimer = InitTimer(50)
myGreenTimer = InitTimer(50)
myBlueTimer = InitTimer(50)
StartTimer(myRedTimer)
Repeat
    UpdateTimer()

    If IsTimerTick(myRedTimer) Then 
        SetTimerData(myRedTimer, GetTimerData(myRedTimer) + 5)
        If GetTimerData(myRedTimer) >= 255 Then
            StopTimer(myRedTimer)
            StartTimer(myGreenTimer)
        EndIf
    EndIf
    If IsTimerTick(myGreenTimer) Then 
        SetTimerData(myGreenTimer, GetTimerData(myGreenTimer) + 5)
        If GetTimerData(myGreenTimer) >= 255 Then
            StopTimer(myGreenTimer)
            StartTimer(myBlueTimer)
        EndIf
    EndIf
    If IsTimerTick(myBlueTimer) Then 
        SetTimerData(myBlueTimer, GetTimerData(myBlueTimer) + 5)
        If GetTimerData(myBlueTimer) >= 255 Then
            StopTimer(myBlueTimer)
            Locate 0, 110
            Color 255, 255, 255
            AddText "Paina Esc..."
        EndIf
    EndIf

    Color GetTimerData(myRedTimer), 0, 0
    Box 0, 0, 100, 100, ON
    Color 0, GetTimerData(myGreenTimer), 0
    Box 100, 0, 100, 100, ON
    Color 0, 0, GetTimerData(myBlueTimer)
    Box 200, 0, 100, 100, ON
    DrawScreen
Forever