home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Computer Buyer 1996 June
/
BUYER_696.iso
/
multimed.ia
/
wilddemo
/
dew
/
lso
/
tour.dss
< prev
next >
Wrap
Text File
|
1994-11-23
|
4KB
|
130 lines
set inherit=1 ; all parent script objects can be used here!
set subdir=tour
set dll=$Dew_Tour.dll
;----------------------------------
;TEMP FOR MAPPING
var x=5
var y=5
-----------------
var tourgrid=1050
var BarHt=418
var TbtnHt=423 ;(BarHt+5)
rect rBtnbar=0,BarHt,624,52
rect rqbox=0,0,336,209
rect rbtnT1=4,TbtnHt,80,37
rect rbtnT2=95,TbtnHt,72,37
rect rbtnT3=167,TbtnHt,72,37
rect rbtnT4=239,TbtnHt,72,37
rect rbtnT5=311,TbtnHt,72,37
rect rbtnT6=383,TbtnHt,72,37
rect rprn_btn=467,TbtnHt,77,37
rect rrtn_btn=544,TbtnHt,77,37
rect rmm1_btn=562,10,52,52
rect rmm2_btn=562,72,52,52
rect rmm3_btn=562,134,52,52
;rect rmovtxt= SET ON SCREEN
rect rTourPic=356,16,0,0 ;QT size - estimate only
rect rTourPic2=340,0,0,0 ;Corner piece
rect rTourPic3=356,17,0,0 ;Ani T_Pic size
rect rTourAnimal=22,10,624,80
rect rTourPicTitle=33,357,555,73
rect rTourText=50,230,485,180
rect rTourTitle=26,48,284,139
rect rTourTitleQ=50,58,268,60
rect rTourTitle2=50,105,240,100
; TOUR BITMAPS
BITMAP BMP_TOURBAK=1000
PICTURE p_TourBak=rfull,BMP_TOURBAK
BITMAP BMP_TOURBAK2=1002
PICTURE p_TourBak2=rfull,BMP_TOURBAK2
PICTURE p_Qbox=rqbox,1005
BITMAP BMP_BTNBAR=1010
PICTURE p_BtnBar=rBtnBar,BMP_BTNBAR
BITMAP BMP_QFRM=1101 ;tourb_q
BITMAP BMP_MOVIE=1500
PICTURE p_Movie=rfull,BMP_MOVIE
; TOUR MAP COLLECTION
BITMAP BMP_TOUR_MAP=2000
BITMAP BMP_AFRI_MAP=2010
BITMAP BMP_ASIA_MAP=2020
BITMAP BMP_AUS_MAP=2030
BITMAP BMP_EUROPE_MAP=2040
BITMAP BMP_NA_MAP=2050
BITMAP BMP_SAME_MAP=2060
VAR TBFile=1020 ; Tour Button File
BITMAP bT1up=TBFile,0,0,80,37
BITMAP bT1dn=TBFile,0,37,80,37
BITMAP bT2up=TBFile,80,0,72,37
BITMAP bT2dn=TBFile,80,37,72,37
BITMAP bT3up=TBFile,152,0,72,37
BITMAP bT3dn=TBFile,152,37,72,37
BITMAP bT4up=TBFile,224,0,72,37
BITMAP bT4dn=TBFile,224,37,72,37
BITMAP bT5up=TBFile,296,0,72,37
BITMAP bT5dn=TBFile,296,37,72,37
BITMAP bT6up=TBFile,368,0,72,37
BITMAP bT6dn=TBFile,368,37,72,37
BITMAP bTprnUp=TBFile,440,0,77,37
BITMAP bTprnDn=TBFile,440,37,77,37
BITMAP bTrtnUp=TBFile,517,0,77,37
BITMAP bTrtnDn=TBFile,517,37,77,37
;MM Bitmaps
VAR TBFileMM=1025 ; Tour Button File for MultiMedia
BITMAP bTmov1Up=TBFileMM,0,0,52,52
BITMAP bTmov1Dn=TBFileMM,0,52,52,52
BITMAP bTsndUp=TBFileMM,52,0,52,52
BITMAP bTsndDn=TBFileMM,52,52,52,52
;----------------------------------
include gridsqrs=$tour\gridsqrs.inc
include prncmds=$tour\prncmds.inc
;----------------------------------
include tourscrp=$tour\tourscrp.inc
include africa_map=$tour\africa.map
include asia_map=$tour\asia.map
include aus_map=$tour\aus.map
include europe_map=$tour\europe.map
include na_map=$tour\na.map
include same_map=$tour\same.map
screen s_africa=rfull,(p_africa_map,st_africa,g_africaButts,bg_tour2)
screen s_asia=rfull,(p_asia_map,st_asia,g_asiaButts,bg_tour2)
screen s_aus=rfull,(p_aus_map,st_aus,g_ausButts,bg_tour2)
screen s_europe=rfull,(p_europe_map,st_europe,g_europeButts,bg_tour2)
screen s_na=rfull,(p_na_map,st_na,g_naButts,bg_tour2)
screen s_same=rfull,(p_same_map,st_same,g_sameButts,bg_tour2)
rect r_africa=280,135,100,120
rect r_asia=419,71,109,85
rect r_aus=454,197,92,59
rect r_europe=291,76,106,45
rect r_na=75,61,145,93
rect r_same=169,155,104,132
button b_africa=r_africa,0,0,s_africa
button b_asia=r_asia,0,0,s_asia
button b_aus=r_aus,0,0,s_aus
button b_europe=r_europe,0,0,s_europe
button b_na=r_na,0,0,s_na
button b_same=r_same,0,0,s_same
text x_unique_title=Unique Fact
PICTURE p_tour_map=rfull,BMP_TOUR_MAP
text x_top=Welcome to the Discovery Tour !~Choose a continent to travel to...
showtext st_top=rmaptext,font25,m,black,x_top
screen _main=rfull,(p_tour_map,b_africa,b_asia,b_aus,b_europe,b_na,b_same,st_top,b_menu_c2),(cap_tour)
;----------------------------------