:ClLCD:1üQ:1üR
:Disp "GUESS NUMBER"
:Disp "FROM   0...9"
:Lbl NOPPAMAS
:Input "NO.?=",N
:iPart 10randüM
:QüS:RüQ:MüR
:
:If M==N:Then
:Disp "WINNER",M
:Else
:Disp "LOSER",M
:End
:
:Goto NOPPAMAS
: