Lbl A
1->L
randInt(0,2)->J
randInt(0,2)->K
L*100+J*10+K->M
Disp M
Send({M,100})
Get(R)
ClrHome
Goto A