home *** CD-ROM | disk | FTP | other *** search
/ Serious Magazine 11 / Serious_Magazine_11_2002_Dial_pl_Disk_2_of_2_Side_B.atr / smartide.lzh / IDE38F.ASM next >
Assembly Source File  |  2002-05-07  |  2KB  |  1 lines
  1. 0100 ;IDE38F.ASM   04/17/99¢0110 ;¢0120  *=$FC98  COLDSTART¢0130  JMP $E477¢0140 ;¢0150  *=$FC34  SELECT IDE SEG ^F1¢0160  JSR SELNXTHD¢0170  JMP $FC6D¢0180 ;¢0190  *=$FCB5  TOGGLE D2 ^F2¢0200  JSR PROCD2¢0210  .BYTE $EA,$EA,$EA,$EA¢0220  .BYTE $EA,$EA,$EA,$EA¢0230  LDA #$00¢0240 ;¢0250  *=$C31D  KILL ROM CHKSUM¢0260  NOP¢0270  NOP¢0280 ;¢0290  *=$D700¢0300 ;¢0310 INITL1L2¢0320  JSR FINDX¢0330  JSR SETL1L2¢0340  RTS¢0350 ;¢0360 SELNXTHD¢0370  JSR FINDX¢0380  JSR INCRX¢0390  JSR SETL1L2¢0400  RTS¢0410 ;¢0420 FINDX¢0430  LDX #$1C¢0440 NXTPARM LDA $D7BC+3,X¢0450  AND #$0F¢0460  BNE FOUNDX¢0470  DEX¢0480  DEX¢0490  DEX¢0500  DEX¢0510  BNE NXTPARM¢0520 FOUNDX RTS¢0530 ;¢0540 INCRX¢0550  JSR WRITEON¢0560  LDA $D7BC+3,X¢0570  AND #$F0¢0580  STA $D7BC+3,X¢0590  TXA¢0600  CLC¢0610  ADC #$04¢0620  AND #$1C¢0630  TAX¢0640  LDA $D7BC+3,X¢0650  ORA #$01¢0660  STA $D7BC+3,X¢0670  JSR WRITEOFF¢0680  RTS¢0690 ;¢0700 SETL1L2¢0710  TXA¢0720  LSR A¢0730  LSR A¢0740  AND #$0F¢0750  STA $D140¢0760  LDY $D301¢0770  RTS¢0780 ;¢0790 PROCD2¢0800  JSR WRITEON¢0810  LDA $D7DF¢0820  EOR #$02¢0830  STA $D7DF¢0840  JSR WRITEOFF¢0850  JSR FINDX¢0860  JSR SETL1L2¢0870  LDY $D301¢0880  RTS¢0890 ;¢0900 WRITEON¢0910  LDA #$40¢0920  STA $D140¢0930  RTS¢0940 ;¢0950 WRITEOFF¢0960  LDA #$00¢0970  STA $D140¢0980  RTS¢0990 ;¢1000  *=$D7BC¢1010  .BYTE $00,$00,$00,$00¢1020 HDTABL¢1030  .BYTE $00,$00,$06,$01 ;1536SD¢1040  .BYTE $00,$06,$06,$00 ;1536SD¢1050  .BYTE $00,$0C,$06,$00 ;1536SD¢1060  .BYTE $00,$12,$06,$00 ;1536SD¢1070  .BYTE $00,$18,$08,$60 ;2048DD¢1080  .BYTE $00,$20,$10,$60 ;4096DD¢1090  .BYTE $00,$30,$10,$60 ;4096DD¢1100  .BYTE $00,$40,$10,$62 ;4096DD¢1110  .BYTE $00,$50,$30,$63 ;12K DD¢1120  .BYTE $00,$80,$80,$64 ;32K DD¢1130  .BYTE $01,$00,$FF,$65 ;64K DD¢1140  .BYTE $02,$00,$FF,$66 ;64K DD¢1150  .BYTE $03,$00,$FF,$67 ;64K DD¢1160  .BYTE $04,$00,$FF,$68 ;64K DD¢1170  .BYTE $05,$00,$FF,$60 ;64K SD¢1180  .BYTE $06,$00,$FF,$60 ;64K SD¢1190 END¢