var random: int
loop
random:= Rand.Int (1,4)
if random = 1 then
drawfilloval (310,360,10,10,brightred)
delay (1000)
drawfilloval (310,360,10,10,0)
delay (100)
elsif random = 2 then
drawfilloval (500,220,10,10,brightred)
delay (1000)
drawfilloval (500,220,10,10,0)
delay (100)
elsif random = 3 then
drawfilloval (100,220,10,10,brightred)
delay (1000)
drawfilloval (100,220,10,10,0)
delay (100)
elsif random = 4 then
drawfilloval (310,80,10,10,brightred)
delay (1000)
drawfilloval (310,80,10,10,0)
delay (100)
end if
end loop |