Assembler: |
Es wird angenommen, daß das intin und ptsin Feld schon in den
Line-A Parameterblock eingetragen wurde.movem.l D0-D2/A0-A2,-(A7) ; Register retten
move.l pParamblk,A0 ; Zeiger Parameterblock LINEA
move.l (8,A0),A1 ; Adresse intin nach A1
move.w mode_wort,(A1) ; Mode-Wort nach intin[0]
move.l (12,A0),A1 ; Adresse ptsin nach A1
move.w x,(A1) ; X-Koordinate nach ptsin[0]
move.w y,(2,A1) ; Y-Koordinate nach ptsin[1]
move.w wmode,(36,A0) ; Writemode in LINEA.wrt_mode
move.w patptr,(44,A0) ; Linienmuster in LINEA.patptr
move.w patmsk,(48,A0) ; Anzahl Muster in LINEA.patmsk
move.w multifill,(50,A0) ; Ebenenflag in LINEA.multifill
move.w mode,(54,A0) ; Clipmode in LINEA.clip
move.w cx1,(56,A0) ; linke obere Clip-Ecke, X-Koordinate in LINEA.xmn_clip
move.w cy1,(58,A0) ; linke obere Clip-Ecke, Y-Koordinate in LINEA.ymn_clip
move.w cx2,(60,A0) ; rechte untere Clip-Ecke, X-Koordinate in LINEA.xmx_clip
move.w cy2,(62,A0) ; rechte untere Clip-Ecke, Y-Koordinate in LINEA.ymx_clip
move.l fill_abort,(118,A0); Abbruchfunktion nach LINEA.fill_abort
dc.w $A00F ; Line-A Opcode
movem.l (A7)+,D0-D2/A0-A2 ; Register restaurieren
|