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