Opis funkcji XIO sterownika zegara Z: (Z.SYS) z przykładami
Urządzenia takie jak U1MB, SIDE2 czy IDE+2.0 mają na pokładzie zegary czasu rzeczywistego. W języku Turbo Basic XL można z nich skorzystać poprzez sterownik urządzenia Z:, a tenże można załadować albo z poziomu BIOSU urządzenia, albo uruchamiając z linii poleceń systemu sterownik Z.SYS. Owszem, Turbo Basic XL posiada swój czasomierz TIME$, lecz ten po pierwsze trzeba wstępnie ustawiać, gdyż po każdym uruchomieniu języka przyjmuje wartość „000000”, a po drugie z zegarem nie ma wiele wspólnego, co łatwo sprawdzić porównując wskazania z dowolnym stoperem po kilku minutach pracy.
Kilka funkcji XIO jest ciekawych, mogą posłużyć do obsługi zegara i datownika. Obie informacje można wykorzystać np. do określenia wersji tworzonego pliku, etc.
Niepełny opis funkcji:
XIO 32, odczyt czasu, sformatowany: GG:MM:SS
10 DIM A$(16)
20 OPEN #1,4,0,”Z:”
30 XIO 32,#1,4,0,”Z:”:INPUT #1;A$: ? A$
40 CLOSE #1
XIO 33, odczyt czasu, niesformatowany:
10 OPEN #1,4,0,”Z:”
20 XIO 33,#1,4,0,”Z:”
30 GET #1,H,M,S:? H,M,S
40 CLOSE #1
XIO 34, odczyt daty, sformatowany: dzień_tygodnia DD-MM-RR
10 DIM A$(16)
20 OPEN #1,4,0,”Z:”
30 XIO 34,#1,4,0,”Z:”:INPUT #1;A$: ? A$
40 CLOSE #1
XIO 35, odczyt daty, niesformatowany:
10 OPEN #1,4,0,”Z:”
20 XIO 35,#1,4,0,”Z:”: GET #1,D,M,R: ? D, M, R
30 CLOSE #1
XIO 36, ustawianie czasu:
10 OPEN #1,8,0,”Z:”
20 XIO 36,#1,8,0,”Z:”
30 PUT #1,H:PUT #1,M:PUT #1,S
35 CLOSE #1
XIO 37, ustawianie daty:
10 OPEN #1,8,0,”Z:”
20 XIO 37,#1,0,0,”Z:”
30 PUT #1,D:PUT #1,M:PUT #1,R
40 CLOSE #1
XIO 38, TD display line enable (TD ON)
XIO 39, TD display line disable (TD OFF)