Synchronize Time with your NADS: Difference between revisions

From Bitchin100 DocGarden
Jump to navigationJump to search
No edit summary
No edit summary
Line 2: Line 2:


Note, you will have to set the DAY$ separately since this code doesn't do that calculation.
Note, you will have to set the DAY$ separately since this code doesn't do that calculation.
The program appears below, formatted for easy type-in on the TRS-80 Model 100 or Tandy 102.


<pre>
<pre>

Revision as of 22:10, 11 January 2009

This program will synchronize your time and date with NADSBox.

Note, you will have to set the DAY$ separately since this code doesn't do that calculation.

The program appears below, formatted for easy type-in on the TRS-80 Model 100 or Tandy 102. 

1 MAXFILES=2:DEFSTRA-F:F="COM:98N1E":OPE
NFFOROUTPUTAS1:OPENFFORINPUTAS2:E=CHR$(5
):C=CHR$(13):?#1,E;"time";C;E;"date";C;:
INPUT#2,A:A=STR$(VAL(A)+(RIGHT$(A,1)="p"
AND12))+RIGHT$(A,7):MID$(A,1)="0":TIME$=
MID$(A,LEN(A)-8,8)
2 INPUT#2,A:MID$(A,1)="0":L=LEN(A)-9:DAT
E$=MID$(A,L,2)+"/"+MID$(A,3+L,2)+"/"_RIG
HT$(A,2)
Retrieved from "https://bitchin100.com/wiki/index.php?title=Synchronize_Time_with_your_NADS&oldid=822"