The weird clock
09-25-2020, 01:51 PM (This post was last modified: 09-26-2020 07:11 AM by pinkman.)
Post: #1
 pinkman Senior Member Posts: 420 Joined: Mar 2018
The weird clock
It is not really a program, and it is not designed to be graphically perfect.
It’s just a way to use the TICKS function in a funny and simple way.

Steps to use:

0) Create a new program and paste the code below. Switch to RAD mode.

1) Set the time offset (will use Home variable T) with current time in HMS 12-hours format:
OFFSET(12°13′30″)

This sets the value to add to the number of ticks to obtain the current time.

2) Set the functions F1 to F4:
CLOCK

Warning! This will use F1, F2, F3, F4 of the Functions app. If they were storing previous values they will be lost without notification.

3) Launch the Function App and select equations F1 to F4 to be displayed in the Symbolic view.

4) Then open the Plot view and see your new weird clock! To refresh, quit the Plot view and come back again.
You don’t have to repeat steps 0 to 3 next time you need to know what time it is, simply press Plot.
Warning: I deny any responsibility in the event of a missed plane or train.

Enjoy!

Code:
 TIME(); EXPORT CLOCK() BEGIN  F1 :='√(1-X^2)';  F2 := −F1;  F3 := 'TAN((−TIME/12+1/4)*2*π)*X+√(X*(6-TIME))*1ᴇ−6';  F4 := 'TAN((−FP(TIME)+1/4)*2*π)*X+√(X*(.5-FP(TIME)))*1ᴇ−6'; END; EXPORT TIME() BEGIN  RETURN (TICKS/1000/3600+T) MOD 12; END; EXPORT OFFSET(HMS) BEGIN  T:=HMS→(HMS-(TICKS/(1000*3600))); END;

Thibault - not collector but in love with the few HP models I own - Also musician : http://walruspark.co
09-26-2020, 07:10 AM
Post: #2
 pinkman Senior Member Posts: 420 Joined: Mar 2018
RE: The weird clock
Here is the result.

Thibault - not collector but in love with the few HP models I own - Also musician : http://walruspark.co
 « Next Oldest | Next Newest »

User(s) browsing this thread: 1 Guest(s)