Cheese Quest part 1

We're glad you came by, but you might find what you're looking for elsewhere. TI-Basic Developer is not the site it once was. While its information on commands and other calculator features remains almost second-to-none, its forum, archives, and even hosting service, Wikidot, have been decaying for years. The calculator community would love to see what you're working on, or help you in your next coding adventure, but TI-Basic Developer is no longer the place to do it. Instead, you should head over to Cemetech (primarily American) or TI-Planet (primarily international). Both are active, well-established forums with their own archives, chatrooms, reference material, and abundant coding tools and resources. We'll see you there, we hope.

You have not uploaded your program! Please edit the page to upload your program.

Author: Robert Black Download: README.txtNo Download Available Version: 1.0 Compatibility: TI-83/84/+/SE File Size: 0 Bytes Genre: Arcade Graphics Platform Puzzle RPG Strategy Sports Casino Board Utility Misc Rating:

Cheese Quest is a game where someone kills all the cows on the world except 2, which he captures, so he can get rich off the only cheese supply in the world. Part 1 is crossing the dangerous terrain to reach his fortress. Cheese Quest part 2 is coming soon. EDIT: Part 2 is here! Press up to jump. There is a glitch where the platforms turn invisible when they reach the left side of the screen… :ClrHome :{3,5,8,10,13}→⌊1 :{2,3,4,5,7}→⌊2 :7→Y :0→Z :0→W :0→B :0→V :Lbl AA :Z+1→Z :For(W,1,5 :⌊1(W)-1→⌊1(W) :End :ClrHome :For(W,1,5 :Output(⌊2(W),⌊1(W),"- :End :Output(Y,4,"* :getKey→K :For(W,1,5 :If ⌊1(W)=4 or ⌊1(W)=3 or ⌊1(W)=2 or ⌊1(W)=1 or ⌊1(W)=0 :Then :If ⌊2(W)=Y-1 :Then :If K=25 :Then :2→B :End :If not(K=25 :Then :0→B :End :End :End :Y+B→Y :If Y<1 :Then :Output(100,100,"P :End :If B>-1 :Then :B-1→B :End :If not(Z>99 :Goto AA :Disp "GOOD JOB!" :Disp "YOU FINISHED" :Pause "PART 1!"

What the community thinks:

CHEESE QUEST ERROR

Muhammad Fazl 30 Sep 2014 17:03

Hi. I was testing out Cheese Quest part 1 on my calculator and as soon as I ran the program, it would just say GOOD JOOB, YOU HAVE FINISHED PART 1. Please tell me what I should do and if this is a bug, please fix it.

Re: CHEESE QUEST ERROR

Robert Black 08 Oct 2014 19:10

I'm guessing you didn't place enough End statements somewhere…

Re: CHEESE QUEST ERROR

Muhammad Fazl 09 Oct 2014 13:06

Is there any other possible solution? I tried putting more ends but it still wouldn't' work and my brother also reported having the same problem on his calculator.

Re: CHEESE QUEST ERROR

Robert Black 09 Oct 2014 13:37

I changed the coding a bit (just the areas that had While loops), hopefully it works now.

Re: CHEESE QUEST ERROR

Robert Black 14 Oct 2014 13:23

Please comment again if it works…

JFed (guest) 22 Oct 2014 03:10

I have the same problem. If you edited the code on this site, then it still has the bug.

Fixed?

Robert Black 27 Oct 2014 13:35

I don't know why it wasn't working for you, it worked with me…
I deleted "While not(Z=100" and replaced it with "Lbl AA", and I replaced the last End statement with
:If not(Z>99
:Goto AA
but BEFORE YOU DO THIS, try adding another "End" before the You Win message, and comment if that works instead. If the first thing doesn't work either, add an End statement at the last line of the program.
Sorry for the trouble.

Last edited on 28 Oct 2014 19:03 by Robert Black Show more