•  Back 
  •  Seedfill 
  •  Index 
  •  Tree View 
  •  Cross references 
  •  Help page 
  •  Show info about hypertext 
  •  View a new file 
Topic       : TOS - The Operating System
Author      : 
Version     : tos.hyp (December 19, 2008)
Subject     : Programmieren/Atari
Nodes       : 3010
Index Size  : 93790
HCP-Version : 5
Compiled on : Atari
@charset    : atarist
@lang       : 
@default    : Title
@help       : 
@options    : +g -i -s +x +zz -t4
@width      : 70
View Ref-File6.20.1  Bindings for seed_fill                                     TOS

 Pure-C:    void seed_fill( void ); /* WARNING: NOT supported ! */

 Assembler: It is assumed that the intin and ptsin fields have already 
            been entered in the Line-A parameter block.

            movem.l   D0-D2/A0-A2,-(A7)  ; Save registers
            move.l    pParamblk,A0       ; Pointer parameter block LINEA
            move.l    (8,A0),A1          ; Address intin to A1
            move.w    mode_wort,(A1)     ; Mode word to intin[0]
            move.l    (12,A0),A1         ; Address ptsin to A1
            move.w    x,(A1)             ; X-coordinate to ptsin[0]
            move.w    y,(2,A1)           ; Y-coordinate to ptsin[1]
            move.w    wmode,(36,A0)      ; Writing mode in LINEA.wrt_mode
            move.w    patptr,(44,A0)     ; Line pattern in LINEA.patptr
            move.w    patmsk,(48,A0)     ; Number of patterns in LINEA.patmsk
            move.w    multifill,(50,A0)  ; Plane flag in LINEA.multifill
            move.w    mode,(54,A0)       ; Clip mode in LINEA.clip
            move.w    cx1,(56,A0)        ; Top left clip corner, X-coordinate in LINEA.xmn_clip
            move.w    cy1,(58,A0)        ; Top left clip corner, Y-coordinate in LINEA.ymn_clip
            move.w    cx2,(60,A0)        ; Bottom right clip corner, X-coordinate in LINEA.xmx_clip
            move.w    cy2,(62,A0)        ; Bottom right clip corner, Y-coordinate in LINEA.ymx_clip
            move.l    fill_abort,(118,A0); Abort function to LINEA.fill_abort
            dc.w      $A00F              ; Line-A opcode
            movem.l   (A7)+,D0-D2/A0-A2  ; Restore registers