Would it be at all possible for you to post the code in a code box? It would be much appreciated. I don’t have a computer and am unable to download the file on my iPad.
StoreGDB 0
AxesOff
ZStandard
66→Xmin
66→Xmax
41→Ymin
41→Ymax
0→K
" "→Str0
getTime{30,6,6}°→L₁
L₁→L₂
ClrDraw
1→dim(⌊CJ96)
If ⌊CJ96(1)≠21618
Then
seq(θ°,θ,0,354,6)→L₃
For(θ,1,60)
If remainder(θ-1,5)=0
Then
Line(40.5cos(L₃(θ)),40.5sin(L₃(θ)),32.5cos(L₃(θ)),32.5sin(L₃(θ)),1,BLACK,1)
Else
Line(40.5cos(L₃(θ)),40.5sin(L₃(θ)),36.5cos(L₃(θ)),36.5sin(L₃(θ)),1,BLACK,1)
End
End
Circle(0,0,41,BLACK,1)
21618→⌊CJ96(1)
Else
RecallPic 0
End
StorePic 0
While (K=105)=0
getKey→K
getTime{30,6,6}°→L₁
(L₁=L₂)→L₃
If not(L₃(3))
Then
Line(0,0,30sin(L₂(3)),30cos(L₂(3)),0,BLACK,1)
L₁(3)→L₂(3)
End
If not(L₃(2))
Then
Line(22sin(L₂(2)-3°),22cos(L₂(2)-3°),30sin(L₂(2)),30cos(L₂(2)),0,BLACK,1)
Line(0,0,22sin(L₂(2)-3°),22cos(L₂(2)-3°),0,BLACK,1)
Line(0,0,22sin(L₂(2)+3°),22cos(L₂(2)+3°),0,BLACK,1)
Line(22sin(L₂(2)+3°),22cos(L₂(2)+3°),30sin(L₂(2)),30cos(L₂(2)),0,BLACK,1)
L₁(2)→L₂(2)
End
If not(L₃(1))
Then
Line(14sin(L₂(1)-6°),14cos(L₂(1)-6°),22sin(L₂(1)),22cos(L₂(1)),0,BLACK,1)
Line(0,0,14sin(L₂(1)-6°),14cos(L₂(1)-6°),0,BLACK,1)
Line(0,0,14sin(L₂(1)+6°),14cos(L₂(1)+6°),0,BLACK,1)
Line(14sin(L₂(1)+6°),14cos(L₂(1)+6°),22sin(L₂(1)),22cos(L₂(1)),0,BLACK,1)
L₁(1)→L₂(1)
End
"Second Hand
Line(0,0,30sin(L₁(3)),30cos(L₁(3)),1,RED,1)
"Minute Hand
Line(22sin(L₁(2)-3°),22cos(L₁(2)-3°),30sin(L₁(2)),30cos(L₁(2)),1,BLACK,1)
Line(0,0,22sin(L₁(2)-3°),22cos(L₁(2)-3°),1,BLACK,1)
Line(0,0,22sin(L₁(2)+3°),22cos(L₁(2)+3°),1,BLACK,1)
Line(22sin(L₁(2)+3°),22cos(L₁(2)+3°),30sin(L₁(2)),30cos(L₁(2)),1,BLACK,1)
"Hour Hand
Line(14sin(L₁(1)-6°),14cos(L₁(1)-6°),22sin(L₁(1)),22cos(L₁(1)),1,BLACK,1)
Line(0,0,14sin(L₁(1)-6°),14cos(L₁(1)-6°),1,BLACK,1)
Line(0,0,14sin(L₁(1)+6°),14cos(L₁(1)+6°),1,BLACK,1)
Line(14sin(L₁(1)+6°),14cos(L₁(1)+6°),22sin(L₁(1)),22cos(L₁(1)),1,BLACK,1)
Pt-On(0,0,BLACK,1)
End
ClrDraw
RecallGDB 0
Can this be done on the 84+?
Hewwo, my name is Achak Claw. I was formerly BioHazard.
I think so, but it would be very tricky. Here's why:
1: The dimensions of the graph screen on color calculators are very different from those on monochrome calculators. coltonj96 did all of his drawings using trigonometric functions, so you'd have to alter those calculations considerably.
2: He also uses the getTime command in one instance in the code, so you will have to find an alternative method of obtaining the current time.
That said, I say go for it! It'd be a fun project and a great learning experience too.
I'll get to it! Once done, I will post the code for others!
EDIT: What would happen if I programmed the same things onto an emulator?Hewwo, my name is Achak Claw. I was formerly BioHazard.
There's a project on Cemetech which will be able to take CE code and translate it to monochrome code. I can't find the specific thread, but if you search around or ask in SAX you could probably get an idea of how to translate the code. As for the timer, there are hundreds of timer programs that should fit your needs, and you could take the snippet from the source code, provided that you credit the creator.
Have fun doing this if you embark on this journey! I've always wanted to do something similar, but life just happens and I need to focus on important things (school).
:)
Let the Journey begin…
Hewwo, my name is Achak Claw. I was formerly BioHazard.