loop
1000
f00
dwpt cin2 clre
dwpt grtn 0014 cin2 clr3&
bknt clr1&
bknt grtn 0024 clr2&
endl
loop
f12
dwpt cin2 clre
dwpt grtn 0014 cin2 clr3&
bknt clr1&
bknt grtn 0024 clr2&
endl
loop
f24
dwpt cin2 clre
dwpt grtn 0014 cin2 clr3&
bknt clr1&
bknt grtn 0024 clr2&
endl
loop
f36
dwpt cin2 clre
dwpt grtn 0014 cin2 clr3&
bknt clr1&
bknt grtn 0024 clr2&
endl
loop
f48
dwpt cin2 clre
dwpt grtn 0014 cin2 clr3&
bknt clr1&
bknt grtn 0024 clr2&
endl