Jump to content

Photo

How do I access the KMK-IDE2's RT-clock?


No replies to this topic

#1 atarixle OFFLINE  

atarixle

    Moonsweeper

  • 256 posts
  • Location:Germany

Posted Sun May 6, 2012 2:03 PM

... without using a driver?

on emulators (emulating the classic R-Time8) I use the following code in Turbo-BASIC:

800 PROC SET_RTIME8
805   ? "Stelle die Uhrzeit ";
810   RT=$D5B8
820   T$="000000"
830   POKE RT,%0:S=PEEK(RT)*10+PEEK(RT)
831   POKE RT,%1:M=PEEK(RT)*10+PEEK(RT)
832   POKE RT,%2:H=PEEK(RT)*10+PEEK(RT)
840   IF H<10:T$(%2,%2)=STR$(H):ELSE :T$(%1,%2)=STR$(H):ENDIF
841   IF M<10:T$(4,4)=STR$(M):ELSE :T$(%3,4)=STR$(M):ENDIF
842   IF S<10:T$(6,6)=STR$(S):ELSE :T$(5,6)=STR$(S):ENDIF
850   TRAP 860:TIME$= T$:TRAP 40000:? "auf ";T$(%1,%2);":";T$(%3,4);":";T$(5,6):GOTO 899
860   ? "Fehlgeschlagen"
899 ENDPROC

How do I do the same with the KMK-IDE-Hardware?




0 user(s) are browsing this forum

0 members, 0 guests, 0 anonymous users