Assembler: |
; Register retten
movem.l D0-D2/A0-A2,-(A7)
; Zeiger Parameterblock LINEA
move.l pParamblk,A0
; linke obere Ecke, X-Koordinate in LINEA.x1
move.w x1,(38,A0)
; linke obere Ecke, Y-Koordinate in LINEA.y1
move.w y1,(40,A0)
; rechte untere Ecke, X-Koordinate in LINEA.x2
move.w x2,(42,A0)
; rechte untere Ecke, Y-Koordinate in LINEA.x2
move.w y2,(44,A0)
; Bit für erste Plane in LINEA.fg_bp_1
move.w colbit0,(24,A0)
; Bit für erste Plane in LINEA.fg_bp_2
move.w colbit1,(26,A0)
; Bit für erste Plane in LINEA.fg_bp_3
move.w colbit2,(28,A0)
; Bit für erste Plane in LINEA.fg_bp_4
move.w colbit3,(30,A0)
; Writemode in LINEA.wrt_mode
move.w wmode,(36,A0)
; Linienmuster in LINEA.patptr
move.w patptr,(46,A0)
; Anzahl Muster in LINEA.patmsk
move.w patmsk,(50,A0)
; Clipmode in LINEA.clip
move.w mode,(54,A0)
; linke obere Clip-Ecke, X-Koordinate in LINEA.xmn_clip
move.w cx1,(56,A0)
; linke obere Clip-Ecke, Y-Koordinate in LINEA.ymn_clip
move.w cy1,(58,A0)
; rechte untere Clip-Ecke, X-Koordinate in LINEA.xmx_clip
move.w cx2,(60,A0)
; rechte untere Clip-Ecke, Y-Koordinate in LINEA.ymx_clip
move.w cy2,(62,A0)
; Line-A Opcode
dc.w $A005
; Register restaurieren
movem.l (A7)+,D0-D2/A0-A2
|