Author Topic: My clock PRGM for TI-68k [Feedback Appreciated]  (Read 2060 times)

0 Members and 1 Guest are viewing this topic.

Izder456

• LV0 Newcomer (Next: 5)
• Posts: 2
• Rating: +0/-0
My clock PRGM for TI-68k [Feedback Appreciated]
« on: March 13, 2019, 05:47:30 pm »
In the https://www.cemetech.net/forum/viewtopic.php?t=15381 (original post) i tried to convert this code to Ti-84/83 BASIC but failed miserably. During posting this forum topic I was locked out of this account I am posting that with, so the user redsn0w is me.

anyways here's the code:
Code: [Select]
clock()Prgm//Setup CodeStoGDB aClrDrawClrIOClrHomeFnOffsetGraph(“axes”,”off”)//Set Window1.3->xmax1.3->ymax⁻1.3->xmin⁻1.3->yminZoomSqrsetMode(“Angle”,”RADIAN”)//Draw Clock BaseCircle 0,0,1PtText “12”,⁻.15,1.2PtText “6”,⁻.08,⁻1.05PtText “9”,⁻1.2,.08PtText “3”,1.05,.08//Draw 3 hour,5 minute, and 1 minute tick marksFor b,0,60*π/30,π/30 Line .925*cos(b),.925*sin(b),cos(b),sin(b)EndForFor b,0,12*π/6,π/6 Line .85*cos(b),.85*sin(b),cos(b),sin(b)EndForFor b,0,4*π/2,π/2 Line .8*cos(b),.8*sin(b),cos(b),sin(b)EndFor//Repeats until a key is pressedWhile getKey()=0 //Split time List Var into two INT vars getTime()->l1 l1[1]->h l1[2]->m //Draw and erase hands Line 0,0,.5*sin((h-1)*π/6),.5*cos((h-1)*π/6),0 Line 0,0,.5*sin(h*π/6),.5*cos(h*π/6),1 Line 0,0,.7*sin((h-1)*π/30),.7*cos((h-1)*π/30),0 Line 0,0,.7*sin(h*π/30),.7*cos(h*π/30),1EndWhileFnOnRclGDB aEndPrgm
this is also on tibasicdev, http://tibasicdev.wikidot.com/forum/t-10610363/looking-for-beta-testers-clock-program-for-68k-in-basic
a whole twelve lines!

Eeems

• Mr. Dictator
• LV13 Extreme Addict (Next: 9001)
• Posts: 6169
• Rating: +318/-36
• C'est la vie
Re: My clock PRGM for TI-68k [Feedback Appreciated]
« Reply #1 on: March 13, 2019, 06:05:09 pm »
During posting this forum topic I was locked out of this account I am posting that with, so the user redsn0w is me.
There is no user registered with the name "redsn0w". If you would like your display name changed, please send me a private message.

All that aside, what was the issue you were running into when you attempted to port this to TI-83 Basic?
/e

Izder456

• LV0 Newcomer (Next: 5)
• Posts: 2
• Rating: +0/-0
Re: My clock PRGM for TI-68k [Feedback Appreciated]
« Reply #2 on: December 17, 2019, 03:43:08 pm »
resolved on original topic.
a whole twelve lines!