mirror of
https://github.com/pruten/shoebill.git
synced 2024-06-11 09:29:30 +00:00
1 line
5.8 KiB
Plaintext
1 line
5.8 KiB
Plaintext
|
MACHINE MC68020
STRING C
PRINT OFF ; What does this do?
INCLUDE 'SysErr.a'
INCLUDE 'SysEqu.a'
INCLUDE 'ROMEqu.a'
INCLUDE 'SlotEqu.a'
INCLUDE 'TimeEqu.a'
INCLUDE 'Traps.a'
INCLUDE 'VideoEqu.a'
PRINT ON
VideoDeclROM MAIN
WITH VDPageInfo,SlotIntQElement
FormatBlockSize EQU 20
ROMSize EQU 4096
MyBoardID EQU $0050 ; FIXME: CHANGE THIS
; ---- 1 bit video params ----
myVidParams_one
DC.L myVidParams_one_end-myVidParams_one
DC.L 0 ; offset to video RAM base (why is this 32 on TFB?)
DC.W 1440/8 ; width of the buffer for a video scan line
DC.W 0, 0, 900, 1440
DC.W 0 ; version
DC.W 0 ; packType
DC.L 0 ; packSize
DC.L $48000 ; horizontal resolution (px/in)
DC.L $48000 ; vertical resolution
DC.W 0 ; Pixel type (chunky)
DC.W 1 ; Pixel size (1 bit/px)
DC.W 1 ; Number of components
DC.W 1 ; Size of components (size of a single component, or of all?)
DC.L 0 ; hmPlaneBytes (??)
myVidParams_one_end
; ---- 2 bit video params ----
myVidParams_two
DC.L myVidParams_two_end-myVidParams_two
DC.L 0 ; offset to video RAM base (why is this 32 on TFB?)
DC.W 1440/4 ; width of the buffer for a video scan line
DC.W 0, 0, 900, 1440
DC.W 0 ; version
DC.W 0 ; packType
DC.L 0 ; packSize
DC.L $48000 ; horizontal resolution (px/in)
DC.L $48000 ; vertical resolution
DC.W 0 ; Pixel type (chunky)
DC.W 2 ; Pixel size (1 bit/px)
DC.W 1 ; Number of components
DC.W 2 ; Size of each component
DC.L 0 ; hmPlaneBytes (??)
myVidParams_two_end
; ---- 4 bit video params ----
myVidParams_four
DC.L myVidParams_four_end-myVidParams_four
DC.L 0 ; offset to video RAM base (why is this 32 on TFB?)
DC.W 1440/2 ; width of the buffer for a video scan line
DC.W 0, 0, 900, 1440
DC.W 0 ; version
DC.W 0 ; packType
DC.L 0 ; packSize
DC.L $48000 ; horizontal resolution (px/in)
DC.L $48000 ; vertical resolution
DC.W 0 ; Pixel type (chunky)
DC.W 4 ; Pixel size (1 bit/px)
DC.W 1 ; Number of components
DC.W 4 ; Size of each component
DC.L 0 ; hmPlaneBytes (??)
myVidParams_four_end
; ---- 8 bit video params ----
myVidParams_eight
DC.L myVidParams_eight_end-myVidParams_eight
DC.L 0 ; offset to video RAM base (why is this 32 on TFB?)
DC.W 1440 ; width of the buffer for a video scan line
DC.W 0, 0, 900, 1440
DC.W 0 ; version
DC.W 0 ; packType
DC.L 0 ; packSize
DC.L $48000 ; horizontal resolution (px/in)
DC.L $48000 ; vertical resolution
DC.W 0 ; Pixel type (chunky)
DC.W 8 ; Pixel size (1 bit/px)
DC.W 1 ; Number of components
DC.W 8 ; Size of each component
DC.L 0 ; hmPlaneBytes (??)
myVidParams_eight_end
; ---- sResource directory ----
CategoryBoard EQU 1
CategoryVideo EQU 128
sResourceDir OSLstEntry CategoryBoard, sResourceBoard
OSLstEntry CategoryVideo, sResourceVideo
DatLstEntry endOfList,0
; ---- Board sResource ----
sResourceBoard
OSLstEntry sRsrcType, boardType
OSLstEntry sRsrcName, boardName
DatLstEntry boardID, MyBoardID
OSLstEntry primaryInit, myPrimaryInit
OSLstEntry vendorInfo, myVendorInfo
DatLstEntry endOfList, 0
boardType
DC.W CatBoard ; category
DC.W TypBoard ; type
DC.W 0 ; driver sw ?
DC.W 0 ; driver hw ?
boardName DC.L 'Shoebill Phony Video'
myPrimaryInit
DC.L myPrimaryInit_end-myPrimaryInit
INCLUDE 'shoebill_video_primary_init.a'
myPrimaryInit_end EQU *
STRING C
myVendorInfo OSLstEntry VendorId, myVendorID
OSLstEntry RevLevel, myRevLevel
OSLstEntry PartNum, myPartNum
myVendorID DC.L 'Shoebill'
myRevLevel DC.L 'Rev-1'
myPartNum DC.L 'Moof'
; ---- Video sResource ----
sResourceVideo
OSLstEntry sRsrcType, myVideoType
OSLstEntry sRsrcName, myVideoName
OSLstEntry sRsrcDrvrDir, videoDriverDirectory
DatLstEntry sRsrcHWDevId, 1
; DatLstEntry sRsrcFlags, 4 ; f32BitMode (A/UX refuses to load the driver when field is included)
;OSLstEntry MinorBaseOS, myMinorBaseOS
;OSLstEntry MinorLength, myMinorLength
OSLstEntry MajorBaseOS, myMajorBaseOS
OSLstEntry MajorLength, myMajorLength
OSLstEntry OneBitMode, myOneBitMode
OSLstEntry TwoBitMode, myTwoBitMode
OSLstEntry FourBitMode, myFourBitMode
OSLstEntry EightBitMode, myEightBi
|