•  Back 
  •  Line-A Function Reference 
  •  Index 
  •  Tree View 
  •  Cross references 
  •  %About 
  •  Show info about hypertext 
  •  View a new file 
Topic       : The ATARI Compendium
Author      : Scott Sanders / JAY Software
Version     : 1.25 (20/6/2003)
Subject     : Documentation
Nodes       : 1117
Index Size  : 32614
HCP-Version : 6
Compiled on : Atari
@charset    : UTF-8
@lang       : en
@default    : 
@help       : %About
@options    : +g -i -t4 +y +z
@width      : 100
View Ref-Filev_bar()
vr_recfl()
$A005 - Filled Rectangle                                             Line-A

Function      Draw a filled rectangle at the specified coordinates.

Parameters    CLIP is a flag which when set to 1 enables clipping and when
              set to 0 disables it. All output of this function is
              confined to the region bounded by ( XMINCL, YMINCL ) and (
              XMAXCL, YMAXCL ). Other parameters are consistent with the
              definitions given under $A004.

Example       ; Draw a filled rectangle with its upper
Binding       ; left corner at ( 0, 0 ) and its lower
              ; right corner at ( 100, 100 ). Clip the
              ; rectangle to within ( 10, 10 ) and
              ; ( 90, 90 )

                 move.w   #1,24(a5)       ; COLBIT0
                 move.w   #1,26(a5)       ; COLBIT1
                 move.w   #1,28(a5)       ; COLBIT2
                 move.w   #1,30(a5)       ; COLBIT3
                 move.w   #0,36(a5)       ; WRMODE
                 move.w   #0,38(a5)       ; X1
                 move.w   #0,40(a5)       ; Y1
                 move.w   #100,42(a5)     ; X2
                 move.w   #100,44(a5)     ; Y2
                 move.l   #stipple,46(a5) ; PATPTR
                 move.w   #1,50(a5)       ; PATMSK
                 move.w   #0,52(a5)       ; MFILL
                 move.w   #1,54(a5)       ; CLIP
                 move.w   #10,56(a5)      ; XMINCL
                 move.w   #10,58(a5)      ; YMINCL
                 move.w   #90,60(a5)      ; XMAXCL
                 move.w   #90,62(a5)      ; YMAXCL
                 .dc.w    $A005

                 .data
              stipple:
                 .dc.w    $AAAA
                 .dc.w    $5555

See Also      v_bar(), vr_recfl()