Five Minute Programs

[cjgone]

Sad, I can't understand these crazy optimizations. In fact, I don't get how to make snake with no lists. =(

[Weregoose]

In Button Masher, I would change that Repeat 20=randInt(10,30 to While int(21rand. ;)

Since "geometric mean" is a popular search phrase that leads people to my website, I've been needing an excuse to post one.

This works for lists of positive reals only: 10^(mean(log(Ans

[nitacku]

[calc84maniac]

I have made one without lists before...

[N.cruz]

[darkstone knight]

yep..

use uppercase letters

[mr. sir]

Well, when I have a list I need to type in over and over, it becomes kind of a pain. So I usually use the SetUpEditor function, run the program once, then the list will appear in the menu and I won't have to type the LKEY in over and over again: I can just use the name in the menu.

[TI-newb]

Nitacku, i have been playing the snake game and it's awsome! but is it possible to make it in a graph screen? for that would free up more room and make it easier to play. anyways your awsome!

another cool Five Minute Program would be a clock, i do not know if it is possible, but like, displaying an actual clock (circle, with the Hour hand, Minute hand and the seconds). but i do not know if that can be done in 5 minutes. but i'm just placing suggestions out there.

[SonicBoom95]

[quote name='TI-newb' post='131587' date='Feb 24 2009, 04:20 AM']Nitacku, i have been playing the snake game and it's awsome! but is it possible to make it in a graph screen? for that would free up more room and make it easier to play. anyways your awsome!

another cool Five Minute Program would be a clock, i do not know if it is possible, but like, displaying an actual clock (circle, with the Hour hand, Minute hand and the seconds). but i do not know if that can be done in 5 minutes. but i'm just placing suggestions out there.[/quote]

First question: Yes. Yes it can. I'm a bit on the time-pressed side, so I can't decipher nitacku's optimizations right now, to change the grid size and such. (Though if I had gotten any sleep last night, it might have helped. Darn you Touhou 10.) The change itself is a theoretically simple one. Just change the grid size, and change the place where the graphics are being placed. In fact, collision detection might become a LOT easier...in fact, I can see a way to entirely rewrite this with graph screen. <nerdity>We can make it better. Faster. Stronger.</nerdity>

Second question: a. Yes. b. No.

[TI-newb]

i have made a clock so far, and uhm, if u don't mind can u display the snake game on grids? cause im still like a beginner and do not know much.. im starting to learn about Lists and Strings

[nitacku]

Ok, here is the Snake game modified for the Graph screen.
The code is nearly identical to the Homescreen version.
The only differences between the two versions is the code I colored orange.

Snake [Graph Screen]
PlotsOff
AxesOff
GridOff
FnOff
ClrDraw
6→X
4→Y
0→Z
4.06→θ
SetUpEditor L1 //this is the list
{Ans,Ans,Ans→L1
26
Repeat max(Y+.01X=L1
If Ans=24 or Ans=26
Then
Ans-25→A
DelVar B
End
If Ans=34 or Ans=25
Then
int(.25(Ans-29→B
DelVar A
End
If Y+.01X=θ
Then
Z+1→Z
Repeat not(max(Ans=L1
randInt(0,9)+.01randInt(0,22
End
Ans→θ
Text(6int(Ans),400fPart(Ans),"+
augment(L1,{Y+.01X→L1
End
Text(6int(L1(1)),400fPart(L1(1)),"░░░ //3 spaces
∆List(cumSum(augment(L1,{Y+.01X→L1
Y+B
Ans-10((Ans>9)-(Ans<0→Y
X+A
Ans-23((Ans>22)-(Ans<0→X
Text(6Y,4X,"O
getKey
End
ClrHome
Disp "CRASHED!","SCORE:
Output(2,8,Z

It's actually possible to make this game go even faster now that it is on the Graph screen.
Instead of keeping track of all the snake links, only the first and last would need to be known.
Collisions would be detected by using the pxl-Test( command.
If you like, I can post that version as well :P

[TI-newb]

[quote name='TI-newb' post='131596' date='Feb 24 2009, 09:58 PM']i have made a clock so far, and uhm, if u don't mind can u display the snake game on grids? cause im still like a beginner and do not know much.. im starting to learn about Lists and Strings[/quote]


What i meant was, If u dont' mind can u display the snake game on 'Graphs' ?" i was uhm. tired xD but u still did it on graph ! that is cool, i can't wait till i try it out.

[nitacku]

Here is the code to create an analog clock for those of you who own a TI-84+/SE calc.

Analog Clock
ZStandard
ZSquare
FnOff
AxesOff
GridOff
PlotsOff
ClrDraw
Radian
DelVar X
DelVar Y
DelVar θ
SetUpEditor L1
Circle(0,0,10,{i //imaginary number i
Circle(0,0,9.3,{i //imaginary number i
Repeat getKey=45
πgetTime/30→L1 //pi * getTime (function only available on TI-84+/SE)
If θ≠Ans(3
Then
If Y≠Ans(2
Then
If .4X≠Ans(1
Then
Line(0,0,5sin(X),5cos(X),0
2.5Ans(1→X
End
Line(0,0,7sin(Y),7cos(Y),0
L1(2→Y
End
Line(0,0,8sin(θ),8cos(θ),0
L1(3→θ
Line(0,0,8sin(Ans),8cos(Ans
Line(0,0,7sin(Y),7cos(Y
Line(0,0,5sin(X),5cos(X
End
End
ClrDraw
ClrHome

[exponation]

Uhh... sorry for being confused... but whenever I attempt to run snake, it says there's a syntax error in the "(Ans,Ans,Ans->L1" line. the error occurs specifically on the comma between the second and third ans. can anyone help me out?

[darkstone knight]

its {, not (

[SonicBoom95]

Hey, Nitacku. I've been poring over how you could optimize the code on Snake, by only keeping track of the first and last positions of the snake. Trouble is, doing that seems to require keeping track of everything in the middle...so, it seems like it would be just a simple conditional swap from max(.....=L1) to something involving pxl-Test.

Am I wrong?

[Weregoose]

If you take a one-pixel-thin snake body that walks two pixels at a time, then there would only be one pixel to touch the end of the tail.

[Ed H]

Here is a snake program that uses no lists. I wrote this a while ago, and I'm not sure if this is the latest version. It's pretty playable; try it!

[TI-newb]

[nitacku]