1 8080 MACRO ASSEMBLER, VER 3.0 ERRORS = 0 + 19:38 05/13/2017 + PAGE 1 ; ; MINIMAL BOOTSTRAP PROGRAM FOR TARBELL SD CONTROLLER ; SUITABLE FOR FAST 82S123 ROM OR ENTERING PER FRONT PANEL ; 00FC WAIT EQU 0FCH 00F8 DCOM EQU 0F8H 00FB DDATA EQU 0FBH 00F8 STAT EQU 0F8H 00FA SECT EQU 0FAH FE00 ORG 0FE00H ;FOR EXTERNAL BOOT ROM, 0 FOR ONBOARD ROM FE00 DBFC IN WAIT ;WAIT FOR HOME FE02 AF XRA A ;SETS A TO 0 FE03 6F MOV L,A ;START LOCATION IN RAM = 0 FE04 67 MOV H,A FE05 3C INR A ;SETS A TO 1 FE06 D3FA OUT SECT ;SET SECTOR REGISTER FE08 3E8C MVI A,08CH ;GET READ COMMAND FE0A D3F8 OUT DCOM ;ISSUE COMMAND TO 1771 FE0C DBFC NEXT: IN WAIT ;WAIT FOR INTRQ OR DRQ FE0E B7 ORA A ;SET FLAGS FE0F F219FE JP DONE ;DONE IF INTRQ FE12 DBFB IN DDATA ;READ BYTE FROM CONTROLLER FE14 77 MOV M,A ;MOVE IT TO RAM FE15 23 INX H ;ADVANCE ONE BYTE FE16 C30CFE JMP NEXT ;READ NEXT BYTE FE19 DBF8 DONE: IN STAT ;READ DISK STATUS FE1B B7 ORA A ;SET FLAGS FE1C CA7D00 JZ 7DH ;GO TO SBOOT IF ZERO FE1F 76 HLT ;ERROR - HALT END NO PROGRAM ERRORS 1 8080 MACRO ASSEMBLER, VER 3.0 ERRORS = 0 + 19:38 05/13/2017 + PAGE 2 SYMBOL TABLE * 01 A 0007 B 0000 C 0001 D 0002 DCOM 00F8 DDATA 00FB DONE FE19 E 0003 H 0004 L 0005 M 0006 NEXT FE0C PSW 0006 SECT 00FA SP 0006 STAT 00F8 WAIT 00FC