I put the game Beat Mania in my calc but whenever i play it the game doesn't work correctly . Specifically, After the intermission passes the notes do not show up on the screen.

Here's a copy of the Game's Source Code and Readme so you can better understand my problem.


Code:

:Lbl 5
:Menu("BEATMANIA83+ v.1","PLAY!",1,"OPTIONS",2
:Lbl 2
:ClrHome
:Input "NO. BARS: ",G
:G4?G
:Lbl 55
- :Disp "DIFFICULTY"
- :Input "(1-3):",N
+ :Disp "DIFFICULTY
+ :Input "(1-3:",N
:If N>3 or N<1
:Goto 55
:9-N?O
:ClrHome
:Goto 5
:Lbl 1
- :0?N:0?P:0?Q:0?R:0?L
- :Disp "","","","","","",""," IIIIIO"
+ :DelVar NDelVar PDelVar QDelVar RDelVar LDisp "","","","","","",""," IIIIIO
:{0,0,0,0,0,0,0,0}?L1
:For(S,1,G+8
:If S=G
:Then
- :int(randO)+7-O?V
+ :intrandO+7-O?V
:Else
- :0?V
- :End
- :V(V>0)?L1(8)
- :Disp ""
- :Output(1,1,"-"
- :Output(1,8,"-"
+ :DelVar VEnd
+ :V(V>0?L1(8
+ :Disp
+ :Output(1,"-
+ :Output(1,8,"-
:V?B
:If S=G+1
:Output(8,2,"IIIIIO
:If B=1 or B=3 or B=5
- :Output(8,B+1,"?"
+ :Output(8,B+1,"?
:If B=2 or B=4
:Output(8,B+1,"Z
:If B=6
- :Output(8,7,"X"
+ :Output(8,7,"X
:getKey?K
- :If K?0
+ :If not(K
:Then
- :If (K-10=L1(1) or K-99=L1(1))
+ :If (K-10=L1(1) or K-99=L1(1
:Then
:Output(1,12,"GREAT
- :.5?L1(1)
+ :.5?L1(1
:P+1?P
:End
:If (K-10=L1(2) or K-99=L1(2)) and L1(1)=0
:Then
- :0?L1(2)
+ :0?L1(2
:Output(1,12,"GOOD
:Q+1?Q
:End
:If K-10=N or K-99=N
:Then
- :0?N
- :Output(1,12,"BAD
+ :DelVar NOutput(1,12,"BAD
:L+1?L
:End
:End
- :If N?0
+ :If not(N
:Then
:Output(1,12,"POOR
:R+1?R
:End
- :If L1(1)=.5:0?L1(1)
- :L1(1)?N
+ :If L1(1)=.5:0?L1(1
+ :L1(1?N
:For(X,1,7
- :L1(X+1)?L1(X)
+ :L1(X+1?L1(X
:End
:End
:Output(2,2,"YOUR DJ SKILL:
:Output(3,1,"GREAT:
:Output(4,2,"GOOD:
:Output(5,3,"BAD:
:Output(6,2,"POOR:
:Output(1,12,"     
:Output(3,8,P
:Output(4,8,Q
:Output(5,8,L
:Output(6,8,R
- :100(2P+Q-3R)/(2(P+Q+R+L))?A
+ :100(2P+Q-3R)/(2(P+Q+R+L?A
:Output(3,12,"-----
:Output(4,12,"!   !
:Output(5,12,"-----
:If A=100
:Output(4,13,"AAA
:If A?100 and A=93
:Output(4,13,"A A
:If A<93 and A=80
:Output(4,14,"A
:If A<80 and A=60
:Output(4,14,"B
:If A<60 and A=40
:Output(4,14,"C
:If A<40 and A=0
:Output(4,14,"D
:If A<0
:Output(4,14,"E


Here is the readme

********Beatmania 83+******* (V.1 / 16DEC02)
for TI-83+ / by Taren Nauxen
*Programmed in TI-83+ BASIC*
****************************

Beatmania 83+ resembles the arcade hit Beatmania by Konami. You are a DJ, performing for a crowd cheering you on. Mix some awesome music with your five keys and scratch pad and become the world's greatest DJ!

OPTIONS:

No. bars: Number of measures you will perform. Each measure consists of four beats, and each of those beats can possibly require you to hit a key or use the scratch pad.
Difficulty: The density of beats. Choosing 1 will make it easy, and 3 will challenge you.

GAMEPLAY:

After the short intermission (the IIIIIO symbol scrolling up), a bombardment of characters will ensue. They consist of 0's (thetas) Z's, and X's.

Use the top row of keys (F1-F5) and the Enter button (scratch pad) to catch the symbols in the top row of the screen.

Thetas represent buttons F1, 3, and 5. Z's require you to press either F2 or F4. X's only appear on the far right, and are played with the enter button at the bottom of your calculator.

After your jam session is completed, another IIIIIO symbol will scroll up. When it gets to the top, you will receive a grade based on your performance. They range from AAA (all Great) to E (awful).
[AAA-AA-A-B-C-D-E]

Beatmania IIDX (7 keys) *possibly* coming soon.

************************************
Questions? Comments? Suggestions?
Email me: furusato@insightbb.com
************************************

LEGAL: BEATMNIA.8XP is (c) Taren Nauxen.
"Your DJ Skill: AAA"

I tried it. Fun game. What's the problem with it, again?

What I did was download the game from the ticalc.org author page (that's all you need to post when talking about a game you got from there that doesn't work), entered the in-game options, gave 8 and 1 as inputs, and then played a couple times. It worked fine for me both times. Now try the same thing.
I cannot get any notes to show up on mine
Even after repeating the steps I took to get mine in working order?
Yeah it blinks poor and nothingm shows up but the X
Try a RAM clear.
Why does your source code have all those diff markings in it?
idk
steelersfan1693 wrote:
idk
You don't know? Where did you get the source code from? Did you decompile it yourself? Did you use SourceCoder?
I copied it over from notepad
steelersfan1693 wrote:
I copied it over from notepad
Razz And where did notepad get it from? Was it in the zip file? If you typed the program in by hand on your calculator, be sure to omit every line that has a - (minus sign) at the beginning.
Sourcecoder
steelersfan1693 wrote:
Sourcecoder
That's fine, but just make sure you either type the source with every line except the plus-prefixed ones, or every line except the minus-prefixed ones, but not both.
I don't know it just doesn't work
change everything like

- :Output(1,12,"BAD

to

:Output(1,12,"BAD
steelersfan1693 wrote:
I don't know it just doesn't work
You're not really working with us here. Just put the program into SourceCoder, do NOT check "Optimize Source", and you'll have source without the + or -. I already told you how to fix this in my previous post, and you didn't listen:

"That's fine, but just make sure you either type the source with every line except the plus-prefixed ones, or every line except the minus-prefixed ones, but not both."
  
Register to Join the Conversation
Have your own thoughts to add to this or any other topic? Want to ask a question, offer a suggestion, share your own programs and projects, upload a file to the file archives, get help with calculator and computer programming, or simply chat with like-minded coders and tech and calculator enthusiasts via the site-wide AJAX SAX widget? Registration for a free Cemetech account only takes a minute.

» Go to Registration page
Page 1 of 1
» All times are UTC - 5 Hours
 
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum

 

Advertisement