| Assembler: | 
 Es wird angenommen, daß das intin und ptsin Feld schon in den
Line-A Parameterblock eingetragen wurde.
  
; Register retten
movem.l   D0-D2/A0-A2,-(A7)
; Zeiger Parameterblock LINEA
move.l    pParamblk,A0
; Adresse intin nach A1
move.l    (8,A0),A1
; Mode-Wort nach intin[0]
move.w    mode_wort,(A1)
; Adresse ptsin nach A1
move.l    (12,A0),A1
; X-Koordinate nach ptsin[0]
move.w    x,(A1)
; Y-Koordinate nach ptsin[1]
move.w    y,(2,A1)
; Writemode in LINEA.wrt_mode
move.w    wmode,(36,A0)
; Linienmuster in LINEA.patptr
move.w    patptr,(44,A0)
; Anzahl Muster in LINEA.patmsk
move.w    patmsk,(48,A0)
; Ebenenflag in LINEA.multifill
move.w    multifill,(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)
; Abbruchfunktion nach LINEA.fill_abort
move.l    fill_abort,(118,A0)
; Line-A Opcode
dc.w      $A00F
; Register restaurieren
movem.l   (A7)+,D0-D2/A0-A2
 
 |