To dz
stampoval 100 100
Repeat12 [pufd95pfd5pubk100rt360/12pd]
end
To Shenzhen: Shanghai: Shanghai: Shanghai: Shanghai
If: m & gt59 then make "f :f+ 1 make" m 0.
if:f & gt； Then make "s :s+ 1 make "f 0.
if:s & gt； 1 1 and then make "s 0"
Domain name of Algeria
rt :m*6 fd 90 bk 90 lt :m*6
rt :f*6 fd 70 bk 70 lt :f*6
rt :s*30 fd 50 bk 50 lt :s*30
Wait 100 cs
Shenzhen: Shanghai: Shanghai: Beijing+1
end
Execution: sz hours, minutes and seconds