Advertisement
sniper_nuko

Command_Z80

Feb 16th, 2022
1,919
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.     MCX0L   equ 060H    ; Command register Lo
  2.     MCX0H   equ 061H    ; Command register Hi
  3.     MCX6L   equ 06CH    ; Read/Write register Lo
  4.     MCX6H   equ 06DH    ; Read/Write register Hi
  5.     MCX7L   equ 06EH    ; Read/Write register Lo
  6.     MCX7H   equ 07FH    ; Read/Write register Hi
  7.    
  8. SETOUTPUTPLS:
  9.     LD  HL,0000H
  10.     LD  BC,MCX7H
  11.     OUT (C),H
  12.     LD  BC,MCX7L
  13.     OUT (C),L
  14.    
  15.     LD  HL,1000     ; 1000Pulse
  16.     LD  BC,MCX6H
  17.     OUT (C),H
  18.     LD  BC,MCX6L
  19.     OUT (C),L
  20.    
  21.     LD  HL,006H     ; PLS Set command
  22.     LD  BC,MCX0H
  23.     OUT (C),H
  24.     LD  BC,MCX0L
  25.     OUT (C),L
  26.    
  27.     LD  HL,020H     ; Drive command
  28.     LD  BC,MCX0H
  29.     OUT (C),H
  30.     LD  BC,MCX0L
  31.     OUT (C),L
  32.    
  33.     RET
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement