jeroen@plato.phil.ruu.nl (Jeroen Scheerder) (10/29/90)
TIME: a small and convenient time- and datesetting program.
Features: - Set date and time with cursor keys (small number of keystrokes);
- Accept only valid dates and times (leapyears included);
- 'Remember' date\time by changing program's date\timestamp;
- Restore date and time after resets;
- Less than 2 kB in size.
Extras: - Selects nonblinking TOS-cursor;
- Resets _shell_p (the command shell pointer);
- Selects EPSON printer for screendumps;
- Selects 60 Hz refresh rate for color monitors.
The shown values are changed with the cursor keys, set with the Return key.
Since the program is really tiny I have uuencoded it and enclosed it in this
posting. If you want the 'manual' or the source too: I have posted them to
atari.archive.
I am very interested in your reactions, bug reports and wishes.
I can be reached: - by email: jeroen@phil.ruu.nl
In case of a bug report please mention the circumstances the bug
occurred: your memory configuration, TOS version, monitor type,
disk type, other AUTO programs, accessories etc.
Hoping you enjoy this program,
Jeroen. (jeroen@phil.ruu.nl)
begin 644 TIME.PRG
M8!H :2 0 ! H $ "\*+PLD;P ,1_D ;8)HH@
M*@ ,T*H %-"J !S0O 0 G0/_\(@ @2D) 3KH%^$ZZ Q.N@6N)E\D7TYU
M2.<8.D_O__"1R$ZZ!>XF $)X!$A"N 3V($-.N@7>0D%P TZZ!@!P!$ZZ!AI%
M[P ,< )!^0 !L).N@7,-@!M%$)!($I.N@60/U( !C]J ( !& (+WP4(0
M 1'[P (3KH%U": L+Q@ 9PBPKP $9 "H":O 1-^0 !I)![@ ,3KH%
M1$($2>\ F 6(@2TZZ K).N@3V<A#BH+!\ $MG*&X0D'P '&<:D'P +&=,
M8 ^I!\ $UG "F5T!G9F .IX 6 .0P$W()XFC ? !_.( T$^I*Q'P
M#SZ"(DQ!UW ?P%-R_TZZ ]0"4__@P'P 'X%38 E# 3<@GB:,!\ '\X@"!,
M,!/J2,!\ ]R 4ZZ V8"4_X?P'P #^M(@5-@*# 3<@GB:,!\ '\X@"!,,!/J
M2,!\ ]R_TZZ SP"4_X?P'P #^M(@5,P% )3 ?_ ? !_X4CC2(%38$PP$W()
MXFC ? !_.( T$^I*Q'P #SZ"(DQ!UW ?P%-R 4ZZ SX"4__@P'P 'X%3,!0"
M4P'_P'P ?^%(XTB!4S 7 E/^'\!\ _K2(%3,!-R">)HP'P ?\!\ -G!'0<
M8 )T'1U" $P$^I(P'P #U- 0D$2-@ =!_$4[)"9 )@!'(?PE,"4__@PGP
M'X-32@1G /Z<0@1@ $$0>L DZZ ?A.N@.(<A#BH+!\ $MG*&X0D'P '&<:
MD'P +&="8 W)!\ $UG "P5T!G9& ,QX 6 ,9R_S K )T"^1HP'P
M'TZZ N(":P?_ + ? ?X4CG2(%K )@ ">,"L G(+XFC ? ?.( @3# K
M +J2,!\ #]R 4ZZ LP":_@? + ? _ZTB!:P "8# P*P "<@OB:,!\ !\X
M@"!,,"L NI(P'P /W+_3KH"F@)K^!\ L!\ #_K2(%K (P% )K!_\ L!\
M !_A2.=(@6L F D<@$P*P "= OD:,!\ !].N@)" FL'_P "P'P '^%(YTB!
M:P "2@1G /[Z(!-.N@,*0>X #DZZ K@P$TZZ IHP*P "3KH"GDI#;1@TJP "
M-5, G(!, ,@2DZZ J P TZZ EY/[P 03-]<&$YU+PI/[__P0_D :C1==P
M#A394<C__# 0<@GB:,!\ '_0? >\=!_$4'( ,@*"_ *TR\ !'( ,@*"_ *
M2$'3+P %-!#J2L1\ ]R #("@OP "M,O =R #("@OP "DA!TR\ "#0 2,*%
M_ /HU2\ "C( 2,&#_ /H2$%(P8/\ &33+P +- !(PH7\ &1(0DC"A?P "M4O
M PR $C!@_P "DA!TR\ #4'73KH!V$_O ! D7TYU+PI/[__P0_D :R1==P
M#Q394<C__# 0<@OB:,!\ !]T #0 A/P "M4O 5R #( @OP "DA!TR\ !C00
MZDK$? _< P H#\ K1+P (<@ R H+\ I(0=,O E!UTZZ 6Y/[P 0)%].
M=;)\ %F!%) 3G5*0&,&<O_20& "0D$P 4YU+P,O"C8 )$BR? !9ABP? ,
M9 120V D=@%R 3 23KK_QC2 8!:V? !8P130V ,=@QR_S 23KK_KC2 , ,D
M7R8?3G5(YQ X-@ F2"A)1?D :2LGP 68B<O_24$)"%#(0 +!"9 120V Z
M=@%R 2!,,!-.NO^*-H!@*K9\ %C!%-#8" ,4P "909P_M!38 )P"T)#%C(
M '+_($PP$TZZ_UXV@# #3-\<"$YULGP 68.L'P %V0$4D!.=4) 3G5*0&,$
M4T!.=7 73G4O R\*-@ D2+)\ %F&+!\ #MD!%)#8")"0W(!,!).NO_ -(!@
M%$I#8P130V ,=CMR_S 23KK_JC2 , ,D7R8?3G4_/ (3D%43TYU/P _/ ^
M3D%83TYU/P _/ !,3D%83TYU/P _/ K3D%83TYU/P _/ M3D%83TYU+P@_
M/ )3D%<3TYU/P$_ "\(/SP 5TY!3^\ "DYU+P$O"#\ /SP 2DY!3^\ #$YU
M+P@_/ @3D%<3TYU/P O"#\\ #U.05!/3G4O"B\ /SP %DY.7$\D7TYU+PH_
M 3\ /SP %4Y.7$\D7TYU+PH_/ 73DY43R1?3G4O"C\ /SP (4Y.6$\D7TYU
M'S\?'A\>'Q\>'QX?&PP;10 ;62Q#,# M,# M,# P, @&UDL0R P,#HP,#HP
?," 7$%55$]<5$E-12Y04D< IH2 $!V+3, @
endsteve@thelake.mn.org (Steve Yelvington) (10/30/90)
[In article <893@accucx.cc.ruu.nl>,
jeroen@plato.phil.ruu.nl (Jeroen Scheerder) writes ... ]
> TIME: a small and convenient time- and datesetting program.
...
> Extras: - Selects nonblinking TOS-cursor;
> - Resets _shell_p (the command shell pointer);
^^^^^^^^^^^^^^^
|
To what value? And why?
(I don't have any desire to blow away my shell pointer.)
--
Steve Yelvington
Internet/domain mail: steve@thelake.mn.org
UUCP path: plains!umn-cs!thelake!steve
Snail: Box 38, Marine on St. Croix, MN 55047 USA jeroen@plato.phil.ruu.nl (Jeroen Scheerder) (10/30/90)
In article <A1665275229@thelake.mn.org>, steve@thelake.mn.org (Steve Yelvington)bin/ article <893@accucx.cc.ruu.nl>, |> jeroen@plato.phil.ruu.nl (Jeroen Scheerder) writes ... ] |> |>> TIME: a small and convenient time- and datesetting program. |> |>... |> |>> Extras: - Selects nonblinking TOS-cursor; |>> - Resets _shell_p (the command shell pointer); |> ^^^^^^^^^^^^^^^ |> | |>To what value? And why? |> |>(I don't have any desire to blow away my shell pointer.) Never used Gemini? Well, I'll explain. Included with Gemini there is a program that resets the shell pointer to 0L, which should be put in the auto folder. If you perform a soft reset after some shell has set _shell_p, _shell_p is NOT cleared, so programs using it may think the shell is there, when in fact it's no#18k have reset the ST in the meanwhile!). You may get nasty system crashes if a program tries to jump through _shell_p to an adress where once some shell input routine was, but is no more. So, concluding, it's just fixing a TOS shortcoming. I have included it in the program to lessen the number of progs in the auto folder, as I think the only use for a timesetting program like mine is from the auto folder. If you really don't want _shell_p reset when booting the ST, get the sources from atari.archive or mail me.