:UnArchive I
:I->I
:1->T
:L->L
:Send(B
:Output(1,1,"Welcome to")
:Send(B
:Send(B
:Send(B
:Output(4,1,"GUESS IT, GET IT")
:Send(B
:Send(B
:Send(B
:Output(5,1,"The hidden")
:Output(6,5,"Number Game")
:Send(B
:ClrHome
:Goto MM
:Lbl MM
:Menu("Main Menu","Play",SG,"Rules",GR,"Records",HS,"Reset","RS,"Exit",EX)
:Lbl RS
:UnArchive I
:If I>0
:Then
:ClrHome
:Disp "Do you whish to","reset your","highscrores?"
:Puase
:ClrHome
:Menu("Reset HS?","No",MM,"Yes",WS)
:Lbl WS
:For(A,0,10
:Output(4,5,"Reseting")
:Output(5,3,"High Scores")
:Send(B
:ClrHome
:Output(5,2,"Please Wait...")
:Send(B
:ClrHome
:End
:0->I
:Disp "Scores Reset."
:Send(B
:Send(B
:Send(B
:Send(B
:ClrHome
:Archive I
:Goto MM
:Else
:If I<=0
:Then
:ClrHome
:Disp "ERROR: IX1200","No Scores","Aborting..."
:Send(B
:Send(B
:Send(B
:Send(B
:ClrHome
:Archive I
:Goto MM
Lbl HS
:UnArchive I
:If I=0
:Then
:Disp "No High Scores"
:Pause
:ClrHome
:Archive I
:Goto MM
:Else
:if I>0
:Then
:Disp "HIGHEST SCORE:",I,"Tries"
:Pause
:ClrHome
:Archive I
:Goto MM
:Lbl GR
:Disp "Enter a number","top set as a","cap Value."
:Disp "Try to Guess","the","hidden number."
:Disp "Good Luck"
:Pause
:ClrHome
:Goto SG
:Lbl SG
:If T<=0 or T>0
:Then
:1->T
:Goto ZZ
:Lbl ZZ
:Input "Cap Value:",C
:ClrHome
:randInt(1,C)->Q
:Lbl CC
:UnArchive I
:Disp "enter a number","on or bettween 1","and",C
:Input"Guess:",E
:ClrHome
:If E>Q and E<=C
:Then
:Disp "TOO HIGH."
:T+1->T
:Pause
:ClrHome
:Goto CC
:Else
:If E<Q and E!=0
:Then
:Disp "TOO LOW."
:Pause
:ClrHome
:1+T->T
:Goto CC
:Else
:If E=Q and T>=L and L>=I or I<=0
:Then
:ClrHome
:T->L
:Disp "CONGRATS!","THe HIDDEN NUMBER WAS",Q
:Disp "IT TOOK YOU:",L,"TIRES."
:Pasue 
:ClrHome
:0->T
:L->I
:Archive I
:Goto PA
:Else
:If E=Q and T<L and I<=L
:Then
:ClrHome
:Disp "CONGRATS!","THE NUMBER WAS",Q,"number of Tires:",T
:Pause
:ClrHome
:T->L
:Disp "ITS A NEW","RECCORD!"
:Send(B
:Send(B
:ClrHome
:Send(B
:Send(B
:If L<I and L!=0
:Then
:Disp "OLD HIGHSCORE:",I
:Disp "NEW HIGHSCORE:",L
:Pasue
:ClrHome
:0->T
:L->I
:Archive I
:Goto PA
:Else
:If I>=L
:Then
:Disp "New HighSCORE:",L
:Pause
:ClrHome
:0->T
:L->I
:Archive I
:Goto PA
:Lbl PA
:Menu("Play again?","Yes",SG,"No",MM)
:Lbl EX
:ClrHome

= END OF PROGRAM =

NOTES:

- -> stands for the Yeild symbol on the calculator.
- >= and <= stand for greater than or eqaul to and less than or eqaul to.

Copyright Notice:

Please Note Any alterantions, Modifactions and/or removal of Any portion of this program and its code is strictly prohibbited.