Siamo quasi alla fine dell'ora e il prof ci sta illustrando un programma in BASIC per giocare alla morra:

REM MORRA
DIM V(16)
:INPUT "GIOCA 0,...,Q x fine";g$
:WHILE G$<>"Q"
:X=V(i)<=V(i+1)
:Y=VAL(G$) MOD 2
:PRINT-X;Y,
:T=X=-Y 'T=Y=-X
:PRINT MID4("UC",1-T,1),
:TC=TC-T
:TU=TU+1+T
:I=I+Y
:PRINT USING"###
:V(i)=V(i)+1
:i=2*i MOD 8 '2*(2-(i\8)*8)
:G$=INPUT$(1)
:WEND