From d4bd737e577d715103057a7c09fcb09663cd4f6e Mon Sep 17 00:00:00 2001 From: Lane Roathe Date: Thu, 18 Jul 2019 12:47:39 -0700 Subject: [PATCH] Initial Commit of LLUCE sources --- Config/CLOCK.S | 135 +++ Config/CLOCKS/CLK.IIC.SYS.S | 155 +++ Config/CLOCKS/CLOCKS.HDR.S | 54 + Config/CLOCKS/IIC.SYS.S | 213 ++++ Config/CLOCKS/IIGS.S | 170 +++ Config/CLOCKS/MAKE.CLOCKS.S | 40 + Config/CLOCKS/MOUNTAIN.S | 160 +++ Config/CLOCKS/NO.SLOT.S | 191 ++++ Config/CLOCKS/NULL.S | 147 +++ Config/CLOCKS/PRODOS.S | 144 +++ Config/CLOCKS/SERIALPRO.S | 135 +++ Config/CLOCKS/THUNDER.S | 133 +++ Config/CLOCKS/ULTRA.S | 153 +++ Config/CLOCKS/VERSA.S | 184 +++ Config/CMD.S | 36 + Config/DEFAULTS.S | 37 + Config/DISK.S | 361 ++++++ Config/EQUATES.S | 83 ++ Config/FILTER.S | 246 +++++ Config/GLOBALS.S | 78 ++ Config/INIT.S | 803 ++++++++++++++ Config/INITSTR.S | 38 + Config/MAKE.CONFIG.S | 92 ++ Config/MISC/PSTOR.S | 252 +++++ Config/MISC/USER.S | 764 +++++++++++++ Config/MODEM.S | 454 ++++++++ Config/MODEMS/CAT103.S | 270 +++++ Config/MODEMS/CAT212.S | 321 ++++++ Config/MODEMS/EPIC.DVR.S | 338 ++++++ Config/MODEMS/GSPORT.1.VERB.S | 446 ++++++++ Config/MODEMS/GSPORT.2.VERB.S | 451 ++++++++ Config/MODEMS/GSPORT.HST.S | 396 +++++++ Config/MODEMS/GSPORT.SLOT1.A | 497 +++++++++ Config/MODEMS/GSPORT.SLOT1.S | 522 +++++++++ Config/MODEMS/GSPORT.SLOT2.A | 504 +++++++++ Config/MODEMS/GSPORT.SLOT2.S | 531 +++++++++ Config/MODEMS/GSPRT2.VSM.S | 548 +++++++++ Config/MODEMS/HAYES.VSM.GS.S | 536 +++++++++ Config/MODEMS/HAYES.VSM.GS1.S | 541 +++++++++ Config/MODEMS/HAYES.VSM.GS2.S | 534 +++++++++ Config/MODEMS/MM2.S | 243 ++++ Config/MODEMS/MULTISPD.S | 357 ++++++ Config/MODEMS/NOCAR.S | 377 +++++++ Config/MODEMS/NULLMDM.S | 62 ++ Config/MODEMS/SINGLESPD.S | 306 +++++ Config/MODEMS/SSC.HST.S | 329 ++++++ Config/MODEMS/SSC.NUMERIC.S | 380 +++++++ Config/MODEMS/SSC.S | 383 +++++++ Config/MODEMS/SSC.S.A | 387 +++++++ Config/MODEMS/SSC.VERB.S | 335 ++++++ Config/OSPJUNK.S | 566 ++++++++++ Config/PRINTER.S | 118 ++ Config/PRINTERS/GRAPPLER.S | 70 ++ Config/PRINTERS/NULL.S | 35 + Config/PRINTERS/PARALLEL.S | 72 ++ Config/PRINTERS/SERIAL.S | 125 +++ Config/ROUTINE.S | 663 +++++++++++ Config/START.S | 189 ++++ Config/VIDEO.S | 289 +++++ DOCS/LLUCE.REF | 1801 ++++++++++++++++++++++++++++++ DOCS/LLUCE/APPENDIX | Bin 0 -> 11154 bytes DOCS/LLUCE/CHAPTER.1.1 | Bin 0 -> 44640 bytes DOCS/LLUCE/CHAPTER.2 | Bin 0 -> 11434 bytes DOCS/LLUCE/CHAPTER.3.1 | Bin 0 -> 36539 bytes DOCS/LLUCE/CHAPTER.3.2 | Bin 0 -> 57798 bytes DOCS/LLUCE/CHAPTER.4.1 | Bin 0 -> 36463 bytes DOCS/LLUCE/CHAPTER.4.2 | Bin 0 -> 412 bytes DOCS/LLUCE/INTRO | Bin 0 -> 9012 bytes LLUCE/ANSI.DOC | 514 +++++++++ LLUCE/BULLETINS/B1 | Bin 0 -> 3360 bytes LLUCE/EMAIL/MAIL | Bin 0 -> 13088 bytes LLUCE/LLUCE.DRIVERS | Bin 0 -> 2048 bytes LLUCE/LLUCE.SYSTEM | Bin 0 -> 21820 bytes LLUCE/LLUCE.TEXT | Bin 0 -> 2816 bytes LLUCE/MATT/AMDSS.S | 88 ++ LLUCE/MATT/Finder.Data | Bin 0 -> 212 bytes LLUCE/MATT/LANCE.TALK | 22 + LLUCE/MATT/MAIL.S | 496 +++++++++ LLUCE/MATT/MDSS.S | 110 ++ LLUCE/MATT/NET.CONFIG.S | 41 + LLUCE/MATT/NET.DESC | 26 + LLUCE/MATT/NET.FILE.FORMAT | 91 ++ LLUCE/MATT/NET.SETUP | 37 + LLUCE/MATT/PARSE.S | 249 +++++ LLUCE/NETWORK.HEADER | 71 ++ LLUCE/OVERLAY.CRC | Bin 0 -> 700 bytes LLUCE/PROGRAM/AUTODIR.SEG.S | 53 + LLUCE/PROGRAM/BBS.LISTER.S | 51 + LLUCE/PROGRAM/BC.S | 169 +++ LLUCE/PROGRAM/BUGGY.S | 67 ++ LLUCE/PROGRAM/CONF.SEG.S | 649 +++++++++++ LLUCE/PROGRAM/CONFIG.SEG.S | 326 ++++++ LLUCE/PROGRAM/COPY.S | 28 + LLUCE/PROGRAM/EMAIL.SEG.S | 325 ++++++ LLUCE/PROGRAM/FIX.BBS.S | 52 + LLUCE/PROGRAM/LOGON.SEG.C | Bin 0 -> 640 bytes LLUCE/PROGRAM/LOGON.SEG.S | 38 + LLUCE/PROGRAM/LOGON.SEG2.S | 473 ++++++++ LLUCE/PROGRAM/MAIN.SEG.S | 295 +++++ LLUCE/PROGRAM/MAINT.SEG.S | 179 +++ LLUCE/PROGRAM/MSG.SEG.S | 615 +++++++++++ LLUCE/PROGRAM/MSG.TEST.S | 211 ++++ LLUCE/PROGRAM/PURGE.SEG.S | 221 ++++ LLUCE/PROGRAM/SYSTEM.SEG.S | 563 ++++++++++ LLUCE/PROGRAM/TEST.SEG.S | 178 +++ LLUCE/PROGRAM/TEST.SEG2.C | Bin 0 -> 896 bytes LLUCE/PROGRAM/TEST.SEG2.S | 67 ++ LLUCE/PROGRAM/UTIL.SEG.S | 498 +++++++++ LLUCE/PROGRAM/VOTING.SEG.S | 391 +++++++ LLUCE/QUIT.TST | Bin 0 -> 15 bytes LLUCE/SETUP | Bin 0 -> 1275 bytes LLUCE/SYSTEM/ARCLIST | Bin 0 -> 1369 bytes LLUCE/SYSTEM/COMPILER | Bin 0 -> 4641 bytes LLUCE/SYSTEM/DECODE | Bin 0 -> 332 bytes LLUCE/SYSTEM/EDITOR | Bin 0 -> 3404 bytes LLUCE/SYSTEM/EXT.COPY | Bin 0 -> 768 bytes LLUCE/SYSTEM/EXT.DOS | Bin 0 -> 2936 bytes LLUCE/SYSTEM/EXT.XDOWN | Bin 0 -> 2877 bytes LLUCE/SYSTEM/EXT.XUP | Bin 0 -> 3334 bytes LLUCE/SYSTEM/HLP.EDIT | 223 ++++ LLUCE/SYSTEM/HLP.EMAIL | 3 + LLUCE/SYSTEM/HLP.MAIN | 274 +++++ LLUCE/SYSTEM/HLP.MSG | 157 +++ LLUCE/SYSTEM/HLP.USER | 31 + LLUCE/SYSTEM/HLP.UTIL | 3 + LLUCE/SYSTEM/LIST | Bin 0 -> 6751 bytes LLUCE/SYSTEM/MNU.EMAIL40 | 16 + LLUCE/SYSTEM/MNU.EMAIL80 | 11 + LLUCE/SYSTEM/MNU.NEW | 17 + LLUCE/SYSTEM/MNU.SYSTEM40 | 21 + LLUCE/SYSTEM/MNU.SYSTEM80 | 14 + LLUCE/SYSTEM/MNU.UTIL40 | 16 + LLUCE/SYSTEM/MNU.UTIL80 | 11 + LLUCE/SYSTEM/MNU.VAL.40 | 23 + LLUCE/SYSTEM/MNU.VAL.80 | 16 + LLUCE/SYSTEM/OVERLAY.CRC | Bin 0 -> 700 bytes LLUCE/SYSTEM/PROTOCOL.DOWN | Bin 0 -> 3129 bytes LLUCE/SYSTEM/PROTOCOL.UP | Bin 0 -> 2622 bytes LLUCE/SYSTEM/PROTODOWN | Bin 0 -> 3130 bytes LLUCE/SYSTEM/PROTOUP | Bin 0 -> 2623 bytes LLUCE/SYSTEM/REQUEST | 24 + LLUCE/SYSTEM/SHELL | Bin 0 -> 2115 bytes LLUCE/SYSTEM/SYS.AUTOVAL | 1 + LLUCE/SYSTEM/SYS.CALLWAITING | 6 + LLUCE/SYSTEM/SYS.DATA | 4 + LLUCE/SYSTEM/SYS.DATA1 | 8 + LLUCE/SYSTEM/SYS.DATA2 | Bin 0 -> 1694 bytes LLUCE/SYSTEM/SYS.DATA3 | Bin 0 -> 1651 bytes LLUCE/SYSTEM/SYS.FULLNAMES | Bin 0 -> 252 bytes LLUCE/SYSTEM/SYS.HELP | Bin 0 -> 32800 bytes LLUCE/SYSTEM/SYS.IDLE.SCREEN | 23 + LLUCE/SYSTEM/SYS.INFO | 14 + LLUCE/SYSTEM/SYS.LOG | Bin 0 -> 16063 bytes LLUCE/SYSTEM/SYS.MAILNAMES | Bin 0 -> 140 bytes LLUCE/SYSTEM/SYS.NEWINFO1 | 8 + LLUCE/SYSTEM/SYS.NEWS | 10 + LLUCE/SYSTEM/SYS.QUESTIONS | 16 + LLUCE/SYSTEM/SYS.USERS | Bin 0 -> 1344 bytes LLUCE/SYSTEM/SYSTEMP | Bin 0 -> 17 bytes LLUCE/SYSTEM/TEST.DATA | Bin 0 -> 252 bytes LLUCE/SYSTEM/XY.UPLOAD | Bin 0 -> 2646 bytes LLUCE/TEXT/ANSI.TEST | 21 + LLUCE/TEXT/FOUNDINT.TXT | Bin 0 -> 2432 bytes LLUCE/TEXT/PSE.TEST | 29 + SOURCE/CALC.CRC.S | 321 ++++++ SOURCE/CLOCKS/GS.S | 118 ++ SOURCE/CLOCKS/PRODOS.S | 95 ++ SOURCE/CLOCKS/TCLK.S | 100 ++ SOURCE/COMPILER.S | 111 ++ SOURCE/COPY.S | 200 ++++ SOURCE/DATA/ACOS.LLUCE | 364 ++++++ SOURCE/DATA/CHANGES | 138 +++ SOURCE/DATA/FTN.2D.8002 | 86 ++ SOURCE/DATA/FTN.2D.8004 | 101 ++ SOURCE/DATA/HISTORY | 988 +++++++++++++++++ SOURCE/DATA/LLUCE.REF | Bin 0 -> 115101 bytes SOURCE/DATA/MEMORYMAP | 133 +++ SOURCE/DATA/SYNTAX | 410 +++++++ SOURCE/DATA/TOKENS.ALPHA | Bin 0 -> 5618 bytes SOURCE/DATA/TOKENS.NUM | Bin 0 -> 4781 bytes SOURCE/DATA/XCAT.DOC | 159 +++ SOURCE/DOWN4K.S | 1656 +++++++++++++++++++++++++++ SOURCE/EDITOR.S | 99 ++ SOURCE/EQUATES/DRIVEREQU.S | 115 ++ SOURCE/EQUATES/ENTRY.S | 76 ++ SOURCE/EQUATES/EQUATES.S | 750 +++++++++++++ SOURCE/EQUATES/ERRORS.S | 45 + SOURCE/EQUATES/FILTER.S | 15 + SOURCE/EQUATES/GLOBALS.S | 80 ++ SOURCE/EQUATES/MACROS.S | 809 ++++++++++++++ SOURCE/EQUATES/OS.EQUATES.S | 379 +++++++ SOURCE/EQUATES/PORTEQU.S | 642 +++++++++++ SOURCE/EQUATES/RAMAREA.S | 68 ++ SOURCE/EQUATES/TOKENS.S | 187 ++++ SOURCE/FILESORT.S | 506 +++++++++ SOURCE/FINDOPEN.S | 263 +++++ SOURCE/LISTER.S | 90 ++ SOURCE/LISTER/ACOS.S | 89 ++ SOURCE/LISTER/ACU.S | 175 +++ SOURCE/LISTER/APL.S | 323 ++++++ SOURCE/LISTER/ARC.S | 138 +++ SOURCE/LISTER/ARJ.S | 120 ++ SOURCE/LISTER/BLU.S | 214 ++++ SOURCE/LISTER/DATA.S | 172 +++ SOURCE/LISTER/DOS.S | 125 +++ SOURCE/LISTER/LU.S | 185 ++++ SOURCE/LISTER/LZH.S | 123 +++ SOURCE/LISTER/MAC.S | 331 ++++++ SOURCE/LISTER/MACROS.S | 197 ++++ SOURCE/LISTER/MAIN.S | 1965 +++++++++++++++++++++++++++++++++ SOURCE/LISTER/PDOS.S | 73 ++ SOURCE/LISTER/SHK.S | 572 ++++++++++ SOURCE/LISTER/TEST | Bin 0 -> 321 bytes SOURCE/LISTER/ZIP.S | 361 ++++++ SOURCE/LISTER/ZOO.S | 146 +++ SOURCE/LLUCE.S | 125 +++ SOURCE/LLUCE/CONSOLE.S | 648 +++++++++++ SOURCE/LLUCE/DATETIME.S | 243 ++++ SOURCE/LLUCE/DISK.S | 1110 +++++++++++++++++++ SOURCE/LLUCE/DISKIO.S | 632 +++++++++++ SOURCE/LLUCE/EMULS.S | 394 +++++++ SOURCE/LLUCE/ENCODE.S | 103 ++ SOURCE/LLUCE/ENTRY.S | 72 ++ SOURCE/LLUCE/FLOW.S | 604 ++++++++++ SOURCE/LLUCE/HIGH.SUBS.S | 1002 +++++++++++++++++ SOURCE/LLUCE/INIT.S | 584 ++++++++++ SOURCE/LLUCE/IO.CMDS.S | 1153 +++++++++++++++++++ SOURCE/LLUCE/IO.SUBS.S | 938 ++++++++++++++++ SOURCE/LLUCE/LOAD.S | 397 +++++++ SOURCE/LLUCE/MATH.S | 417 +++++++ SOURCE/LLUCE/MEMORY.S | 282 +++++ SOURCE/LLUCE/MISC.CMDS.S | 450 ++++++++ SOURCE/LLUCE/MSG.S | 791 +++++++++++++ SOURCE/LLUCE/PROG.SUBS.S | 826 ++++++++++++++ SOURCE/LLUCE/RAMCARD.S | 271 +++++ SOURCE/LLUCE/START.S | 233 ++++ SOURCE/LLUCE/STRING.S | 268 +++++ SOURCE/LLUCE/TOKENS.JMP.S | 362 ++++++ SOURCE/LLUCE/TOKENS.TXT.S | 244 ++++ SOURCE/LLUCE/VAR.S | 694 ++++++++++++ SOURCE/MAKE.DRIVER.S | 72 ++ SOURCE/MODEMS/CAT103.S | 256 +++++ SOURCE/MODEMS/CAT212.S | 306 +++++ SOURCE/MODEMS/EPIC.DVR.S | 303 +++++ SOURCE/MODEMS/GS.U.S | 677 ++++++++++++ SOURCE/MODEMS/GSPORT.A.S | 485 ++++++++ SOURCE/MODEMS/GSPORT.HST.S | 370 +++++++ SOURCE/MODEMS/GSPORT.S | 514 +++++++++ SOURCE/MODEMS/GSPORT.VERB.S | 421 +++++++ SOURCE/MODEMS/GSPRT2.VSM.S | 508 +++++++++ SOURCE/MODEMS/HAYES.VSM.GS.S | 515 +++++++++ SOURCE/MODEMS/MM2.S | 221 ++++ SOURCE/MODEMS/MULTISPD.S | 325 ++++++ SOURCE/MODEMS/NOCAR.S | 347 ++++++ SOURCE/MODEMS/NULLMDM.S | 57 + SOURCE/MODEMS/SINGLESPD.S | 251 +++++ SOURCE/MODEMS/SSC.A.S | 363 ++++++ SOURCE/MODEMS/SSC.HST.S | 300 +++++ SOURCE/MODEMS/SSC.NUMERIC.S | 343 ++++++ SOURCE/MODEMS/SSC.S | 331 ++++++ SOURCE/MODEMS/SSC.VERB.S | 308 ++++++ SOURCE/OVERLAY.CRC.S | 346 ++++++ SOURCE/OVERLAYS/COMP.MAIN.S | 654 +++++++++++ SOURCE/OVERLAYS/COMP.SUBS.S | 731 ++++++++++++ SOURCE/OVERLAYS/COMP.TOKENS.S | 247 +++++ SOURCE/OVERLAYS/EDIT.MAIN.S | 966 ++++++++++++++++ SOURCE/OVERLAYS/EDIT.SUBS.S | 464 ++++++++ SOURCE/PFS.DECODE.S | 130 +++ SOURCE/PRINTERS/NOPRINT.S | 15 + SOURCE/PROTODOWN.S | 1812 ++++++++++++++++++++++++++++++ SOURCE/PROTOUP.S | 1660 ++++++++++++++++++++++++++++ SOURCE/QUIT.TST.S | 9 + SOURCE/RNDSORT.S | 449 ++++++++ SOURCE/SETUP.ASM | 448 ++++++++ SOURCE/SETUP.S | 555 ++++++++++ SOURCE/SHELL.GS.S | 674 +++++++++++ SOURCE/SHELL.S | 624 +++++++++++ SOURCE/TEXT.COMP.S | 266 +++++ SOURCE/TEXT.DECOMP.S | 254 +++++ SOURCE/TEXT.S | 162 +++ SOURCE/UP4K.S | 1535 +++++++++++++++++++++++++ SOURCE/XCAT.S | 1457 ++++++++++++++++++++++++ SOURCE/XDOS.S | 1795 ++++++++++++++++++++++++++++++ SOURCE/ZMODEM/EQUATES.S | 117 ++ SOURCE/ZMODEM/LONG2DEC.S | 102 ++ SOURCE/ZMODEM/NO.LONG2DEC.S | 14 + SOURCE/ZMODEM/RZ.LOAD.S | 614 ++++++++++ SOURCE/ZMODEM/RZ.S | 1861 +++++++++++++++++++++++++++++++ SOURCE/ZMODEM/SZ.LOAD.S | 615 +++++++++++ SOURCE/ZMODEM/SZ.S | 1583 ++++++++++++++++++++++++++ SOURCE/ZMODEM/ZEQUATES.S | 139 +++ SOURCE/ZMODEM/ZMODEM.RLE.S | 395 +++++++ SOURCE/ZMODEM/ZMODEM.S | 1138 +++++++++++++++++++ SOURCE/ZMODEM/ZMODEM2.S | 532 +++++++++ 294 files changed, 83866 insertions(+) create mode 100644 Config/CLOCK.S create mode 100644 Config/CLOCKS/CLK.IIC.SYS.S create mode 100644 Config/CLOCKS/CLOCKS.HDR.S create mode 100644 Config/CLOCKS/IIC.SYS.S create mode 100644 Config/CLOCKS/IIGS.S create mode 100644 Config/CLOCKS/MAKE.CLOCKS.S create mode 100644 Config/CLOCKS/MOUNTAIN.S create mode 100644 Config/CLOCKS/NO.SLOT.S create mode 100644 Config/CLOCKS/NULL.S create mode 100644 Config/CLOCKS/PRODOS.S create mode 100644 Config/CLOCKS/SERIALPRO.S create mode 100644 Config/CLOCKS/THUNDER.S create mode 100644 Config/CLOCKS/ULTRA.S create mode 100644 Config/CLOCKS/VERSA.S create mode 100644 Config/CMD.S create mode 100644 Config/DEFAULTS.S create mode 100644 Config/DISK.S create mode 100644 Config/EQUATES.S create mode 100644 Config/FILTER.S create mode 100644 Config/GLOBALS.S create mode 100644 Config/INIT.S create mode 100644 Config/INITSTR.S create mode 100644 Config/MAKE.CONFIG.S create mode 100644 Config/MISC/PSTOR.S create mode 100644 Config/MISC/USER.S create mode 100644 Config/MODEM.S create mode 100644 Config/MODEMS/CAT103.S create mode 100644 Config/MODEMS/CAT212.S create mode 100644 Config/MODEMS/EPIC.DVR.S create mode 100644 Config/MODEMS/GSPORT.1.VERB.S create mode 100644 Config/MODEMS/GSPORT.2.VERB.S create mode 100644 Config/MODEMS/GSPORT.HST.S create mode 100644 Config/MODEMS/GSPORT.SLOT1.A create mode 100644 Config/MODEMS/GSPORT.SLOT1.S create mode 100644 Config/MODEMS/GSPORT.SLOT2.A create mode 100644 Config/MODEMS/GSPORT.SLOT2.S create mode 100644 Config/MODEMS/GSPRT2.VSM.S create mode 100644 Config/MODEMS/HAYES.VSM.GS.S create mode 100644 Config/MODEMS/HAYES.VSM.GS1.S create mode 100644 Config/MODEMS/HAYES.VSM.GS2.S create mode 100644 Config/MODEMS/MM2.S create mode 100644 Config/MODEMS/MULTISPD.S create mode 100644 Config/MODEMS/NOCAR.S create mode 100644 Config/MODEMS/NULLMDM.S create mode 100644 Config/MODEMS/SINGLESPD.S create mode 100644 Config/MODEMS/SSC.HST.S create mode 100644 Config/MODEMS/SSC.NUMERIC.S create mode 100644 Config/MODEMS/SSC.S create mode 100644 Config/MODEMS/SSC.S.A create mode 100644 Config/MODEMS/SSC.VERB.S create mode 100644 Config/OSPJUNK.S create mode 100644 Config/PRINTER.S create mode 100644 Config/PRINTERS/GRAPPLER.S create mode 100644 Config/PRINTERS/NULL.S create mode 100644 Config/PRINTERS/PARALLEL.S create mode 100644 Config/PRINTERS/SERIAL.S create mode 100644 Config/ROUTINE.S create mode 100644 Config/START.S create mode 100644 Config/VIDEO.S create mode 100644 DOCS/LLUCE.REF create mode 100644 DOCS/LLUCE/APPENDIX create mode 100644 DOCS/LLUCE/CHAPTER.1.1 create mode 100644 DOCS/LLUCE/CHAPTER.2 create mode 100644 DOCS/LLUCE/CHAPTER.3.1 create mode 100644 DOCS/LLUCE/CHAPTER.3.2 create mode 100644 DOCS/LLUCE/CHAPTER.4.1 create mode 100644 DOCS/LLUCE/CHAPTER.4.2 create mode 100644 DOCS/LLUCE/INTRO create mode 100644 LLUCE/ANSI.DOC create mode 100644 LLUCE/BULLETINS/B1 create mode 100644 LLUCE/EMAIL/MAIL create mode 100644 LLUCE/LLUCE.DRIVERS create mode 100644 LLUCE/LLUCE.SYSTEM create mode 100644 LLUCE/LLUCE.TEXT create mode 100644 LLUCE/MATT/AMDSS.S create mode 100644 LLUCE/MATT/Finder.Data create mode 100644 LLUCE/MATT/LANCE.TALK create mode 100644 LLUCE/MATT/MAIL.S create mode 100644 LLUCE/MATT/MDSS.S create mode 100644 LLUCE/MATT/NET.CONFIG.S create mode 100644 LLUCE/MATT/NET.DESC create mode 100644 LLUCE/MATT/NET.FILE.FORMAT create mode 100644 LLUCE/MATT/NET.SETUP create mode 100644 LLUCE/MATT/PARSE.S create mode 100644 LLUCE/NETWORK.HEADER create mode 100644 LLUCE/OVERLAY.CRC create mode 100644 LLUCE/PROGRAM/AUTODIR.SEG.S create mode 100644 LLUCE/PROGRAM/BBS.LISTER.S create mode 100644 LLUCE/PROGRAM/BC.S create mode 100644 LLUCE/PROGRAM/BUGGY.S create mode 100644 LLUCE/PROGRAM/CONF.SEG.S create mode 100644 LLUCE/PROGRAM/CONFIG.SEG.S create mode 100644 LLUCE/PROGRAM/COPY.S create mode 100644 LLUCE/PROGRAM/EMAIL.SEG.S create mode 100644 LLUCE/PROGRAM/FIX.BBS.S create mode 100644 LLUCE/PROGRAM/LOGON.SEG.C create mode 100644 LLUCE/PROGRAM/LOGON.SEG.S create mode 100644 LLUCE/PROGRAM/LOGON.SEG2.S create mode 100644 LLUCE/PROGRAM/MAIN.SEG.S create mode 100644 LLUCE/PROGRAM/MAINT.SEG.S create mode 100644 LLUCE/PROGRAM/MSG.SEG.S create mode 100644 LLUCE/PROGRAM/MSG.TEST.S create mode 100644 LLUCE/PROGRAM/PURGE.SEG.S create mode 100644 LLUCE/PROGRAM/SYSTEM.SEG.S create mode 100644 LLUCE/PROGRAM/TEST.SEG.S create mode 100644 LLUCE/PROGRAM/TEST.SEG2.C create mode 100644 LLUCE/PROGRAM/TEST.SEG2.S create mode 100644 LLUCE/PROGRAM/UTIL.SEG.S create mode 100644 LLUCE/PROGRAM/VOTING.SEG.S create mode 100644 LLUCE/QUIT.TST create mode 100644 LLUCE/SETUP create mode 100644 LLUCE/SYSTEM/ARCLIST create mode 100644 LLUCE/SYSTEM/COMPILER create mode 100644 LLUCE/SYSTEM/DECODE create mode 100644 LLUCE/SYSTEM/EDITOR create mode 100644 LLUCE/SYSTEM/EXT.COPY create mode 100644 LLUCE/SYSTEM/EXT.DOS create mode 100644 LLUCE/SYSTEM/EXT.XDOWN create mode 100644 LLUCE/SYSTEM/EXT.XUP create mode 100644 LLUCE/SYSTEM/HLP.EDIT create mode 100644 LLUCE/SYSTEM/HLP.EMAIL create mode 100644 LLUCE/SYSTEM/HLP.MAIN create mode 100644 LLUCE/SYSTEM/HLP.MSG create mode 100644 LLUCE/SYSTEM/HLP.USER create mode 100644 LLUCE/SYSTEM/HLP.UTIL create mode 100644 LLUCE/SYSTEM/LIST create mode 100644 LLUCE/SYSTEM/MNU.EMAIL40 create mode 100644 LLUCE/SYSTEM/MNU.EMAIL80 create mode 100644 LLUCE/SYSTEM/MNU.NEW create mode 100644 LLUCE/SYSTEM/MNU.SYSTEM40 create mode 100644 LLUCE/SYSTEM/MNU.SYSTEM80 create mode 100644 LLUCE/SYSTEM/MNU.UTIL40 create mode 100644 LLUCE/SYSTEM/MNU.UTIL80 create mode 100644 LLUCE/SYSTEM/MNU.VAL.40 create mode 100644 LLUCE/SYSTEM/MNU.VAL.80 create mode 100644 LLUCE/SYSTEM/OVERLAY.CRC create mode 100644 LLUCE/SYSTEM/PROTOCOL.DOWN create mode 100644 LLUCE/SYSTEM/PROTOCOL.UP create mode 100644 LLUCE/SYSTEM/PROTODOWN create mode 100644 LLUCE/SYSTEM/PROTOUP create mode 100644 LLUCE/SYSTEM/REQUEST create mode 100644 LLUCE/SYSTEM/SHELL create mode 100644 LLUCE/SYSTEM/SYS.AUTOVAL create mode 100644 LLUCE/SYSTEM/SYS.CALLWAITING create mode 100644 LLUCE/SYSTEM/SYS.DATA create mode 100644 LLUCE/SYSTEM/SYS.DATA1 create mode 100644 LLUCE/SYSTEM/SYS.DATA2 create mode 100644 LLUCE/SYSTEM/SYS.DATA3 create mode 100644 LLUCE/SYSTEM/SYS.FULLNAMES create mode 100644 LLUCE/SYSTEM/SYS.HELP create mode 100644 LLUCE/SYSTEM/SYS.IDLE.SCREEN create mode 100644 LLUCE/SYSTEM/SYS.INFO create mode 100644 LLUCE/SYSTEM/SYS.LOG create mode 100644 LLUCE/SYSTEM/SYS.MAILNAMES create mode 100644 LLUCE/SYSTEM/SYS.NEWINFO1 create mode 100644 LLUCE/SYSTEM/SYS.NEWS create mode 100644 LLUCE/SYSTEM/SYS.QUESTIONS create mode 100644 LLUCE/SYSTEM/SYS.USERS create mode 100644 LLUCE/SYSTEM/SYSTEMP create mode 100644 LLUCE/SYSTEM/TEST.DATA create mode 100644 LLUCE/SYSTEM/XY.UPLOAD create mode 100644 LLUCE/TEXT/ANSI.TEST create mode 100644 LLUCE/TEXT/FOUNDINT.TXT create mode 100644 LLUCE/TEXT/PSE.TEST create mode 100644 SOURCE/CALC.CRC.S create mode 100644 SOURCE/CLOCKS/GS.S create mode 100644 SOURCE/CLOCKS/PRODOS.S create mode 100644 SOURCE/CLOCKS/TCLK.S create mode 100644 SOURCE/COMPILER.S create mode 100644 SOURCE/COPY.S create mode 100644 SOURCE/DATA/ACOS.LLUCE create mode 100644 SOURCE/DATA/CHANGES create mode 100644 SOURCE/DATA/FTN.2D.8002 create mode 100644 SOURCE/DATA/FTN.2D.8004 create mode 100644 SOURCE/DATA/HISTORY create mode 100644 SOURCE/DATA/LLUCE.REF create mode 100644 SOURCE/DATA/MEMORYMAP create mode 100644 SOURCE/DATA/SYNTAX create mode 100644 SOURCE/DATA/TOKENS.ALPHA create mode 100644 SOURCE/DATA/TOKENS.NUM create mode 100644 SOURCE/DATA/XCAT.DOC create mode 100644 SOURCE/DOWN4K.S create mode 100644 SOURCE/EDITOR.S create mode 100644 SOURCE/EQUATES/DRIVEREQU.S create mode 100644 SOURCE/EQUATES/ENTRY.S create mode 100644 SOURCE/EQUATES/EQUATES.S create mode 100644 SOURCE/EQUATES/ERRORS.S create mode 100644 SOURCE/EQUATES/FILTER.S create mode 100644 SOURCE/EQUATES/GLOBALS.S create mode 100644 SOURCE/EQUATES/MACROS.S create mode 100644 SOURCE/EQUATES/OS.EQUATES.S create mode 100644 SOURCE/EQUATES/PORTEQU.S create mode 100644 SOURCE/EQUATES/RAMAREA.S create mode 100644 SOURCE/EQUATES/TOKENS.S create mode 100644 SOURCE/FILESORT.S create mode 100644 SOURCE/FINDOPEN.S create mode 100644 SOURCE/LISTER.S create mode 100644 SOURCE/LISTER/ACOS.S create mode 100644 SOURCE/LISTER/ACU.S create mode 100644 SOURCE/LISTER/APL.S create mode 100644 SOURCE/LISTER/ARC.S create mode 100644 SOURCE/LISTER/ARJ.S create mode 100644 SOURCE/LISTER/BLU.S create mode 100644 SOURCE/LISTER/DATA.S create mode 100644 SOURCE/LISTER/DOS.S create mode 100644 SOURCE/LISTER/LU.S create mode 100644 SOURCE/LISTER/LZH.S create mode 100644 SOURCE/LISTER/MAC.S create mode 100644 SOURCE/LISTER/MACROS.S create mode 100644 SOURCE/LISTER/MAIN.S create mode 100644 SOURCE/LISTER/PDOS.S create mode 100644 SOURCE/LISTER/SHK.S create mode 100644 SOURCE/LISTER/TEST create mode 100644 SOURCE/LISTER/ZIP.S create mode 100644 SOURCE/LISTER/ZOO.S create mode 100644 SOURCE/LLUCE.S create mode 100644 SOURCE/LLUCE/CONSOLE.S create mode 100644 SOURCE/LLUCE/DATETIME.S create mode 100644 SOURCE/LLUCE/DISK.S create mode 100644 SOURCE/LLUCE/DISKIO.S create mode 100644 SOURCE/LLUCE/EMULS.S create mode 100644 SOURCE/LLUCE/ENCODE.S create mode 100644 SOURCE/LLUCE/ENTRY.S create mode 100644 SOURCE/LLUCE/FLOW.S create mode 100644 SOURCE/LLUCE/HIGH.SUBS.S create mode 100644 SOURCE/LLUCE/INIT.S create mode 100644 SOURCE/LLUCE/IO.CMDS.S create mode 100644 SOURCE/LLUCE/IO.SUBS.S create mode 100644 SOURCE/LLUCE/LOAD.S create mode 100644 SOURCE/LLUCE/MATH.S create mode 100644 SOURCE/LLUCE/MEMORY.S create mode 100644 SOURCE/LLUCE/MISC.CMDS.S create mode 100644 SOURCE/LLUCE/MSG.S create mode 100644 SOURCE/LLUCE/PROG.SUBS.S create mode 100644 SOURCE/LLUCE/RAMCARD.S create mode 100644 SOURCE/LLUCE/START.S create mode 100644 SOURCE/LLUCE/STRING.S create mode 100644 SOURCE/LLUCE/TOKENS.JMP.S create mode 100644 SOURCE/LLUCE/TOKENS.TXT.S create mode 100644 SOURCE/LLUCE/VAR.S create mode 100644 SOURCE/MAKE.DRIVER.S create mode 100644 SOURCE/MODEMS/CAT103.S create mode 100644 SOURCE/MODEMS/CAT212.S create mode 100644 SOURCE/MODEMS/EPIC.DVR.S create mode 100644 SOURCE/MODEMS/GS.U.S create mode 100644 SOURCE/MODEMS/GSPORT.A.S create mode 100644 SOURCE/MODEMS/GSPORT.HST.S create mode 100644 SOURCE/MODEMS/GSPORT.S create mode 100644 SOURCE/MODEMS/GSPORT.VERB.S create mode 100644 SOURCE/MODEMS/GSPRT2.VSM.S create mode 100644 SOURCE/MODEMS/HAYES.VSM.GS.S create mode 100644 SOURCE/MODEMS/MM2.S create mode 100644 SOURCE/MODEMS/MULTISPD.S create mode 100644 SOURCE/MODEMS/NOCAR.S create mode 100644 SOURCE/MODEMS/NULLMDM.S create mode 100644 SOURCE/MODEMS/SINGLESPD.S create mode 100644 SOURCE/MODEMS/SSC.A.S create mode 100644 SOURCE/MODEMS/SSC.HST.S create mode 100644 SOURCE/MODEMS/SSC.NUMERIC.S create mode 100644 SOURCE/MODEMS/SSC.S create mode 100644 SOURCE/MODEMS/SSC.VERB.S create mode 100644 SOURCE/OVERLAY.CRC.S create mode 100644 SOURCE/OVERLAYS/COMP.MAIN.S create mode 100644 SOURCE/OVERLAYS/COMP.SUBS.S create mode 100644 SOURCE/OVERLAYS/COMP.TOKENS.S create mode 100644 SOURCE/OVERLAYS/EDIT.MAIN.S create mode 100644 SOURCE/OVERLAYS/EDIT.SUBS.S create mode 100644 SOURCE/PFS.DECODE.S create mode 100644 SOURCE/PRINTERS/NOPRINT.S create mode 100644 SOURCE/PROTODOWN.S create mode 100644 SOURCE/PROTOUP.S create mode 100644 SOURCE/QUIT.TST.S create mode 100644 SOURCE/RNDSORT.S create mode 100644 SOURCE/SETUP.ASM create mode 100644 SOURCE/SETUP.S create mode 100644 SOURCE/SHELL.GS.S create mode 100644 SOURCE/SHELL.S create mode 100644 SOURCE/TEXT.COMP.S create mode 100644 SOURCE/TEXT.DECOMP.S create mode 100644 SOURCE/TEXT.S create mode 100644 SOURCE/UP4K.S create mode 100644 SOURCE/XCAT.S create mode 100644 SOURCE/XDOS.S create mode 100644 SOURCE/ZMODEM/EQUATES.S create mode 100644 SOURCE/ZMODEM/LONG2DEC.S create mode 100644 SOURCE/ZMODEM/NO.LONG2DEC.S create mode 100644 SOURCE/ZMODEM/RZ.LOAD.S create mode 100644 SOURCE/ZMODEM/RZ.S create mode 100644 SOURCE/ZMODEM/SZ.LOAD.S create mode 100644 SOURCE/ZMODEM/SZ.S create mode 100644 SOURCE/ZMODEM/ZEQUATES.S create mode 100644 SOURCE/ZMODEM/ZMODEM.RLE.S create mode 100644 SOURCE/ZMODEM/ZMODEM.S create mode 100644 SOURCE/ZMODEM/ZMODEM2.S diff --git a/Config/CLOCK.S b/Config/CLOCK.S new file mode 100644 index 0000000..593e4fc --- /dev/null +++ b/Config/CLOCK.S @@ -0,0 +1,135 @@ + LST OFF + TR + TR ADR +*------------------------------- +* reconfigure clocks +*------------------------------- + + REL +point0 = $11 +point1 = $14 +clkdrv = $a00 + + DSK REL/CLOCK + +TopBox EXT ; routines external to this file +print EXT +cls EXT +start EXT +escape EXT +inpnum EXT +chinit EXT +wrtchg EXT + +gsclock EXT ;gs clock driver +serialpro EXT ;serialpro driver +thunder EXT ;thunderclock/timemaster driver +iicsys EXT ;iic system clock +mountain EXT ;mountain clock +prodos EXT ;standard prodos stuff +nullclk EXT ;no clock +noslot EXT ;no slot clock +versa EXT ;prometheus versacard +ultra EXT ;ultra clock driver + +re_clk ENT + JSR TopBox + JSR print + DB 1,2,30 + ASC '- Reconfigure Clock -' + DB 1,4,5 + ASC 'Please refer to Appendix C of your user' + ASC ' manual for more information.'00 + + JSR cls + LDX #start + JSR escape + + LDA #clkdrv + STA point1+1 + +IIeClk JSR print + DB 1,7,0 + + ASC ' 1 - Thunderclock Compatible ' + ASC ' 7 - ProDOS Compatible Clock'0D + ASC ' 2 - A.E. Timemaster II H.O. ' + ASC ' 8 - Mountain Hardware Clock'0D + ASC ' 3 - A.E. Serial Pro ' + ASC ' 9 - Prometheus Versacard'0D + ASC ' 4 - A.E. //c Ultra Clock ' + ASC '10 - Apple IIgs System Clock'0D + ASC ' 5 - A.E. //c System Clock ' + ASC '11 - No Clock in System'0D + ASC ' 6 - SMT No-Slot Clock'0D0D + + ASC 'Which? [1-11] '00 + + LDX #11 + JSR inpnum + + PHA + ASL + TAX + LDA :clktbl,X + STA point0 + INX + LDA :clktbl,X + STA point0+1 + + PLA + CMP #4 ;no slot clock + BEQ :noslot + CMP #5 ;no slot clock + BEQ :noslot + CMP #6 ;no clock in system + BEQ :noslot + CMP #10 + BEQ :noslot + CMP #11 + BNE :slot + PHA ; save fake slot + PHA ; save fake mode + JMP :done + +:slot JSR print + DB 1,16,0 + ASC 'Which slot/port does the clock use? [1-7] ',00 + + LDX #7 ; get slot + JSR inpnum + ASL + ASL + ASL + ASL +:noslot PHA ;save slot + +:done LDY #0 ;move the single page +:loop LDA (point0),Y ;source + STA (point1),Y ;destination + INY + BNE :loop + + LDY #0 + PLA ;get the slot back + STA (point1),Y + + JSR chinit ; check for init + JMP wrtchg ; write the changes + +:clktbl DA 0 + DA thunder + DA thunder + DA serialpro + DA ultra + DA noslot + DA iicsys + DA prodos + DA mountain + DA versa + DA gsclock + DA nullclk + diff --git a/Config/CLOCKS/CLK.IIC.SYS.S b/Config/CLOCKS/CLK.IIC.SYS.S new file mode 100644 index 0000000..266c8d0 --- /dev/null +++ b/Config/CLOCKS/CLK.IIC.SYS.S @@ -0,0 +1,155 @@ + LST OFF + TR + TR ADR +*------------------------------- +* //c System Clock - 24 hr +*------------------------------- +* Revised Date: 08/02/87 +*------------------------------- + + rel + dsk rel/iicsys + +lnbuf equ $200 + +ZBUF EQU $41 +PTR EQU $42 + +stat1 equ $c099 +comm1 equ $c09a +stat2 equ $c0a9 +comm2 equ $c0aa + +bytcnt equ $0e03 +nullptr equ $0a + + +iicsys ent + + org $0a00 + +*------------------------------- + +slot hex 20 + + jmp getdate + jmp gettime + jmp setdate + +; get the date in prodos/gbbs format +getdate jsr $bf00 ; read date from MLI + hex 82 + hex 0000 + + ldx $bf90 + lda $bf91 + +setdate rts + +; get the current time +gettime jsr rdclock ; read the clock + + lda #':' + sta timestr+2 ; put time dividers in + sta timestr+5 + + ldx #timestr + rts + +; read the date time from clock +rdclock lda slot + cmp #$10 + beq init1 + + lda #timestr + rts + +* read time from clock +*------------------------------- + +rdtime jsr rdclock ; read the clock + + lda #':' + sta timestr+2 ; put time dividers in + sta timestr+5 + + ldx #timestr + rts + +; read the date time from clock +rdclock lda #64 +init1_1 pha +init1_2 sbc #1 + bne init1_2 + pla + sbc #1 ; give plenty of setup delay + bne init1_1 + + php + sei +init1_3 lda comm1 ; get current setting + pha + + ldy #3 + ldx #22 + lda #8 +init2 sta comm1 ; send init sequence to clock + +init2_1 dex ; intra-bit delay + bne init2_1 + + eor #$0a ; toggle back and forth + ldx #11 + dey + bne init2 ; keep looping + + ldy #4 + ldx #8 + bne init3_2 ; skip initial delay + +init3 lda #$34 + sta timer ; delay while clock sets up +init3_1 dec timer ; to send the date/time + bne init3_1 + +init3_2 lda stat1 ; shift bit data into nibble + rol + rol + rol + ror datestr + dex + bne init3 ; go back to delay + + lda datestr + eor #0 ; save the nibble + sta datestr,y + + ldx #8 + dey + bpl init3 + + pla +init3_3 sta comm1 ; retore uart to initial settings + + ldy #15 + ldx #4 + +init4 lda datestr,x + pha + and #$0f ; process digit (make into ascii) + ora #$30 + sta datestr,y + + dey + pla + lsr + lsr + lsr ; process top of nibble + lsr + ora #$30 ; turn into ascii + sta datestr,y + + dey + dey + dex + bpl init4 + plp + rts + +* convert time to 12hr format +*---------------------------- + +convert lda timestr ;convert to 12 hour + ldx timestr+1 + + and #$0f + tay + txa + and #$0f + + dey + bmi conv2 + clc + adc #10 + dey + bmi conv2 + adc #10 + +conv2 cmp #12 + bne conv2a + lda #24 +conv2a tay + bne conv3 + lda #12 + +conv3 ldx #'A' + cmp #13 + bcc conv4 + + sbc #12 + ldx #'P' + +conv4 ldy #'0' +conv5 cmp #10 + bcc conv6 + + sbc #10 + iny + bne conv5 + +conv6 ora #'0' + sta timestr+1 + sty timestr + stx timestr+9 + ldx #'M' + stx timestr+10 + rts + +timer hex 00 +datestr asc '00 00 00' +timestr asc '00:00:00 ' + + ds \ + diff --git a/Config/CLOCKS/IIGS.S b/Config/CLOCKS/IIGS.S new file mode 100644 index 0000000..59b9f76 --- /dev/null +++ b/Config/CLOCKS/IIGS.S @@ -0,0 +1,170 @@ + LST OFF + TR + TR ADR +*------------------------------- +* GS Clock driver bios +* Written by Andy Nicholas - 07/30/87 +* rewritten by Andy 3/11/88 +*------------------------------- + + xc ; goto 65816 mode + + rel + dsk CLOCKS/rel/gsclock + +gsclock ent + + org $A00 + +* Jump Table +*------------------------------- + +dow db 0 +mode db 0 + + jmp getdate ;call to get the date + jmp gettime ;call to get the time (formatted) + jmp setdate ;known return point + +* Read Clock from ProDOS +*------------------------------- + +mli equ $bf00 +date equ $bf90 + +getdate jsr mli ;read the clock into + hex 82 ;buffer at $200 + da 0 + + ldx date ;read date in compressed form + lda date+1 ;into A & X +setdate rts + +* get the current time +*------------------------------- + +gettime jsr rdtime + ldy #8 + lda mode + bpl gtime1 + jsr convert + ldy #11 + +gtime1 ldx #timestr + rts + +* read time from clock +*------------------------------- + +rdtime clc ;go to native mode + xce + rep #'0' ;and 16 bit A, X, and Y + + pha ;stack space for results + pha + pha + pha + ldx #$D03 ;ReadTimeHex + jsl $E10000 ;Tool Locater + sec + xce ;emulation mode + + pla ; seconds + jsr bindec8 ; convert to two byte + sta timestr+6 + stx timestr+7 + pla ; minutes + jsr bindec8 ; convert to two byte + sta timestr+3 + stx timestr+4 + pla ; hour + jsr bindec8 ; convert to two byte + sta timestr + stx timestr+1 + pla ; year + pla ; day of month + pla ; month + pla ; unused byte + pla ; day of the week + sta dow + + lda #' ' + sta timestr+9 + sta timestr+10 + + rts ;bye.. + +* convert time to 12hr format +*---------------------------- + +convert lda timestr ;convert to 12 hour + ldx timestr+1 + + and #$F + tay + txa + and #$F + + dey + bmi conv2 + clc + adc #10 + dey + bmi conv2 + adc #10 + +conv2 cmp #12 + bne conv2a + lda #24 +conv2a tay + bne conv3 + lda #12 + +conv3 ldx #'A' + cmp #13 + bcc conv4 + + sbc #12 + ldx #'P' + +conv4 ldy #'0' +conv5 cmp #10 + bcc conv6 + + sbc #10 + iny + bne conv5 + +conv6 ora #'0' + sta timestr+1 + sty timestr + stx timestr+9 + ldx #'M' + stx timestr+10 + rts + +* translate a binary to text [0-99] +*------------------------------- + +bindec8 cmp #60 ; put limit of 59 + bcc bin8 + lda #59 + +bin8 ldy #0 ; start 10's counter +bin8a cmp #10 + bcc bin8b ; less than 10, were done + + sbc #10 ; minus 10 + iny ; add 1 to the 10's counter + bne bin8a ; loop + +bin8b adc #'0' ; make 1's into text + tax ; save + tya + adc #'0' ; make 10's into text + rts ; were done + +* '01234567890 +timestr asc '12:00:00 ' + diff --git a/Config/CLOCKS/MAKE.CLOCKS.S b/Config/CLOCKS/MAKE.CLOCKS.S new file mode 100644 index 0000000..bee8405 --- /dev/null +++ b/Config/CLOCKS/MAKE.CLOCKS.S @@ -0,0 +1,40 @@ + asm thunder + ds \ + asm serialpro + ds \ + asm no.slot + ds \ + asm iic.sys + ds \ + asm iigs + ds \ + asm ultra + ds \ + asm prodos + ds \ + asm mountain + ds \ + asm versa + ds \ + asm null + + link rel/thunder + ds \ + link rel/serialpro + ds \ + link rel/no.slot + ds \ + link rel/iic.sys + ds \ + link rel/iigs + ds \ + link rel/ultra + ds \ + link rel/prodos + ds \ + link rel/mountain + ds \ + link rel/versa + ds \ + link rel/null + diff --git a/Config/CLOCKS/MOUNTAIN.S b/Config/CLOCKS/MOUNTAIN.S new file mode 100644 index 0000000..39019e7 --- /dev/null +++ b/Config/CLOCKS/MOUNTAIN.S @@ -0,0 +1,160 @@ + LST OFF + TR + TR ADR +*------------------------------- +* Mountian Hardware Driver +*------------------------------- +* Revised Date: 08/02/87 +*------------------------------- + + rel + dsk CLOCKS/rel/mountain + +mountain ent + + org $0a00 + +mli equ $bf00 +date equ $bf90 +time equ $bf92 +get_time equ $82 + + +slot hex 40 +mode db 0 + + jmp getdate + jmp gettime + jmp setdate + +* get the date in prodos gbbs format +*------------------------------- +getdate jsr mli ; mli call + db get_time ; get_time + hex 0000 ; no pramater table + + ldx date + lda date+1 +setdate rts + +* get the current time +*------------------------------- +gettime jsr rdtime + lda mode + bpl gtime1 + jsr convert + +gtime1 ldx #timestr + rts + +* get time routine +*------------------- +rdtime jsr rdclock + lda #':' ; clean up format + sta timestr+2 + sta timestr+5 + rts + +* read time from clock +*---------------------- +rdclock lda $38 + pha + lda $39 ; save zp addresses + pha + lda slot + lsr + lsr + lsr + lsr + ora #$c0 + sta $39 ; point to clock entry + sta callclk+2 +callclk jsr $c000 ; call clock + pla + sta $39 + pla ; restore zp + sta $38 + + ldx #$0d + ldy #0 +movtime lda $286,x ; move returned string + and #$7f + sta datestr,y + iny + dex + bpl movtime + rts + +* convert time to 12hr format +*---------------------------- + +convert lda timestr ;convert to 12 hour + ldx timestr+1 + + and #$0f + tay + txa + and #$0f + + dey + bmi conv2 + clc + adc #10 + dey + bmi conv2 + adc #10 + +conv2 cmp #12 + bne conv2a + lda #24 +conv2a tay + bne conv3 + lda #12 + +conv3 ldx #'A' + cmp #13 + bcc conv4 + + sbc #12 + ldx #'P' + +conv4 ldy #'0' +conv5 cmp #10 + bcc conv6 + + sbc #10 + iny + bne conv5 + +conv6 ora #'0' + sta timestr+1 + sty timestr + stx timestr+9 + ldx #'M' + stx timestr+10 + rts + +; convert a 2 byte decimal number to binary +decbin8 and #$7f + sec + sbc #'0' + sta decbyte ; save 10's digit + txa ; move 1's into A + and #$7f + sec + sbc #'0' + + ldy #10 +dec8a clc + adc decbyte ; add the 10's digit, 10 times + dey + bne dec8a + rts ; return with result + +decbyte hex 00 +datestr asc '00/00/00' +timestr asc '00:00:00 ' + + ds \ + diff --git a/Config/CLOCKS/NO.SLOT.S b/Config/CLOCKS/NO.SLOT.S new file mode 100644 index 0000000..4f29938 --- /dev/null +++ b/Config/CLOCKS/NO.SLOT.S @@ -0,0 +1,191 @@ + LST OFF + TR + TR ADR +*------------------------------- +* No Slot Clock - 24 hr +*------------------------------- +* Revised Date: 08/02/87 +*------------------------------- + + rel + dsk CLOCKS/rel/noslot + +ZBUF EQU $41 +PTR EQU $42 + +YEAR EQU $44 +HOURS EQU $48 +TEMP EQU $2F0 + +date equ $bf90 +get_time equ $82 + + +noslot ent + + org $0a00 + +*------------------------------- + + db $00 +MODE dfb $00 + JMP getdate + JMP getime + JMP setdate + +* +* TIME OUTPUT BUFFER +* + +TIME ASC '00:00:00 ' +* +* DEFINE RECOGNITION SEQUENCE FOR NO-SLOT CLOCK +* + +RECSEQ db $5C,$A3,$3A,$C5,$5C,$A3,$3A,$C5 + +* +* FORMAT NO-SLOT CLOCK DATE +* + +* get the date in prodos gbbs format +*------------------------------- + +getdate jsr $bf00 ; mli call + db get_time + hex 0000 ; no pramater table + + ldx date + lda date+1 +setdate rts + +* +* FORMAT NO-SLOT CLOCK TIME +* + +getime JSR RDCLOCK + LDY HOURS + LDA MODE + BEQ FMT24 + LDA #'M' + STA TIME+10 + LDX #'A' + SED + SEC + TYA + SBC #$12 + CLD + BCC SETHOUR + TAY + BNE NOTNOON + LDY #$12 +NOTNOON LDX #'P' +SETHOUR STX TIME+9 + TYA + BNE FMT24 + LDY #$12 +FMT24 TYA + LDY #0 + LDX #0 +FMT PHA + AND #$F0 + LSR + LSR + LSR + LSR + CLC + ADC #'0' + STA TIME,Y + INY + PLA + AND #$F + ADC #'0' + STA TIME,Y + INY + INY + INX + LDA HOURS,X + CPX #3 + BNE FMT + JSR ZRECALL +* + LDX #