' Tr fego
' Simula‡„o de tr fego

CLS

RANDOMIZE TIMER

t = 0
t = 100
t = t + INT(RND * 40)

IF (INT(100 * RND) < 30) THEN
    t = t + 290
    t = t + INT(RND * 80)
ELSE
    t = t + 200
    t = t + INT(RND * 40)
    t = t + 60
    t = t + INT(RND * 60)
END IF

t = t + 120
t = t + INT(RND * 60)

IF (INT(RND * 100) < 20) THEN
    t = t + 125
ELSE
    t = t + 100
    t = t + INT(30 * RND)
END IF

PRINT t

END