codice:
start Gosub ContaTempo return Sub ContaTempo Set %BaseTime #SYSTIME ;Attribuisce a %BaseTime il valore tenuto in quel momento da #SYSTIME If ( ( #systime - %BaseTime ) >= 360 ) ;controlla se è passata un'ora { ;se le condizioni dell' "If" vengono riscontrate legge anche ciò che c'è tra le parentesi Msg ao bella romano$ set %BaseTime #SYSTIME ;questo è quello che ti interessa infatti così il contatore si riazzera permettendo, finita l'azione che vuoi svolgere , di ricominciare a contare il tempo move 412 415 a } } return
Commenta