http://learn.cemetech.net/index.php?action=history&feed=atom&title=TI-BASIC%3ALight_Cycles 2026-05-28T15:35:53Z Revision history for this page on the wiki MediaWiki 1.43.3 http://learn.cemetech.net/index.php?title=TI-BASIC:Light_Cycles&diff=647&oldid=prev 2016-02-24T18:11:37Z

<p>Initial automated import</p> <p><b>New page</b></p><div>If you remember the old movie, &#039;&#039;Tron&#039;&#039;, you might remember the premise of this game. You control a cycle (or in this case, a pixel) that moves in a direction until you change the direction. It leaves a path, and if you hit the path, or the wall, you lose. The trick here is that you must out last your opponent: an AI. This version of Light Cycles for the calculator utilizes a simple AI system that makes it kind of intelligent. Please try to understand the code and learn from it.<br /> <br /> == The Code ==<br /> <br /> :Full<br /> :FnOff<br /> :AxesOff<br /> :0→Xmin:1→ΔX<br /> :0→Ymin:1→ΔY<br /> :ClrDraw<br /> :Vertical Xmin<br /> :Vertical Xmax<br /> :Horizontal Ymin<br /> :Horizontal Ymax<br /> :60→A:92→B<br /> :2→C:2→D:25→G<br /> :Pxl-On(A,B<br /> :Pxl-On(C,D<br /> :Text(-1,28,31,&quot;READY?<br /> :Pause<br /> :For(E,26,36<br /> :Line(29,E,67,E,0<br /> :End<br /> :Repeat G=45 or not(pxl-Test(A,B) and pxl-Test(C,D<br /> :getKey<br /> :If Ans<br /> :Ans→G<br /> :A+(G=34)-(G=25→A<br /> :B+(G=26)-(G=24→B<br /> :1+pxl-Test(C+1,D<br /> :Ans+(Ans=2 and pxl-Test(C,D-1<br /> :Ans+(Ans=3 and pxl-Test(C-1,D→F<br /> :C+(Ans=1)-(Ans=3→C<br /> :D+(F=4)-(F=2→D<br /> :Pxl-Change(A,B<br /> :Pxl-Change(C,D<br /> :End[[Category:TI-BASIC]]<br /> [[Category:TIBD]]</div>

Maintenance script