XP Math Games Arcade

**jmw106462** · 03-12-2010

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

orac343 · 03-12-2010

Question
What is the usage of when, when you are programming is it saying when something is this do something?
If so though that is similar to If right? ex:
When n=0
Disp "You died"
If n=0
Disp "You died"
Technically that would have the same purpose am I right since I'm confuse on its purpose.
Correct me if I'm wrong
Thank You!

**jmw106462** · 03-14-2010

Quote:

Originally Posted by orac343

Question
What is the usage of when, when you are programming is it saying when something is this do something?
If so though that is similar to If right? ex:
When n=0
Disp "You died"
If n=0
Disp "You died"
Technically that would have the same purpose am I right since I'm confuse on its purpose.
Correct me if I'm wrong
Thank You!

Ok, Your half correct see how mine is done? Ok? You just put down things on how the game runs so the ending part on mine i could put that at the top. You Don't Have to do it in Order it Corrects it self. If that's not what your asking please Re-Post ill be happy to post what your asking.

ty,jmw106462

**jmw106462** · 03-14-2010

://ADDED BY REDFIRE:
:Menu("RPG","Play",1,"Quit",2)
:Lbl 2
:Clrhome
:Stop
://ADDED BY ARCHIVE:
:Lbl 1
:Clrhome

isp "Enter your name"

isp "And stats that"

isp "Add up to 100" // Archive it wouldn't fit on one line so i had to carry it on to the next
:Input "Name?",Str1
:Input "Strength?",A
:Input "Intelligence?",B
:Input "Magic?",C
:Input "Charisma?",D
:If A+B+C+D != 100:Then //By the way, on the calculator, it's a = with a line through it; but that's impossible on a ASCII system.

isp "Sum is not 100!"
:Else
:4A->H //On the computer it's an actual arrow instead of a ->. See above.
:2B+25->S
:6D->R
:5C->L

isp "Welcome,"

isp Str1

isp "Fight a goblin!"
:Pause
:Goto 3
:Lbl 3
:1000->Y
:75->E
:120->F

isp "--Goblin--"

isp "HP:"

isp Y

isp "Attacks:"

isp "Claw: 75"

isp "Slash: 120"
:Pause

isp "--You--"

isp "HP:"

isp H

isp "1) Steal HP"

isp "2) Revive"

isp "3) Lightning Strike"
:Pause
:Input "Choice?",G
:While G=1
:randInt(S-10,S+10)->I
:I->O
:0->G
:End
:While G=2
:randInt(R-10,R+10)->O
:0->I
:0->G
:End
:While G=3
:randInt(L-10,L+10)->I
:0->O
:0->G
:End
:randInt(1,2)->J
:While J=1
:F->K
:0->J
:End
:While J=1
:E->K
:0->J
:End
:Y-I->Y
:H+O->H
:H-K->H

isp "You dealt"

isp I

isp "And healed"

isp O

isp "And recieved"

isp K
:If Y<=0:Then //On the calculator, it's an actual "less than or equal to", but see above comments.
:Goto 4
:If H<=0:Then
:Goto 5
:Goto 3
:Stop
:Lbl 4

isp "You won!"
:Stop
:Lbl 5

isp "You lost.

"
:Stop

__________________
This is the middle part of my game. When i get it finished you can Copy Right it lol. And use it as yourz i have over 500 of them all different ones.

ty,jmw106462

**jmw106462** · 03-14-2010

So if you don't know how to Programm on the T183 or on anything ill be happy to let you use mine.

ty,jmw106462

**meetballs** · 03-18-2010

Thanks for the site but i don't know how to get the t183 Calculator? Could you help me Plez?

**jmw106462** · 03-20-2010

Yes, of course ill help you! Give me your Email Adress so i can send you the Calculator download lnk.

~jmw106462~

Quote:

Originally Posted by meetballs

Thanks for the site but i don't know how to get the t183 Calculator? Could you help me Plez?

**jmw106462** · 03-23-2010

Okay, Thanks i sent you the lnk you should get it.

**jmw106462** · 02-08-2011

These post are so old. I think we should LOCK THIS TOPIC.

cbb21410 · 02-10-2011

how do make a graphic calculater to much time on ur hands

Quote:

Originally Posted by jmw106462

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

03-12-2010	#1
jmw106462 Last Achievements Join Date: Feb 2010 Posts: 388 Thanks: 35 Thanked 565 Times in 296 Posts	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 01:59 PM..

03-12-2010	#2
orac343 Last Achievements Join Date: Mar 2010 Posts: 11 Thanks: 11 Thanked 28 Times in 11 Posts	Programming Question What is the usage of when, when you are programming is it saying when something is this do something? If so though that is similar to If right? ex: When n=0 Disp "You died" If n=0 Disp "You died" Technically that would have the same purpose am I right since I'm confuse on its purpose. Correct me if I'm wrong Thank You!

03-14-2010	#4
jmw106462 Last Achievements Join Date: Feb 2010 Posts: 388 Thanks: 35 Thanked 565 Times in 296 Posts	://ADDED BY REDFIRE: :Menu("RPG","Play",1,"Quit",2) :Lbl 2 :Clrhome :Stop ://ADDED BY ARCHIVE: :Lbl 1 :Clrhome isp "Enter your name" isp "And stats that" isp "Add up to 100" // Archive it wouldn't fit on one line so i had to carry it on to the next :Input "Name?",Str1 :Input "Strength?",A :Input "Intelligence?",B :Input "Magic?",C :Input "Charisma?",D :If A+B+C+D != 100:Then //By the way, on the calculator, it's a = with a line through it; but that's impossible on a ASCII system. isp "Sum is not 100!" :Else :4A->H //On the computer it's an actual arrow instead of a ->. See above. :2B+25->S :6D->R :5C->L isp "Welcome," isp Str1 isp "Fight a goblin!" :Pause :Goto 3 :Lbl 3 :1000->Y :75->E :120->F isp "--Goblin--" isp "HP:" isp Y isp "Attacks:" isp "Claw: 75" isp "Slash: 120" :Pause isp "--You--" isp "HP:" isp H isp "1) Steal HP" isp "2) Revive" isp "3) Lightning Strike" :Pause :Input "Choice?",G :While G=1 :randInt(S-10,S+10)->I :I->O :0->G :End :While G=2 :randInt(R-10,R+10)->O :0->I :0->G :End :While G=3 :randInt(L-10,L+10)->I :0->O :0->G :End :randInt(1,2)->J :While J=1 :F->K :0->J :End :While J=1 :E->K :0->J :End :Y-I->Y :H+O->H :H-K->H isp "You dealt" isp I isp "And healed" isp O isp "And recieved" isp K :If Y<=0:Then //On the calculator, it's an actual "less than or equal to", but see above comments. :Goto 4 :If H<=0:Then :Goto 5 :Goto 3 :Stop :Lbl 4 isp "You won!" :Stop :Lbl 5 isp "You lost. " :Stop __________________ This is the middle part of my game. When i get it finished you can Copy Right it lol. And use it as yourz i have over 500 of them all different ones. ty,jmw106462 __________________ Please refrain from sending me frivolous PM's

03-14-2010	#5
jmw106462 Last Achievements Join Date: Feb 2010 Posts: 388 Thanks: 35 Thanked 565 Times in 296 Posts	So if you don't know how to Programm on the T183 or on anything ill be happy to let you use mine. ty,jmw106462 __________________ Please refrain from sending me frivolous PM's

03-18-2010	#6
meetballs Last Achievements Join Date: Mar 2010 Posts: 46 Thanks: 48 Thanked 103 Times in 32 Posts	Wow Thanks for the site but i don't know how to get the t183 Calculator? Could you help me Plez?