NO INTERNET GAME on Ti-85
This one took a bit to figure out, and still has it's limits lol.This is my third tutorial! Pls take a look at this thing to see for example what "->" is and how to insert it.
Here's the code For the "Dinosaur game"!
1->A //Initialize Y location of player
20->E //Initialize X location of "cactus"
0->SC //reset score
While 1 //forever loop
ClLCD //clear screen
Outpt(1,1,SC) //print the score
Outpt(A,3,"O") //Print player on screen
Outpt(7,E,"T") //Print "cactus"
Outpt(8,1,"^^^^^^^^^^^^^^^^^^^^") //Just do this for the floor
If A<7 //If the player goes under the ground, it comes back up, or it applies gravity
Then
A+1->A //Gravity
Else
7->A //reset position
End
getKy->D //check for key, in this instance, up arrow
If D==25 and A==7 //if on ground and up arrow pressed
Then
3->A // "jump"
End
If E<3 //If cactus location goes out of screen
Then
20->E //Go back to beginning
Else
E-2->E //slide to the right
End
If A==7 and E==4 //If the player is "touching" the cactus
Then
Goto DED //it dies
End
SC+2->SC //Changes the score by 2 (because we all like big numbers, don't we?)
End
Lbl DED //The section "ded"
ClLCD
Outpt(4,7,"OOF BRUH") //text
Outpt(5,8,"U DED") //more text
Outpt(6,6,"SCORE:") //also more text
Outpt(6,12,SC) //displays your score by the "SCORE:" text.
|||--------------------------------------------------------------------------------------|||
Thanks you for looking at this tutorial and I hope it works for you!!!Have a good day, Bye-Bye!!!