_________________________________________________________________________ Title: Sailor Moon v1.0 Author: Laurent Carrere (lcarrere@club-internet.fr) Models: 9900+ Size: 18200 Bytes Description: THE RPG game for the Casio.. Same class as Final Fantasy! Get this one or you'll miss something! Comments: I hope you'll enjoy the time, you are going to take in order to write this program on your casio. ;-) In order to gain memory on your calculator, you are not obliged to type the number 0 before a decimal number. For example : You can type : 0.5 But .5 is the same as the other, and in my program it is very important to gain memory because it takes a lot of. And secondly, donÕt forget the points with the decimal numbers. You had better print this file into a text file. I checked 2 times if my program contain some errors or not. And yet, there is no more error. _________________________________________________________________________ Command translation: --> is Little arrow ==> is Big arrow ; is ãSquareÒ ¤ is PI $ is Theta symbol Diff is Means does not equal to (-) is Little minus # is Means Display Symbol (when we have to push EXE to continue) _________________________________________________________________________ Program: AxesOff GridOff CoordOff LabelOff 'Sailormoon 1.0 ViewWindow 1,127,1,1,63,1 0 --> A ~ Z For 1-->A To 5 Text 25,40,"SAILORMOON" Text 25,40,"(-)~*/§/*~(-)" Next Getkey=31 ==> Goto H 1 --> A Text 6,15,"Return" Text 58,20,"Super" Text 6,80,"Super S" Text 58,80,"Stars" For 1 --> A To 5 Green Text 40,32,"ALL SEASONS" (3 Spaces) Green Text 40,32,".(-)+x/-^-/x+(-)." Next Text 25,40,"SAILORMOON" Green Text 40,32,"ALL SEASONS" (3 Spaces) Orange Circle 60,30,30 Orange Circle 60,15,15 # Lbl H Cls Locate 2,4,"A MONSTER ATTACK!!!" # "Who do you to choose?" # Text 1,1,"0.USAGI [MOON]" (5 Spaces) Text 7,1,"1.AMI [MERCURY]" (5 Spaces) Text 13,1,"2.REI [MARS]" (7 Spaces) Text 19,1,"3.MAKO [JUPITER]" (4 Spaces) Text 25,1,"4.MINA [VENUS]" (5 Spaces) Text 31,1,"5.CHIBIUSA [MOON]" (2 Spaces) Orange Text 37,1,"6.HARUKA {URANUS}" (2 Spaces} Orange Text 43,1,"7.MICHIRU {NEPTUNE}" (1 Space) Orange Text 49,1,"8.SETSUNA {PLUTO}" (1 Space) Orange Text 55,1,"9.HOTARU {SATURN}" (2 Spaces) Green Text 1,90,"10.SEYA" Green Text 7,85,"; FIGHTER ;" Green Text 25,90,"11.YATEN" Green Text 31,90,"; HEALER ;" Green Text 49,90,"TAIKI" Green Text 55,90,"; MAKER ;" # ? --> Z ClrText ViewWindow -6.3 , 6.3 , 1 , -3.6 , 3.6 , 1 If Z=0 Then Orange "MOON ETERNAL" : " " Cls: F-LINE 0,1,0.25,1.25 F-LINE 0.25,1.25,0.5,1.7 F-LINE 0.5,1.7,.75,1.9 F-LINE .75,1.9,1,2 F-LINE 1,2,1.25,2 F-LINE 1.25,2,1.5,1.9 F-LINE 1.5,1.9,1.75,1.7 F-LINE 1.75,1.7,2,1.25 F-LINE 2,1.25,2.1,1 F-LINE 2.1,1,2.1,.8 F-LINE 2.1,.8,0,-2.25 F-LINE 0,1,-.25,1.25 F-LINE -.25,1.25,-.5,1.7 F-LINE -.5,1.7,-.75,1.9 F-LINE -.75,1.9,-1,2 F-LINE -1,2,-1.25,2 F-LINE -1.25,2,-1.5,1.9 F-LINE -1.5,1.9,-1.75,1.7 F-LINE -1.75,1.7,-2,1.25 F-LINE -2,1.25,-2.1,1 F-LINE -2.1,1,-2.1,.8 F-LINE -2.1,.8,0,-2.25 Orange F-LINE 0,1,-.5,2.1 F-LINE -.5,2.1,.5,2.1 Green F-LINE .5,2.1,0,1 Green F-LINE -.9,-.9,-2.5,-.33 Green F-LINE -2.5,-.33,0,-2 Green F-LINE .9,-.9,2.5,-.33 Green F-LINE 2.5,-.33,0,-2 Orange F-LINE 0,.5,.5,-.5 Orange F-LINE .5,-.5,-.5,0 Orange F-LINE -.5,0,.5,0 Orange F-LINE .5,0,-.5,-.5 Orange F-LINE -.5,-.5,0,.5 Green "MAKE UP ! ! !" IfEnd If Z=1 Then "MERCURY CRISTAL POWER" Cls: F-LINE 0,1.75,-.33,2.25 F-LINE 0,1.75,.33,2.25 F-LINE 0,.5,-1,1.25 F-LINE -1,1.25,-1.2,1.5 F-LINE -1.2,1.5,-1.2,1.6 F-LINE -1.2,1.6,-1.2,1.8 F-LINE -1.2,1.8,-1.1,2 F-LINE -1.1,2,-.8,2.1 F-LINE -.8,2.1,-.6,2.1 F-LINE -.6,2.1,-.5,2 F-LINE -.5,2,0,1.75 F-LINE 0,.5,1,1.25 F-LINE 1,1.25,1.2,1.5 F-LINE 1.2,1.5,1.2,1.6 F-LINE 1.2,1.6,1.2,1.8 F-LINE 1.2,1.8,1.1,2 F-LINE 1.1,2,.8,2.1 F-LINE .8,2.1,.6,2.1 F-LINE .6,2.1,.5,2 F-LINE .5,2,0,1.75 F-LINE 0,.5,0,-1.75 F-LINE -1,-.25,1,-.25 Circle 0,0,3 Green "MAKE UP ! ! !" IfEnd If Z=2 Then Orange "MARS CRISTAL POWER" : " " Cls Orange Circle -.5,0,1.5 Orange F-LINE .5,1.2,1.5,2 Orange F-LINE 1.5,2,1,2 Orange F-LINE 1.5,2,1.5,1.5 Circle 0,0,3 Green "MAKE UP ! ! !" IfEnd If Z=3 Then Green "JUPITER CRISTAL POWER" Cls Green F-LINE 0,2.5,.3,2.4 Green F-LINE .3,2.4,.4,2.3 Green F-LINE .4,2.3,.5,2.1 Green F-LINE .5,2.1,-1.5,-2 Green F-LINE -1.5,-2,1.5,-2 Green F-LINE 1,-1.33,1,-2.5 Circle 0,0,3 Green "MAKE UP ! ! !" IfEnd If Z=4 Then "VENUS CRISTAL POWER" : " " Cls : Orange F-LINE 0,.5,-1,1.25 Orange F-LINE -1,1.25,-1.2,1.5 Orange F-LINE -1.2,1.5,-1.2,1.6 Orange F-LINE -1.2,1.6,-1.2,1.8 Orange F-LINE -1.2,1.8,-1.1,2 Orange F-LINE -1.1,2,-.8,2.1 Orange F-LINE -.8,2.1,-.6,2.1 Orange F-LINE -.6,2.1,-.5,2 Orange F-LINE -.5,2,0,1.75 Orange F-LINE 0,.5,1,1.25 Orange F-LINE 1,1.25,1.2,1.5 Orange F-LINE 1.2,1.5,1.2,1.6 Orange F-LINE 1.2,1.6,1.2,1.8 Orange F-LINE 1.2,1.8,1.1,2 Orange F-LINE 1.1,2,.8,2.1 Orange F-LINE .8,2.1,.6,2.1 Orange F-LINE .6,2.1,.5,2 Orange F-LINE .5,2,0,1.75 Orange F-LINE 0,.5,0,-1.75 Orange F-LINE -1,-.25,1,-.25 Circle 0,0,3 Green "MAKE UP ! ! !" IfEnd If Z=5 Then Orange "MOON CRISIS" : " " Cls: F-LINE 0,1,.25,1.25 F-LINE .25,1.25,.5,1.7 F-LINE .5,1.7,.75,1.9 F-LINE .75,1.9,1,2 F-LINE 1,2,1.25,2 F-LINE 1.25,2,1.5,1.9 F-LINE 1.5,1.9,1.75,1.7 F-LINE 1.75,1.7,2,1.25 F-LINE 2,1.25,2.1,1 F-LINE 2.1,1,2.1,.8 F-LINE 2.1,.8,0,-2.25 F-LINE 0,1,-.25,1.25 F-LINE -.25,1.25,-.5,1.7 F-LINE -.5,1.7,-.75,1.9 F-LINE -.75,1.9,-1,2 F-LINE -1,2,-1.25,2 F-LINE -1.25,2,-1.5,1.9 F-LINE -1.5,1.9,-1.75,1.7 F-LINE -1.75,1.7,-2,1.25 F-LINE -2,1.25,-2.1,1 F-LINE -2.1,1,-2.1,.8 F-LINE -2.1,.8,0,-2.25 Green F-LINE 0,1,-.5,2.1 Green F-LINE -.5,2.1,.5,2.1 Green F-LINE .5,2.1,0,1 Orange Circle 0,0,.5 Green "MAKE UP ! ! !" IfEnd If Z=6 Then Orange "URANUS CRISTAL POWER" : " " Cls : Orange F-LINE 0,2.75,0,-1.5 Orange Circle 0,-2,.5 Orange F-LINE -1.5,2.25,-.75,1 Orange F-LINE -.75,1,.75,1 Orange F-LINE .75,1,1.5,2.25 Orange F-LINE -.75,1,-1.5,-.5 Orange F-LINE .75,1,1.5,-.5 Circle 0,0,3 "MAKE UP ! ! !" IfEnd If Z=7 Then Green "NEPTUNE CRISTAL POWER" Cls : Green F-LINE -.75,-1,.75,-1 Green F-LINE 0,2,0,-1.75 Green F-LINE -1,.5,1,.5 Green F-LINE -1,.5,-1.1,.6 Green F-LINE -1.2,.7,-1.1,.6 Green F-LINE -1.1,.6,-1.3,.9 Green F-LINE -1.4,,1,-1.3,.9 Green F-LINE -1.4,1,-1.5,2 Green F-LINE 1,.5,1.1,.6 Green F-LINE 1.1,.6,1.2,.7 Green F-LINE 1.2,.7,1.3,.9 Green F-LINE 1.3,.9,1.4,1 Green F-LINE 1.4,1,1.5,2 Green F-LINE -1.5,2,-1.75,1.6 Green F-LINE -1.5,2,-1.35,1.6 Green F-LINE 1.5,2,1.65,1.6 Green F-LINE 1.5,2,1.25,1.6 Green F-LINE 0,2,-.25,1.6 Green F-LINE 0,2,.15,1.6 Circle 0,0,3 "MAKE UP ! ! !" IfEnd If Z=8 Then "PLUTO CRISTAL POWER" : " " Cls: F-LINE 1.5,-2,-1,-2 F-LINE -1,-2,-1,2.15