home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Discovering Endangered Wildlife
/
GSPCD296A.iso
/
dew
/
lso
/
main.dss
< prev
next >
Wrap
Text File
|
1995-08-21
|
12KB
|
449 lines
set subdir=main
set dll=$dew_main.dll
set fps=7
set travelfps=20
set travelpoints=20
set delays=500,50,250
set msgtime=4000
set savearea=160
set pzlfontcolor=0,0,0
set vcClueColor=255,255,0
set vcMsgColor=0,255,255
set fontFudge=100,97
set gameExtraTime=20 ; % extra time for add'l tries for games
set gameTries=3 ; after which the game is assumed done
set ButtonDisableTime=3000,4000,5000,6000,7000,8000,9000,10000,11000,12000 ; up to 10 values in milliseconds
;----------------------------------
; START STUFF FOR BELOW
VAR BTNFILE=1000
text x_capmain=Endangered Wildlife
caption cap_main=x_capmain
text x_caphome=Endangered Wildlife - Main Menu
caption cap_home=x_caphome
text x_capgame=Endangered Wildlife - Game [%p]
caption cap_game=x_capgame
text x_captour=Endangered Wildlife - Tour
caption cap_tour=x_captour
;--- Variables
var null=0
var width=624
var height=464
var gheight=416
var black=0
var white=1
var yellow=10
var red=11
var blue=12
var green=13
var gray=14
var dkgray=15
var pink=16
var ltblue=17
var lavender=18
var ds_wb=257
var ds_yb=266
var ds_rb=267
var ds_bb=268
var ds_gb=269
var ds_pb=272
var ds_lbb=273
var ds_dgb=271 ; dark gray/black
var ds_lavb=274
xref tfc=ds_yb ; tictactoe font color
var ff_swiss=32
var ff_roman=16
var ff_dec=80
;--- Post commands (for buttons)
command bailout=2 ;delete if not used
command next=1
command exitscreen=1
command previous=80
command finished=1573
command exit=1308
command exitgroup_ok=798 ;use for exiting groups - ie Maps
command backout2=800 ;returns 1
command backout3=801
command backout4=802
;var dirtoggle=s_lhelp ;Temp fix for help sys
command giveup=0
command idCancel=0 ; (Used this DSS only)
command idOK=1
command loginDb=500
command optionsDb=501
command SavePlayerInfo=502
command StartVideo=350
command StopVideo=351
command do_PgUp=201
command do_PgDn=202
command kill_mem=409
command WaitForMM=495
command BeginGame=497
command ClearMidi=611,1 ; Send
command LoadQT=620,1 ; Send
command LoadQT2=620
command UnloadQT=621,1 ; Send
command FlushCache=630,1 ; Send
command NoCollageRepaint=950,1 ; Send
; button disablers
command DisableBtn3=640,1 ; Place in DO portion of screen group
command DisableBtnGame=649,1
;--- Effects
effect _effect=0 ;default
effect e_tb=1
effect e_bt=2
effect e_lr=3
effect e_rl=4
effect e_hi=5
effect e_ho=6
effect e_vi=7
effect e_vo=8
effect e_hb=9
effect e_vb=10
effect e_co=11
effect e_stb=12
effect e_sbt=13
effect e_slr=14
effect e_srl=15
effect e_rr=36
effect e_star=83
;--- MCI
mci openmidi=open sequencer
mci openwave=open waveaudio
mci stopmidi=close sequencer
mci closemidi=close sequencer
mci closeall=close all
;--- MIDI (format i.e.) name=$ext.mid,$basic.mid
midi Intro_midi=$Intro.mid
midi Main_midi=$Lee.mid
midi m_blank=$Blank.mid
midi m_game1=$Lee.mid
midi m_game2=$Lee.mid
midi m_bak01=$Lee.mid
midi m_bak02=$Lee.mid
midi m_afr1=$afri1.mid
midi m_afr2=$afri2.mid
midi m_afr3=$afri3.mid
midi m_car1=$car01.mid
midi m_car2=$car02.mid
midi m_car3=$car03.mid
;--- WAVE
wave3 _findthreat=$find_thr.wav
wave3 w_timesup=$sorry.wav
wave3 w_crash=$crash.wav
wave3 w_wawa=$sorry.wav
wave3 w_done=$gamedone.wav ;replace
wave3 w_snap=$camera.wav ;update?
wave3 w_fact=$gamedone.wav ;replace
;--- Rectangle regions
rect rfull=0,0,width,height
rect rgame=0,0,width,gheight
rect rGameBar=0,411,width,52
rect rGbMsg=93,410,402,55
rect rGbMsgboxtxt=93,8,402,60
rect rGtb=0,335,0,0
rect rmovie=192,142,0,0
rect rScale=17,151,391,298
rect rSclRtTop=424,150,175,80 ;424 is the left edge of Scl Buttons
rect rSclRtMid=424,240,175,80 ;buttons are 78 tall
rect rSclRtBot=424,330,175,80
rect rtr=360,0,280,430
rect rbr=360,280,280,200
rect rtl=10,0,300,430
rect rbl=10,280,300,430
rect rleft=20,10,300,400
rect rright=20,280,300,390
rect rtopctr=30,30,560,200
rect rctr=40,150,550,260
rect rbotctr=30,250,560,200
rect rbook=80,85,170,280
rect rwfnd=77,76,453,277
rect rlaw=118,128,380,275
rect rmaptext=39,350,540,85
rect rpictext=39,354,538,75
rect rpictext5=39,327,538,109
rect rVpic=39,74,231,307
rect rtictxt=77,76,453,277
rect rDYK01=95,330,410,105
rect rWOW01=80,300,430,120
rect rwho=270,305,340,50
rect rTpic=356,16,259,170
rect rtopline=10,5,width,150
rect rtoptitle=50,30,500,150
rect rThrTxt=40,225,530,190
rect rSol1Txt=70,70,485,300
rect rSol2Txt=72,62,497,292
rect rSol3Txt=85,50,465,310
rect rFact=0,0,530,270
rect rFactTxt=30,50,455,160
rect rcon=120,165,380,235
rect r0=0,0,0,0
rect rTourPgUp=573,224,23,35 ;For Tour buttons
rect rTourPgDn=573,381,23,35
;---Font Setup
font font13=Discovery Bold,13,400,ff_dec,90 ;90% leading
font font14=Discovery Bold,14,400,ff_dec,95 ;95% leading
font font15=Discovery Bold,15,400,ff_dec,95 ;95% leading
font font15a=Discovery Bold,15,400,ff_dec,90 ;90% leading
font font17=Discovery Bold,17,400,ff_dec,95 ;95% leading
font pzlfont=Discovery Bold,20,400,ff_dec
font font18=Discovery Bold,18,400,ff_dec,90 ;90% leading
font font19=Discovery Bold,19,400,ff_dec,90
font font20=Discovery Bold,20,400,ff_dec,95 ;95% leading
font font22=Discovery Bold,22,400,ff_dec,95 ;95% leading
font font25=Discovery Bold,25,400,ff_dec
font font30=Discovery Bold,30,400,ff_dec
font font40=Discovery Bold,40,400,ff_dec
XREF mapfont=font19
XREF tourfont=font20
XREF fonttSnd=font22
XREF fontThr=font22
XREF fontSol=font22
XREF fontScl=font18
; Button Definition
; Arrows
var ah=27
var aw=54
var a3=108
var a4=162
; Buttons
var bh=35
var bw=112
var b3=224
var b4=336
;--- Standard buttons
var btnX=420
var btnBotY3=425
rect rbtn_l=10,btnX,0,0
rect rbtn_c=256,btnX,0,0
rect rbtn_r=-10,btnX,0,0
rect rbtn_rbar=-10,8,0,0
rect rbtn_c2=256,429,0,0
rect rbtn_c3=256,426,0,0
rect rbtn_ct=-22,425,0,0 ; threat cont moved to right side
rect rbtn_scl=-24,425,0,0 ; scale button
rect rbtn_f=209,-10,0,0
rect rbtn_n=209,-10,0,0
rect rbtn_md=245,437,135,27 ;done
rect rprevMap=169,437,54,27 ;left arrow
rect rnextMap=402,437,54,27 ;right arrow
rect rbtn_hml=159,429,0,0
rect rbtn_wmr=354,429,0,0
var gb1=0
var gb2=35
var gb3=70
var gb4=105
var gb5=140
var gb6=175
var brw=gb1
;Continue
bitmap bCtup=BtnFile,0,brw,bw,bh
bitmap bCtdn=BtnFile,bw,brw,bw,bh
button b_Cont=rbtn_r,bCtup,bCtdn,next
button b_Cont_rbar=rbtn_rbar,bCtup,bCtdn,next
button b_Cont_c=rbtn_c,bCtup,bCtdn,next
button b_ContRvw_c=rbtn_c,bCtup,bCtdn,next
button b_Contend_c=rbtn_c,bCtup,bCtdn,next
button b_Cont_c2=rbtn_c2,bCtup,bCtdn,next
button b_Cont_ct=rbtn_ct,bCtup,bCtdn,next ;is this used?
button b_Cont_scl=rbtn_scl,bCtup,bCtdn,next
button b_Cont_f=rbtn_f,bCtup,bCtdn,next
button b_Cont_n=rbtn_n,bCtup,bCtdn,next
button b_ContTour=rbtn_c3,bCtup,bCtdn,next
; GiveUp -> GoBack (Here in spirit only)
bitmap bgup=BtnFile,b3,brw,bw,bh
bitmap bgdn=BtnFile,b4,brw,bw,bh
button b_Give=rbtn_r,bgup,bgdn,bailout
; GoBack
bitmap bgbup=BtnFile,b3,brw,bw,bh
bitmap bgbdn=BtnFile,b4,brw,bw,bh
button b_GoBack=rbtn_l,bgbup,bgbdn,bailout
button b_GoBack_r=rbtn_r,bgbup,bgbdn,bailout
button b_GoBack_c=rbtn_c,bgbup,bgbdn,bailout
var brw=gb2
; Sound
bitmap bsndup=BtnFile,0,brw,bw,bh
bitmap bsnddn=BtnFile,bw,brw,bw,bh
; Video
bitmap bvidup=BtnFile,0,brw,bw,bh
bitmap bviddn=BtnFile,bw,brw,bw,bh
button b_mov=rbtn_c,bvidup,bviddn,StartVideo ;Delete mov1&2 from pzls then delete next 2 lines
button b_mov1=rbtn_c,bvidup,bviddn,StartVideo
button b_mov2=rbtn_c,bvidup,bviddn,StartVideo
button b_mov_r=rbtn_r,bvidup,bviddn,StartVideo
; Options
bitmap optup=BtnFile,b3,brw,bw,bh
bitmap optdn=BtnFile,b4,brw,bw,bh
button b_optb=rbtn_l,optup,optdn,OptionsDb
var brw=gb3
; Main Menu
bitmap menuup=BtnFile,0,brw,bw,bh
bitmap menudn=BtnFile,bw,brw,bw,bh
button b_menub=rbtn_r,menuup,menudn,exitgroup_ok
button b_menu_c2=rbtn_c2,menuup,menudn,previous
button b_tourhome=rbtn_hml,menuup,menudn,backout2
button b_gamemain=rbtn_r,menuup,menudn,exitgroup_ok
; Tutorial
bitmap tutup=BtnFile,b3,br