Quantcast XP Math - Forums - View Single Post - Game T183 (Calculator)
View Single Post
Old 02-10-2011   #10
cbb21410
 
cbb21410's Avatar
 
Join Date: May 2010
Posts: 2
Default how

how do make a graphic calculater to much time on ur hands
Quote:
Originally Posted by jmw106462 View Post
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
cbb21410 is offline   Reply With Quote