| From: | David McMinn |
| Date: | 8 Aug 2000 at 10:10:15 |
| Subject: | Re: getting a super72 screenmode - can someone help? |
Hi Jason
> I`m trying to get the above screenmode for a game I am writing (super hi res
> laced 800x600) using blitz 2.1 on an a1200 with WB3.0.
That'll be fun for people without monitors and people with GFX cards ;)
> Can anyone provide the correct vmode for the screen command, or tell me how to
> do it? (I only need 4 colours).
The correct viewmode would be (#SUPER72_MONITOR_ID | #SUPERLACE_KEY). You'll
need to include amigalibs.res in the "Compiler Options" window, but if you
don't the values are:
#SUPER72_MONITOR_ID =$81000
#SUPERLACE_KEY =$8024
If you are able to have a variable sized display, then the best thing would be
to let the user choose the screenmode and size from an ASL requester.
If you must have it fixed at 800*600, then you might want to try figuring out
the best viewmode for a particular system (not fixed to shires laced). This
doesn't always work 100% though, so you'd maybe need to check it out before
using it:
; Try to figure out best mode given some properties
Dim bmidtags.TagItem(5)
bmidtags(0)\ti_Tag = #BIDTAG_NominalWidth,800
bmidtags(1)\ti_Tag = #BIDTAG_NominalHeight,600
bmidtags(2)\ti_Tag = #BIDTAG_DesiredWidth,800
bmidtags(3)\ti_Tag = #BIDTAG_DesiredHeight,600
bmidtags(4)\ti_Tag = #BIDTAG_Depth,2
bmidtags(5)\ti_Tag = #TAG_DONE
viewmode.l = BestModeIDA_(&bmidatags(0))
; If the system couldn't figure out the screenmode then viewmode will be -1.
; We check for this and set the default (SHIRES-LACE) if we find it.
If viewmode = -1 then viewmode = (#SUPER72_MONITOR_ID | #SUPERLACE_KEY)
; Open screen
Dim scrtags.TagItem(5)
scrtags(0)\ti_Tag = #SA_Width,800
scrtags(1)\ti_Tag = #SA_Height,600
scrtags(2)\ti_Tag = #SA_Depth,2
scrtags(3)\ti_Tag = #SA_DisplayID,viewmode
scrtags(4)\ti_Tag = #TAG_DONE
ScreenTags 0,"blah",&scrtags(0)
---------------------------------------------------------------------
To unsubscribe, e-mail: blitz-list-unsubscribe@netsoc.ucd.ie
For additional commands, e-mail: blitz-list-help@netsoc.ucd.ie