(C Series?) Guessing Game 1-4

[SamE]

I made this a while back as a test of my skills. It's probably incredibly sloppy, but it works. I'm not sure what devices this works on exactly as I only have an 11C.

Code:

LBL A
RAND #
ENTER
1
0
*
INT
4
X<>Y
X≤Y
GTO 1
GTO A
LBL 1
STO 1
CLX
RTN
LBL B
ENTER
RCL 1
X=Y
GTO 2
GTO 3
LBL 2
RCL 2
ENTER
1
+
STO 2
PSE
GTO A
LBL 3
RCL 2
ENTER
1
-
X<0
GTO 4
STO 2
PSE
GTO A
LBL 4
1
+
STO 2
PSE
GTO A

You press A to initiate the game, input your guess, then press B. The number of points you have will appear, then you will be able to input another guess. The answer will only be 1-4, other numbers will just subtract from your points.