keyMini
* S*BASIC Date routines
*
* Released under the GNU GENERAL PUBLIC LICENSE, Version 2, June 1991
*
* Functional code by Laurence Reeves 1994(?)+
*
* Re-packaged by pjwitte 2oo6
*
* V0.01 September 27th 2006
*
* Compatible with QDOS and Minerva. Minerva version
*
section code
xref YEAR,MONTH,DAY,WEEKDAY
include dev8_keys_qlv
include dev8_mac_proc
lea.l key,a1
move.w sb.inipr,a2
jmp (a2)
*
key
proc_stt
proc_end
proc_stt
proc_def YEAR%,YEAR
proc_def MONTH%,MONTH
proc_def DAY%,DAY
proc_def WEEKDAY%,WEEKDAY
proc_end
*
end
Back to Index
HTML generated by the amazing asm2htm !
2006 Oct 01 00:37:11