;
; opal vision library support  blitz library #217
; 5th May, 1993
;
; OpenScreen24,CloseScreen24,WritePixel24,ReadPixel24,ClearScreen24,ILBMtoOV
; UpdateDelay24,Refresh24,SetDisplayBottom24,ClearDisplayBottom24,SetSprite24
; AmigaPriority,OVPriority,DualDisplay24,SingleDisplay24,AppendCopper24
; RectFill24,UpdateCoPro24,SetControlBit24,PaletteMap24,UpdatePalette24
; Scroll24,LoadIFF24,SetScreen24,SaveIFF24,CreateScreen24,FreeScreen24
; UpdateRegs24,SetLoadAddress24,RGBtoOV,ActiveScreen24,FadeIn24,FadeOut24
; ClearQuick24,WriteThumbnail24,SetRGB24,DrawLine24,StopUpdate24,WritePFPixel24
; WritePRPixel24,OVtoRGB,OVtoILBM,UpdateAll24,UpdatePFStencil24,EnablePRStencil24
; DisablePRStencil24,ClearPRStencil24,SetPRStencil24,DisplayFrame24,WriteFrame24
; BitPlanetoOV,SetCoPro24,RegWait24,DualPlayField24,SinglePlayField24
; ClearPFStencil24,SetPFStencil24,ReadPRPixel24,ReadPFPixel24,OVtoBitPlane
; FreezeFrame24,LowMemUpdate24,DisplayThumbnail24,Config24,AutoSync24
; DrawEllipse24,LatchDisplay24,SetHires24,SetLores24,DownLoadFrame24
; SaveJPEG24,LowMem2Update24,LowMemRGB24,AmosPatch24

#MAXCOPROINS=290

NEWTYPE .OpalScreen
  Width.w:Height:Depth
  ClipX1:ClipY1:ClipX2:ClipY2
  BytesPerLine:Flags:RelX:RelY
  *UserPort.l            ;MsgPort
  MaxFrames.w:VStart:CoProOffset:LastWait:LastCoProIns
  *BitPlanes.b[24]
  *MaskPlane.b
  AddressReg.l
  UpdateDelay.b:PalLoadAddress:PixelReadMask:CommandReg
  ppalette.b[3*256]
  Pen_R:Pen_G:Pen_B
  rred:ggreen:bblue
  CoProData.b[#MAXCOPROINS]
  Modulo.w
  Reserved.b[38]
End NEWTYPE

#HIRES24=1
#ILACE24=2
#OVERSCAN24=4
#NNTSC24=8
#CLOSEABLE24=16
#PLANES8=32
#PLANES15=64
#CONTROLONLY24=$2000
#PALMAP24=$4000
#INCHIP24=$8000

*o.OpalScreen=OpenScreen24_(#HIRES24)

;*o\Pen_R=255

RectFill24_ *o,0,0,60,60

Refresh24_

VWait 50

CloseScreen24_

MouseWait