http://learn.cemetech.net/index.php?action=history&feed=atom&title=TI-BASIC%3ACustom_Menu_Single_Page
TI-BASIC:Custom Menu Single Page - Revision history
2026-04-17T18:55:22Z
Revision history for this page on the wiki
MediaWiki 1.43.3
http://learn.cemetech.net/index.php?title=TI-BASIC:Custom_Menu_Single_Page&diff=1108&oldid=prev
Maintenance script: Initial automated import
2016-02-24T18:35:00Z
<p>Initial automated import</p>
<p><b>New page</b></p><div>Simple homescreen menu without using the menu( command.<br />
<br />
ClrHome<br />
Disp ">OPTION 1"," OPTION 2"," OPTION 3 // note the spaces before OPTION 2 and OPTION 3<br />
1->A<br />
Repeat Ans=105<br />
If Ans<br />
Output(A,1," // one space<br />
min(3,max(1,A+sum(List(Ans={25,34->A // the List has an implied delta sign (triangle) before it.<br />
Output(A,1,"><br />
getKey<br />
End<br />
If A=1<br />
Disp "OPTION 1 ACTION<br />
If A=2<br />
Disp "OPTION 2 ACTION<br />
If A=3<br />
"OPTION 3 ACTION<br />
<br />
Simple graphscreen menu.<br />
<br />
ClrDraw<br />
Horizontal Ymin<br />
Horizontal Ymax<br />
Vertical Xmax<br />
Vertical Xmin<br />
Text(-1,3,35,"MENU<br />
Text(20,25,">OPTION 1<br />
Text(26,29,"OPTION 2<br />
Text(32,29,"OPTION 3<br />
20->A<br />
Repeat Ans=105<br />
If Ans<br />
Text(A,25," // Four spaces<br />
min(32,max(20,Ans+6sum(List(Ans={25,34->A // The "List" has an implied delta (little triangle) before it.<br />
Text(A,25,"><br />
getKey<br />
End<br />
If A=20<br />
Disp "OPTION 1 ACTION<br />
If A=26<br />
Disp "OPTION 2 ACTION<br />
If A=32<br />
"OPTION 3 ACTION<br />
<br />
You can adjust the Text( values to determine what spacing you would like.[[Category:TI-BASIC]]<br />
[[Category:TIBD]]</div>
Maintenance script