Quantcast XP Math - Forums - View Single Post - Game T183 (Calculator)
View Single Post
Old 03-12-2010   #1
jmw106462

 
jmw106462's Avatar
 
Join Date: Feb 2010
Posts: 388
Unhappy Game T183 (Calculator)

ok so i started making this game on the t183 Graphic Calculator!

If you guys want to make one your self check out this site ticalc.org



It isnt finish heres a part of it

:Lbl 7
:Clt Home
: Disp Str1
: Disp " "
: Disp "NOW YOU HAVE TO"
: Disp " "
: Disp "FIght A GOBLIN"
:1000 -> J
:75 -> K
:150 -> L
:Pause
:Lbl 8
:ClrHome
: Disp "GOBLIN"
: Disp "HP:"
: Disp J
: Disp "ATTACKS:"
: Disp "CLAW: 75"
: Disp "SLASH: 150"
:Pause
:ClrHome
: Disp "YOU"
: Disp "HP:"
: Disp "1)STEAL HP"
: Disp "2)REVIVE"
: Disp "3)ATTACK"
: Disp " "
:Input "CHOICE= ",E
:While E/=1 and E/=2 and E/=3
: Delvar E
:Goto 8
:End
:While E=1
:randInt(F-12,F+12) -> M
:M->N
:M-12->M
: Delvar E
:End
:While E=2
:randInt(G-12,G+12) -> N
:0->M
:0->E
:End
While E=3
:randInt(I-12,I+12) -> M
:0->N
:0->E
:End
:randInt(1,2) -> O
:While 0=1
:K->P
:0->O
:End
:While O=2
:L->P
:0->O
:End
:J-M->J
:H+N->H
:H-P->H
:ClrHome
: Disp "YOU DEALT",M
: Disp "AND HEALED",D
: Disp "AND RECEIVED",P
:Pause
:If J<=0 "<=" means less than or equal to, so don't type "<="
:Then
:ClrHome
: Disp "CONGRATULATIONS"
: Disp " "
: Disp Str1
: Disp "YOU WON"
:Pause
:Goto 99
:End
:If H<=0
:Then
:ClrHome
: Disp "SORRY"
: Disp Str1
: Disp " "
: Disp "YOU LOST"
:Pause
:Goto 99
:Else
:Goto 8
:End
__________________
Please refrain from sending me frivolous PM's

Last edited by jmw106462; 03-12-2010 at 02:59 PM..
jmw106462 is offline   Reply With Quote