DataMuseum.dkPresents historical artifacts from the history of: CR80 Hard and Floppy Disks |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CR80 Hard and Floppy Disks Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1058 (0x422) Types: TextFile Names: »T1SIO.SRC«
└─⟦519079be6⟧ Bits:30005500 8" CR80 Floppy CR80FD_0029 ( WBOOTL.SYS W.D bootload program 81 10 01 ??? ) └─⟦519079be6⟧ Intel_ISIS_II └─ ⟦this⟧ »T1SIO.SRC«
PUBLIC TSIO,TSIO1,TSIO2\r PUBLIC T1SIO\r ;******************************************************************************\r ;\r ; Z80-SIO TEST\r ;\r ;******************************************************************************\r TSIO CALL TSIO1\r CALL TSIO2\r RET\r TSIO1 LD BC,SIO1\r CALL T1SIO ;DO SIO1 TEST\r AND A\r JR Z,S1NEXT\r LD B,SIO1\r ADD A,B\r CALL ERROR\r S1NEXT LD BC,SIO2\r CALL T1SIO ;DO SIO2 TEST\r AND A\r JR Z,S2NEXT\r LD B,SIO2\r ADD A,B\r CALL ERROR\r S2NEXT RET ;RETURN\r EJEC\r ;-------SIO TEST ROUTINE---------------------------------T1SIO--------\r ;\r ;DESCRIP: THE ROUTINE TEST THE Z80-SIO\r ; FOR I/O AND TX/RX ERROR.\r ;\r ;ENTRY: C - SIO ADDRESS\r ; HL - SIO INTERRUPT TABLE ADDRESS\r ;\r ;EXIT: A = 0 TEST COMPLETED\r ; A = 1 TX/RX ERROR CH. A\r ; A = 2 TX/RX ERROR CH. B\r ; A = 3 I/O ERROR\r ;RESTRICTION: CONNECTION TXA -> RXA\r ; CONNECTION TXB -> RXB\r ; CLOCK > 100 000 HZ\r ;\r ;DESTROY: !\r ;\r ;TIME: !T-CYCLES\r ;\r ;DATE: 80!807\r ;\r ;PROGRAMMER: IMJ\r ;\r !\r