Author Topic: Choice for TI-83+/84+  (Read 14250 times)

0 Members and 1 Guest are viewing this topic.

Offline DJ Omnimaga

  • Clacualters are teh gr33t
  • CoT Emeritus
  • LV15 Omnimagician (Next: --)
  • *
  • Posts: 55943
  • Rating: +3154/-232
  • CodeWalrus founder & retired Omnimaga founder
    • View Profile
    • Dream of Omnimaga Music
Re: Choice for TI-83+/84+
« Reply #60 on: December 23, 2010, 12:31:52 pm »
I know, I was just giving B as an example for the code above.

Offline adamac16

  • LV4 Regular (Next: 200)
  • ****
  • Posts: 141
  • Rating: +2/-0
    • View Profile
Re: Choice for TI-83+/84+
« Reply #61 on: January 02, 2011, 09:32:32 pm »
does this help to answer my question: how do i add 500 health to the next fight?
Code: [Select]
:1000→A
:ClrHome
:ClrDraw
:AxesOn
:Output(1,1,"A PROGRAM BY")
:Output(2,2,"ADAM COUNTS")
:Output(3,3,"TEAM B")
:Pause
:ClrHome
:AxesOff
:Input "NAME:",Str2
:ClrHome
:Lbl A
:Menu("CHOICE ENDURANCE","START",B,"INSTRUCTIONS",C,"QUIT",D)
:Lbl C
:"FOLLOW THE ON SCREEN PROMPT
:prgmA
:Goto A
:Lbl B
:Lbl E
:Menu("CHOOSE OPPONENT","BRIGGS",F,"TANK",G,"SPIDER",H,"POCKETS",I,"CAPONE",J,"MORE...",K)
:Lbl K
:Menu("MORE...","JIN",L,"PAUL",M,"HWOARANG",N,"YOSHIMITZU",O,"LAW",P,"MORE...",Q,"PREVIOUS",R)
:Lbl R
:Goto E
:Lbl Q
:Menu("MORE...","BRAD",S,"ZACH",T,"JAKE",U,"GLEN",V,"ALEX",W,"MORE...",X,"PREVIOUS",Y)
:Lbl Y
:Goto K
:Lbl X
:Menu("MORE...","CLOUD",Z,"FIRION",AA,"SQUALL",AB,"ZIDANE",AC,"TIDUS",AD,"PREVIOUS",AE,"QUIT",AF)
:Lbl AE
:Goto Q
:Lbl AF
:Goto A
:Lbl F
:ClrHome
:AxesOff
:ZStandard
:ClrDraw
:Text(25,35,"LOADING")
:Shade({-}3,{-}1
:ClrHome
:ClrDraw
:1→B
:DelVar CDelVar DWhile A>0 and B>0
:Text(1,1,Str2+":",A)
:Text(16,1,"BRIGGS:",B)
:Text(32,1,"HIT WHERE?")
:Text(40,1,"LOW=1 MID=2 HI=3")
:DelVar Z:Repeat Z=92 or Z=93 or Z=94
:randInt(1,3→D
:getKey→Z
:End
:ClrDraw
:If Z=92 and D=1
:Text(48,1,"BLOCKED")
:If Z=92 and D=2
:Then
:randInt(1,20→E
:A-E→A
:Text(48,1,"BRIGGS HITS")
:End
:If Z=92 and D=3
:Then
:randInt(1,20→E
:B-E→B
:Text(48,1,Str2+" HITS")
:End
:If Z=93 and D=1
:Then
:randInt(1,15→E
:B-E→B
:Text(48,1,Str2+" HITS")
:End
:If Z=93 and D=2
:Text(48,1,"BLOCKED")
:If Z=93 and D=3
:Then
:randInt(1,15→E
:A-E→A
:Text(48,1,"BRIGGS HITS")
:End
:If Z=94 and D=1
:Then
:randInt(1,10→E
:A-E→A
:Text(48,1,"BRIGGS HITS")
:End
:If Z=94 and D=2
:Then
:randInt(1,10→E
:B-E→B
:Text(48,1,Str2+" HITS")
:End
:If Z=94 and D=3
:Text(48,1,"BLOCKED")
:End
:ClrHome
:If A≤0 and B≥0
:Then
:"BRIGGS WINS        GAME OVER
:prgmA
:ClrDraw
:AxesOn:Goto A
:End
:If B≤0 and A≥0
:Then
:"YOU WIN   CONGRATS!
:prgmA
:ClrDraw
:AxesOn
:End
:Lbl G
:ClrHome
:AxesOff
:ZStandard
:Text(25,35,"LOADING")
:Shade({-}3,{-}1
:ClrHome
:ClrDraw
:A+θθθ→A:1000→B
:DelVar CDelVar DWhile A>0 and B>0
:Text(1,1,Str2+":",A)
:Text(16,1,"TANK:",B)
:Text(32,1,"HIT WHERE?")
:Text(40,1,"LOW=1 MID=2 HI=3")
:DelVar Z:Repeat Z=92 or Z=93 or Z=94
:randInt(1,3→D
:getKey→Z
:End

Offline DJ Omnimaga

  • Clacualters are teh gr33t
  • CoT Emeritus
  • LV15 Omnimagician (Next: --)
  • *
  • Posts: 55943
  • Rating: +3154/-232
  • CodeWalrus founder & retired Omnimaga founder
    • View Profile
    • Dream of Omnimaga Music
Re: Choice for TI-83+/84+
« Reply #62 on: January 02, 2011, 10:05:05 pm »
A+500->A is supposed to work. If it doesn't work then your calc is messed up. You will need to do a RAM reset.

A+500->A will increase A by 500. In other words, since A = your health, A+500->A will increase your health by 500.

Offline AngelFish

  • Is this my custom title?
  • Administrator
  • LV12 Extreme Poster (Next: 5000)
  • ************
  • Posts: 3242
  • Rating: +270/-27
  • I'm a Fishbot
    • View Profile
Re: Choice for TI-83+/84+
« Reply #63 on: January 02, 2011, 10:11:48 pm »
Here
∂²Ψ    -(2m(V(x)-E)Ψ
---  = -------------
∂x²        ℏ²Ψ

Offline adamac16

  • LV4 Regular (Next: 200)
  • ****
  • Posts: 141
  • Rating: +2/-0
    • View Profile
Re: Choice for TI-83+/84+
« Reply #64 on: January 20, 2011, 09:23:13 pm »
heres the code i need help with (this game)....hope it helps.

First battle:
Code: [Select]
:ClrHome
:AxesOff
:ZStandard
:ClrDraw
:Text(25,35,"LOADING")
:Shade({-}3,{-}1
:ClrHome
:ClrDraw
:1000→A:1000→B
:DelVar CDelVar DWhile A>0 and B>0
:Text(1,1,Str2+":",A)
:Text(16,1,"BRIGGS:",B)
:Text(32,1,"HIT WHERE?")
:Text(40,1,"LOW=1 MID=2 HI=3")
:DelVar Z:Repeat Z=92 or Z=93 or Z=94
:randInt(1,3→D
:getKey→Z
:End
:ClrDraw
:If Z=92 and D=1
:Text(48,1,"BLOCKED")
:If Z=92 and D=2
:Then
:randInt(1,20→E
:A-E→A
:Text(48,1,"BRIGGS HITS")
:End
:If Z=92 and D=3
:Then
:randInt(1,20→E
:B-E→B
:Text(48,1,Str2+" HITS")
:End
:If Z=93 and D=1
:Then
:randInt(1,15→E
:B-E→B
:Text(48,1,Str2+" HITS")
:End
:If Z=93 and D=2
:Text(48,1,"BLOCKED")
:If Z=93 and D=3
:Then
:randInt(1,15→E
:A-E→A
:Text(48,1,"BRIGGS HITS")
:End
:If Z=94 and D=1
:Then
:randInt(1,10→E
:A-E→A
:Text(48,1,"BRIGGS HITS")
:End
:If Z=94 and D=2
:Then
:randInt(1,10→E
:B-E→B
:Text(48,1,Str2+" HITS")
:End
:If Z=94 and D=3
:Text(48,1,"BLOCKED")
:End
:ClrHome
:If A≤0 and B≥0
:Then
:"BRIGGS WINS        GAME OVER
:prgmA
:ClrDraw
:AxesOn:Goto A
:End
:If B≤0 and A≥0
:Then
:"YOU WIN   CONGRATS!
:prgmA
:ClrDraw
:AxesOn
:End

Second battle:
Code: [Select]
:ClrHome
:AxesOff
:ZStandard
:Text(25,35,"LOADING")
:Shade({-}3,{-}1
:ClrHome
:ClrDraw
:A+500→A:1000→B
:DelVar CDelVar DWhile A>0 and B>0
:Text(1,1,Str2+":",A)
:Text(16,1,"TANK:",B)
:Text(32,1,"HIT WHERE?")
:Text(40,1,"LOW=1 MID=2 HI=3")
:DelVar Z:Repeat Z=92 or Z=93 or Z=94
:randInt(1,3→D
:getKey→Z
:End
:ClrDraw
:If Z=92 and D=1
:Text(48,1,"BLOCKED")
:If Z=92 and D=2
:Then
:randInt(1,20→E
:A-E→A
:Text(48,1,"TANK HITS")
:End
:If Z=92 and D=3
:Then
:randInt(1,20→E
:B-E→B
:Text(48,1,Str2+" HITS")
:End
:If Z=93 and D=1
:Then
:randInt(1,15→E
:B-E→B
:Text(48,1,Str2+" HITS")
:End
:If Z=93 and D=2
:Text(48,1,"BLOCKED")
:If Z=93 and D=3
:Then
:randInt(1,15→E
:A-E→A
:Text(48,1,"TANK HITS")
:End
:If Z=94 and D=1
:Then
:randInt(1,10→E
:A-E→A
:Text(48,1,"TANK HITS")
:End
:If Z=94 and D=2
:Then
:randInt(1,10→E
:B-E→B
:Text(48,1,Str2+" HITS")
:End
:If Z=94 and D=3
:Text(48,1,"BLOCKED")
:End
:If A≤0 and B≥0
:Then
:"TANK WINS          GAME OVER
:prgmA
:ClrDraw
:AxesOn:Goto A
:End
:If B≤0 and A≥0
:Then
:"YOU WIN   CONGRATS!
:prgmA
:ClrDraw
:AxesOn
:End
:Goto θθ
:Lbl H
:ClrHome
:AxesOff
:ZStandard
:Text(25,35,"LOADING")
:Shade({-}3,{-}1
:ClrHome
:ClrDraw
:1000→A:1000→B
:DelVar CDelVar DWhile A>0 and B>0
:Text(1,1,Str2+":",A)
:Text(16,1,"SPIDER:",B)
:Text(32,1,"HIT WHERE?")
:Text(40,1,"LOW=1 MID=2 HI=3")
:DelVar Z:Repeat Z=92 or Z=93 or Z=94
:randInt(1,3→D
:getKey→Z
:End
:ClrDraw
:If Z=92 and D=1
:Text(48,1,"BLOCKED")
:If Z=92 and D=2
:Then
:randInt(1,20→E
:A-E→A
:Text(48,1,"SPIDER HITS")
:End
:If Z=92 and D=3
:Then
:randInt(1,20→E
:B-E→B
:Text(48,1,Str2+" HITS")
:End
:If Z=93 and D=1
:Then
:randInt(1,15→E
:B-E→B
:Text(48,1,Str2+" HITS")
:End
:If Z=93 and D=2
:Text(48,1,"BLOCKED")
:If Z=93 and D=3
:Then
:randInt(1,15→E
:A-E→A
:Text(48,1,"SPIDER HITS")
:End
:If Z=94 and D=1
:Then
:randInt(1,10→E
:A-E→A
:Text(48,1,"SPIDER HITS")
:End
:If Z=94 and D=2
:Then
:randInt(1,10→E
:B-E→B
:Text(48,1,Str2+" HITS")
:End
:If Z=94 and D=3
:Text(48,1,"BLOCKED")
:End
:If A≤0 and B≥0
:Then
:"SPIDER WINS        GAME OVER
:prgmA
:ClrDraw
:AxesOn:Goto A
:End
:If B≤0 and A≥0
:Then
:"YOU WIN   CONGRATS!
:prgmA
:ClrDraw
:End

Offline DJ Omnimaga

  • Clacualters are teh gr33t
  • CoT Emeritus
  • LV15 Omnimagician (Next: --)
  • *
  • Posts: 55943
  • Rating: +3154/-232
  • CodeWalrus founder & retired Omnimaga founder
    • View Profile
    • Dream of Omnimaga Music
Re: Choice for TI-83+/84+
« Reply #65 on: January 20, 2011, 10:14:40 pm »
Note you should probably also ask in the BASIC sub-forum, in case helpers won't see this. :P

Welcome back by the way.

What do you need help with, by the way?

Offline adamac16

  • LV4 Regular (Next: 200)
  • ****
  • Posts: 141
  • Rating: +2/-0
    • View Profile
Re: Choice for TI-83+/84+
« Reply #66 on: February 16, 2011, 06:26:03 pm »
Alrighty then. I have successfully finished Choice Endurance 1. Now to continue work on Choice Endurance 2 for TI-86. Woo!

Offline DJ Omnimaga

  • Clacualters are teh gr33t
  • CoT Emeritus
  • LV15 Omnimagician (Next: --)
  • *
  • Posts: 55943
  • Rating: +3154/-232
  • CodeWalrus founder & retired Omnimaga founder
    • View Profile
    • Dream of Omnimaga Music
Re: Choice for TI-83+/84+
« Reply #67 on: February 16, 2011, 06:26:38 pm »
Aah cool to hear. Will there be a TI-83+ version of CE2 btw? I own a TI-86 but some people might not.

Offline adamac16

  • LV4 Regular (Next: 200)
  • ****
  • Posts: 141
  • Rating: +2/-0
    • View Profile
Re: Choice for TI-83+/84+
« Reply #68 on: February 16, 2011, 06:29:10 pm »
Eh...Possibly. I might try to make it too. It'll be my first multiple calc game. (or whatever its called)

BTW, i dont have a TI-83+ anymore. Had to return it. But ill still make it.
« Last Edit: February 16, 2011, 06:30:11 pm by adamac16 »

Offline DJ Omnimaga

  • Clacualters are teh gr33t
  • CoT Emeritus
  • LV15 Omnimagician (Next: --)
  • *
  • Posts: 55943
  • Rating: +3154/-232
  • CodeWalrus founder & retired Omnimaga founder
    • View Profile
    • Dream of Omnimaga Music
Re: Choice for TI-83+/84+
« Reply #69 on: February 18, 2011, 09:44:54 pm »
Oh sorry to hear. :( Do you plan to get one again eventually? That said, the 86 is one awesome calc. It just have a much smaller userbase, especially since 2003.

Offline adamac16

  • LV4 Regular (Next: 200)
  • ****
  • Posts: 141
  • Rating: +2/-0
    • View Profile
Re: Choice for TI-83+/84+
« Reply #70 on: February 27, 2011, 04:29:22 pm »
As for the TI-83+, I dont know.

On another note, Im done with Choice Endurance 1, about done with the TI-83+/84+ version of Choice Endurance 2 (just gotta change names), and plan on making a Choice Endurance 3.

Offline DJ Omnimaga

  • Clacualters are teh gr33t
  • CoT Emeritus
  • LV15 Omnimagician (Next: --)
  • *
  • Posts: 55943
  • Rating: +3154/-232
  • CodeWalrus founder & retired Omnimaga founder
    • View Profile
    • Dream of Omnimaga Music
Re: Choice for TI-83+/84+
« Reply #71 on: February 28, 2011, 08:37:24 pm »
I see. That said, good to hear the CE1/2 games are done or close. Good luck!

Offline adamac16

  • LV4 Regular (Next: 200)
  • ****
  • Posts: 141
  • Rating: +2/-0
    • View Profile
Re: Choice for TI-83+/84+
« Reply #72 on: March 21, 2011, 04:55:44 pm »
Progress of current projects:
Choice Endurance 1 (Finished)
Choice Endurance 2 (TI-83+/84+ version-Finished/TI-86 version- aside until finished with TI-83+/84+ version of CE 3)
Choice Endurance 3 (TI-83+/84+ version-names in thought/TI-86 version- aside until finished with TI-86 version of CE 2)
David's Epic Journey (Aside until i learn how to make (possibly after CE 3))

Offline DJ Omnimaga

  • Clacualters are teh gr33t
  • CoT Emeritus
  • LV15 Omnimagician (Next: --)
  • *
  • Posts: 55943
  • Rating: +3154/-232
  • CodeWalrus founder & retired Omnimaga founder
    • View Profile
    • Dream of Omnimaga Music
Re: Choice for TI-83+/84+
« Reply #73 on: March 23, 2011, 01:38:04 pm »
I'M glad to hear, and also welcome back. :D

Offline adamac16

  • LV4 Regular (Next: 200)
  • ****
  • Posts: 141
  • Rating: +2/-0
    • View Profile
Re: Choice for TI-83+/84+
« Reply #74 on: March 23, 2011, 04:33:34 pm »
Thank you DJ_O. It's good to be back.

New Progress:
Choice Endurance 2: (TI-83+/84+ version-- (Done)(TI-86 version- Aside until done with CE 3 for TI-83+/84+)
Choice Endurance 3: (TI-83+/84+ version-- (Code-wise Done (Just naming people)
David's Epic Journey: (Will learn how to make after CE 3)