E=AãF=BãGoto 1
0ÞM~N
Int 2Ran#‰1ÞH
H=1ãA>Eã1ÞM
H=1ãA<Eã‡1ÞM
H=2ãB>Fã1ÞN
H=2ãB<Fã‡1ÞN
E‰MÞE
F‰NÞF
Locate E™M,F™N," "
Locate E,F,"0"
Lbl 1