grue@batserver.cs.uq.oz.au (Frobozz) (02/26/91)
hiya, Here is a game for the casio FX602P calculator (an old classic!). This game is basically of the form: meet monster, kill monster and repeat until dead. To start the game press P0 and you will be given a run down of your stats followed by the name of the monster you have met, then Fight/Run if you wish to fight, do nothing. If you want to run press a non-zero number and you might get away. If you choose to fight, you get the option of using a sword or a spell (type a non-zero number for a spell). Your stats are: Lvl = experience level, E = experience points, Hp = hit points, Sp = spell points. Sometimes after you win a fight, you get a heal which gives you lots of hit points back. Also, as you survive for longer, you will increase in experience and level. Enjoy playing this game... If anybody want more games for the 602 (or other programs, I didn't only write games), I might be tempted to type them in and post them. Pauli seeya Paul Dale | Internet/CSnet: grue@batserver.cs.uq.oz.au Dept of Computer Science| Bitnet: grue%batserver.cs.uq.oz.au@uunet.uu.net Uni of Qld | JANET: grue%batserver.cs.uq.oz.au@uk.ac.ukc Australia, 4072 | EAN: grue@batserver.cs.uq.oz | UUCP: uunet!munnari!batserver.cs.uq.oz!grue f4e6g4Qh4++ | JUNET: grue@batserver.cs.uq.oz.au Special symbols used: <SquareRoot> is the square root key x^y is the power function >= is really the greater than or equal to tests ar means alpha recall (i.e. don't type 'a''r'). / is the divide key x^2 is the square key 10^x is the anti-log to base 10 button I've mostly used capitals for commands (sometimes I slip and let a lowercase thing in). The lower case in the alpha constants is intentional (and it looks better). The program sizes are: P0 367 steps P5 116 steps P9 9 steps P0: MAC .5 Min07 RAN# <SquareRoot> * 20 Min06 = INT Min16 RAN# <SquareRoot> * MR06 = INT Min17 RAN# <SquareRoot> * MR06 = INT Min18 LBL0 10 Min08 MinF MR11 X>=F Goto1 MR12 MinF 2 x^y MR11 * MR08 - MR06 = X>=F Goto3 Goto2 LBL1 MR12 MinF MR11 - 9 = * 10220 = X>=F Goto3 LBL2 RAN# * MR08 + MR18 / 3 - 3 = INT x>=0 X=0 1 M+10 M+19 1 M+15 M+11 RAN# FIX0 M+16 RAN# FIX0 M+17 RAN# FIX0 M+18 LBL3 "Lv=ar11" PAUSE "E=ar12" PAUSE "Hp=ar19" PAUSE "Sp=ar15" GSBP5 AC "Fight/Run" PAUSE x=0 Goto4 MR09 * MR08 - MR17 * 2 + MR11 = / 2 10^x = MinF RAN# x>=F Goto8 "Got ya" LBL4 MR19 x>=0 x=0 Goto9 AC "Sword/Spell" PAUSE x=0 Goto5 MR15 x=0 "None" x=0 Goto6 1 M-15 "zot" MR11 Min00 6 GSBP9 M-14 Goto6 LBL5 MR08 - (MR11 / 2) INT + MR09 - MR17 / 5 = INT MinF RAN# * MR06 + 1 = INT x>=F x=F Goto6 "Hit" MR16 / 4 + RAN# * 8 - 2.5 = INT x>=0 x=0 1 M-14 LBL6 MR14 x>=0 x=0 Goto7 11 - MR09 = MinF RAN# * MR06 - MR17 / 5 + 2 = x>=F x=F Goto4 RAN# * 2 * MR09 + RAN# * 6 - MR18 / 3 + 3 = INT x>=0 x=0 1 M-19 "OW" Goto4 LBL7 "kill" MR13 M+12 "G=#" PAUSE AC 5 * 2 x^y MR09 = M+12 "E=#" LBL8 .1 MinF RAN# x>=F Goto0 "Heal" MR10 Min19 RAN# + .3 = INT M+15 Goto0 LBL9 "Die" P5: MR08 * RAN# x^2 = INT Min09 2 * MR09 + 1 = Min00 MR08 GSBP9 Min13 8 GSBP9 Min14 MR09 x=0 "Rat" IND Goto9 "Slime" Goto0 LBL2 "Gnome" Goto0 LBL3 "Orc" Goto0 LBL4 "Gnoll" Goto0 LBL5 "Ogre" Goto0 LBL6 "Troll" Goto0 LBL7 "Giant" Goto0 LBL8 MR14 M+14 "Titan" Goto0 LBL9 MR14 M+14 M+14 "Dragon" LBL0 PAUSE AC 1 M+09 P9: * RAN# + 1 = INT * MR00 = --