The Museum of HP Calculators

HP Articles Forum

Game for HP-35s

Posted by Paul Dale on 16 Mar 2011, 5:46 a.m.

A dragon has kidnapped the beautiful princess and you are tasked with her rescue. You will have to brave all manner of nasty beasts on your quest.

The quest is a series of meet monster, kill or run away from monster cycles. When you kill a monster you will usually gain some treasure and possibly a magic item. You might also get healed. The difficulty of the monsters generally increases with your abilities. Once you defeat the dragon, you win the game. If you've accumulated sufficient treasure, you'll marry the princess as well.

When displaying numbers they are viewed via registers:

```	E = experience (your total and current earnings)
H = hit points (both damage and your total)
G = gold
L = level
S = spells
```

Periodically you'll be asked one of two questions:

```	"attack or flee"	(0=ATK 1=FLEE)
"sword or spell"	(0=SWD 1=SPELL)
```

In each case enter a zero number and press R/S for the first and enter a non-zero number and press R/S for the second. By default a zero will be entered for you so you only actually need to press R/S in that case.

```D001  LBL D                D238  GTO D381             D475  XEQ D065
D002  ALL                  D239  XEQ D075             D476  XEQ D029
D003  XEQ D702             D240  x<y?                 D477  RCL M
D004  SF 10                D241  GTO D393             D478  XEQ D067
D005  XEQ D639             D242  x>y?                 D479  /
D006  STO M                D243  GTO D345             D480  +
D007  XEQ D639             D244  eqn TITAN            D481  2.5
D008  STO N                D245  PSE                  D482  -
D009  XEQ D639             D246  [16,10,50]           D483  IP
D010  STO O                D247  [2,16,20]            D484  FS? 1
D011* XEQ D063             D248  [1,22,25]            D485  XEQ D509
D012  RCL H                D249  GTO D399             D486  x<=0?
D013  x>=y?                D250* XEQ D078             D487  XEQ D071
D014  GTO D110             D251  x<y?                 D488  GTO D533
D015  XEQ D057             D252  GTO D333             D489* eqn MISSED
D016  x<=y?                D253  x>y?                 D490  PSE
D017  GTO D081             D254  GTO D387             D491  GTO D535
D018  RCL K                D255  eqn ENT              D492* XEQ D069
D019  XEQ D057             D256  PSE                  D493  /
D020  XEQ D069             D257  [9,10,40]            D494  XEQ D073
D021  RCL H                D258  [2,6,10]             D495  +
D022  y^x                  D259  [2,15,25]            D496  IP
D023  *                    D260  GTO D399             D497  x<=0?
D024  XEQ D063             D261* eqn GIANT BAT        D498  GTO D071
D025  -                    D262  PSE                  D499  RTN
D026  x>=y?                D263  [1,2,0]              D500* 0.9
D027  GTO D110             D264  [1,4,0]              D501  *
D028  GTO D088             D265  [1,0,12]             D502  RTN
D029* RANDOM               D266  GTO D399             D503* XEQ D067
D030  *                    D267* eqn GOBLIN           D504  -
D031  INTG                 D268  PSE                  D505  RTN
D032  XEQ D071             D269  [1,8,0]              D506* XEQ D067
D033  +                    D270  [1,8,0]              D507  +
D034  RTN                  D271  [1,2,15]             D508  RTN
D035* STO A                D272  GTO D399             D509* XEQ D057
D036  CF 10                D273* eqn SKELETON         D510  XEQ D029
D037* eqn REGY*RAND        D274  PSE                  D511  +
D038  INTG                 D275  [1,8,2]              D512  XEQ D065
D039  +                    D276  [1,8,0]              D513  +
D040  DSE A                D277  [2,1,18]             D514  FS? 4
D041  GTO D037             D278  GTO D399             D515  GTO D517
D042  SF 10                D279* eqn GIANT RAT        D516  RTN
D043  X<>Y                 D280  PSE                  D517* XEQ D063
D044  Rv                   D281  [1,6,0]              D518  XEQ D069
D045  RTN                  D282  [1,6,0]              D519  XEQ D029
D046* XEQ D633             D283  [1,1,13]             D520  +
D047  XEQ D035             D284  GTO D399             D521  XEQ D057
D048  +                    D285* eqn DWARF            D522  +
D049  RTN                  D286  PSE                  D523  RTN
D050* XEQ D069             D287  [2,8,0]              D524* XEQ D071
D051  XEQ D029             D288  [1,10,1]             D525  STO- L
D052  XEQ D071             D289  [1,2,20]             D526  eqn ZOT!
D053  -                    D290  GTO D399             D527  PSE
D054  RTN                  D291* eqn GIANT SPIDER     D528  XEQ D067
D055* XEQ D063             D292  PSE                  D529  XEQ D069
D056  GTO D029             D293  [2,8,4]              D530  +
D057* 10                   D294  [1,10,8]             D531  RCL H
D058  RTN                  D295  [1,4,17]             D532  XEQ D035
D059* 3                    D296  GTO D399             D533* STO- D
D060  RTN                  D297* eqn ZOMBIE           D534  XEQ D613
D061* 100                  D298  PSE                  D535* RCL D
D062  RTN                  D299  [3,8,0]              D536  x<=0?
D063* 20                   D300  [1,6,2]              D537  GTO D568
D064  RTN                  D301  [2,5,8]              D538  RCL B
D065* 8                    D302  GTO D399             D539  FS? 3
D066  RTN                  D303* eqn GHOST            D540  XEQ D492
D067* 4                    D304  PSE                  D541  STO Q
D068  RTN                  D305  [10,8,50]            D542* XEQ D055
D069* 2                    D306  [2,4,-1]             D543  RCL+ F
D070  RTN                  D307  [2,16,30]            D544  RCL N
D071* 1                    D308  GTO D399             D545  XEQ D067
D072  RTN                  D309* eqn DAEMON           D546  /
D073* 0.5                  D310  PSE                  D547  -
D074  RTN                  D311  [8,8,20]             D548  XEQ D057
D075* XEQ D069             D312  [1,8,2]              D549  -
D076  +                    D313  [2,11,26]            D550  FS? 2
D077  RTN                  D314  GTO D399             D551  XEQ D503
D078* XEQ D069             D315* eqn GNOME            D552  x<0?
D079  -                    D316  PSE                  D553  GTO D565
D080  RTN                  D317  [3,10,0]             D554  RCL C
D081* RCL K                D318  [1,8,1]              D555  XEQ D046
D082  -9                   D319  [1,7,18]             D556  FS? 0
D083  RCL+ H               D320  GTO D399             D557  XEQ D500
D084  10220                D321* eqn BASILISK         D558  INTG
D085  *                    D322  PSE                  D559  x<=0?
D086  x>=y?                D323  [6,8,4]              D560  XEQ D071
D087  GTO D110             D324  [2,10,10]            D561  STO- J
D088* XEQ D067             D325  [1,13,24]            D562  eqn OUCH!
D089  XEQ D029             D326  GTO D399             D563  PSE
D090  XEQ D065             D327* eqn SLIME            D564  XEQ D613
D091  +                    D328  PSE                  D565* DSE Q
D092  RCL O                D329  [5,10,20]            D566  GTO D542
D093  XEQ D059             D330  [1,4,0]              D567  GTO D425
D094  /                    D331  [4,8,12]             D568* eqn KILLED!
D095  +                    D332  GTO D399             D569  PSE
D096  IP                   D333* eqn DEVIL            D570  XEQ D067
D097  x<=0                 D334  PSE                  D571  XEQ D069
D098  XEQ D071             D335  [10,8,30]            D572  RCL E
D099  STO+ I               D336  [1,10,5]             D573  y^x
D100  STO+ J               D337  [2,14,24]            D574  RCL* P
D101  XEQ D071             D338  GTO D399             D575  RCL* B
D102  STO+ H               D339* eqn BARBARIAN        D576  STO+ K
D103  STO+ L               D340  PSE                  D577  XEQ D608
D104  XEQ D050             D341  [4,12,16]            D578  XEQ D059
D105  STO+ M               D342  [1,10,2]             D579  RCL E
D106  XEQ D050             D343  [1,7,13]             D580  y^x
D107  STO+ N               D344  GTO D399             D581  XEQ D029
D108  XEQ D050             D345* eqn VAMPIRE          D582  STO+ R
D109  STO+ O               D346  PSE                  D583  XEQ D057
D110* RCL H                D347  [8,10,10]            D584  /
D111  XEQ D623             D348  [2,12,8]             D585  IP
D112  RCL K                D349  [1,15,24]            D586  STO+ K
D113  XEQ D608             D350  GTO D399             D587  XEQ D618
D114  RCL J                D351* eqn OOZE             D588  RANDOM
D115  XEQ D613             D352  PSE                  D589  0.1
D116  RCL L                D353  [12,10,30]           D590  RCL* E
D117  XEQ D628             D354  [1,6,0]              D591  x>y?
D118  FS? 4                D355  [5,9,14]             D592  XEQ D645
D119  GTO D693             D356  GTO D399             D593* XEQ D057
D120  XEQ D065             D357* eqn MOLD MONSTER     D594  1/x
D121  XEQ D067             D358  PSE                  D595  RANDOM
D122  *                    D359  [2,8,0]              D596  x>=y?
D123  XEQ D059             D360  [1,2,0]              D597  GTO D011
D124  XEQ D071             D361  [3,3,10]             D598  eqn HEAL
D125  RCL+ H               D362  GTO D399             D599  PSE
D126  *                    D363* eqn OGRE             D600  RCL I
D127  x>y?                 D364  PSE                  D601  STO J
D128  x<>y                 D365  [5,12,10]            D602  RANDOM
D129  XEQ D029             D366  [2,8,8]              D603  0.3
D130  STO E                D367  [1,10,21]            D604  +
D131  XEQ D067             D368  GTO D399             D605  IP
D132  x^2                  D369* eqn GIANT SNAKE      D606  STO+ L
D133  x<y?                 D370  PSE                  D607  GTO D011
D134  GTO D199             D371  [4,8,8]              D608* x<> E
D135  x=y?                 D372  [2,8,4]              D609  VIEW E
D136  GTO D369             D373  [1,5,15]             D610  PSE
D137  XEQ D065             D374  GTO D399             D611  x<> E
D138  -                    D375* eqn TROLL            D612  RTN
D139  x<y?                 D376  PSE                  D613* x<> H
D140  GTO D171             D377  [6,10,40]            D614  VIEW H
D141  x=y?                 D378  [1,6,6]              D615  PSE
D142  GTO D357             D379  [2,9,22]             D616  x<> H
D143  XEQ D067             D380  GTO D399             D617  RTN
D144  -                    D381* eqn ELEMENTAL        D618* x<> G
D145  x<y?                 D382  PSE                  D619  VIEW G
D146  GTO D160             D383  [10,12,30]           D620  PSE
D147  x=y?                 D384  [1,12,10]            D621  x<> G
D148  GTO D267             D385  [2,16,17]            D622  RTN
D149  XEQ D078             D386  GTO D399             D623* x<> L
D150  x<y?                 D387* eqn WYVERN           D624  VIEW L
D151  GTO D279             D388  PSE                  D625  PSE
D152  x>y?                 D389  [7,12,16]            D626  x<> L
D153  GTO D261             D390  [1,8,8]              D627  RTN
D154  eqn KOBOLD           D391  [2,14,28]            D628* x<> S
D155  PSE                  D392  GTO D399             D629  VIEW S
D156  [1,4,1]              D393* eqn DRAGON           D630  PSE
D157  [1,6,-1]             D394  PSE                  D631  x<> S
D158  [1,0,13]             D395  [24,20,100]          D632  RTN
D159  GTO D399             D396  [1,20,30]            D633* CF 10
D160* XEQ D075             D397  [2,30,29]            D634  eqn [0,0,1]*REGX
D161  x<y?                 D398  SF 4                 D635  eqn [0,1,0]*REGY
D162  GTO D285             D399* STO B                D636  eqn [1,0,0]*REGZ
D163  x>y?                 D400  Rv                   D637  SF 10
D164  GTO D273             D401  STO C                D638  RTN
D165  eqn ORC              D402  Rv                   D639* XEQ D063
D166  PSE                  D403  XEQ D046             D640  RANDOM
D167  [1,12,4]             D404  STO D                D641  SQRT
D168  [1,8,3]              D405  STO P                D642  *
D169  [1,3,17]             D406  RCL E                D643  IP
D170  GTO D399             D407  XEQ D059             D644  RTN
D171* XEQ D067             D408  /                    D645* XEQ D069
D172  +                    D409  +/-                  D646  XEQ D067
D173  x>y?                 D410  INTG                 D647  XEQ D029
D174  GTO D188             D411  ABS                  D648  XEQ D071
D175  x=y?                 D412  STO E                D649  -
D176  GTO D315             D413  RCL B                D650  x=0?
D177  XEQ D075             D414  XEQ D633             D651  GTO D666
D178  x<y?                 D415  STO B                D652  x<y?
D179  GTO D339             D416  Rv                   D653  GTO D673
D180  x>y?                 D417  STO F                D654  x=y?
D181  GTO D327             D418  Rv                   D655  GTO D680
D182  eqn GNOLL            D419  STO G                D656  FS? 3
D183  PSE                  D420  GTO D428             D657  RTN
D184  [4,10,4]             D421* CF 4                 D658  SF 3
D185  [1,10,1]             D422* eqn GOT AWAY         D659  eqn MAGIC HELMET
D186  [1,6,17]             D423  PSE                  D660  PSE
D187  GTO D399             D424  GTO D593             D661  XEQ D071
D188* XEQ D078             D425* RCL J                D662* 1e3
D189  x<y?                 D426  x<=0?                D663  *
D190  GTO D297             D427  GTO D690             D664  STO+ R
D191  x>y?                 D428* eqn 0=ATK 1=FLEE     D665  RTN
D192  GTO D291             D429  PSE                  D666* FS? 0
D193  eqn GIANT LEECH      D430  CLSTK                D667  RTN
D194  PSE                  D431  STOP                 D668  SF 0
D195  [2,8,4]              D432  x=0?                 D669  eqn MAGIC SHIELD
D196  [1,8,4]              D433  GTO D449             D670  PSE
D197  [1,6,11]             D434  FS? 4                D671  XEQ D069
D198  GTO D399             D435  GTO D421             D672  GTO D662
D199* XEQ D065             D436  XEQ D057             D673* FS? 1
D200  +                    D437  RCL* E               D674  RTN
D201  x<y?                 D438  XEQ D069             D675  SF 1
D202  GTO D233             D439  RCL* N               D676  eqn MAGIC SWORD
D203  x=y?                 D440  -                    D677  PSE
D204  GTO D321             D441  RCL+ H               D678  XEQ D057
D205  XEQ D067             D442  XEQ D061             D679  GTO D662
D206  -                    D443  /                    D680* FS? 2
D207  x<y?                 D444  RANDOM               D681  RTN
D208  GTO D222             D445  x>=y?                D682  SF 2
D209  x=y?                 D446  GTO D422             D683  eqn MAGIC ARMOUR
D210  GTO D375             D447  eqn CAUGHT YOU!      D684  PSE
D211  XEQ D078             D448  PSE                  D685  XEQ D067
D212  x<y?                 D449* RCL L                D686  GTO D662
D213  GTO D363             D450  x=0?                 D687* eqn MARRY PRINCESS
D214  x>y?                 D451  GTO D458             D688  PSE
D215  GTO D351             D452  eqn 0=SWD 1=SPELL    D689  RTN
D216  eqn BUGBEAR          D453  PSE                  D690* eqn YOU DIED!
D217  PSE                  D454  CLSTK                D691  PSE
D218  [6,8,15]             D455  STOP                 D692  GTO D702
D219  [1,6,4]              D456  x<>0?                D693* eqn BEAT DRAGON
D220  [4,9,20]             D457  GTO D524             D694  PSE
D221  GTO D399             D458* XEQ D055             D695  XEQ D061
D222* XEQ D075             D459  RCL H                D696  x^2
D223  x<y?                 D460  XEQ D069             D697  RCL R
D224  GTO D309             D461  /                    D698  x>=y?
D225  x>y?                 D462  +                    D699  XEQ D687
D226  GTO D303             D463  RCL M                D700  eqn YOU WIN!
D227  eqn GIANT            D464  XEQ D067             D701  PSE
D228  PSE                  D465  /                    D702* CLVARS
D229  [6,12,30]            D466  +                    D703  CLSTK
D230  [2,10,12]            D467  IP                   D704  CF 0
D231  [1,12,23]            D468  FS? 1                D705  CF 1
D232  GTO D399             D469  XEQ D506             D706  CF 2
D233* XEQ D067             D470  RCL G                D707  CF 3
D234  +                    D471  x>y?                 D708  CF 4
D235  x>y?                 D472  GTO D489             D709  CF 10
D236  GTO D250             D473  eqn HIT              D710  RTN
D237  x=y?                 D474  PSE
```