Menu: @Menu: MainQuit Å quitMenu: SlideshowsAmphitheater Åslider ("ampohshow")Forum Åslider ("forumshow")Frescoes Åslider ("muralshow")House of the Faun Åslider ("faunshow")House of Lucretius Fronto Åslider ("frontoshow")House of the Large FountainÅslider ("lfountshow")House of MenanderÅslider("menandershow")House of the MisteriÅslider("misterishow")House of the VettiÅslider("vettishow")NecropolisÅslider("necropshow")Street of MercuryÅslider("mercurshow")Grand Tour Åslider("TOTALSHOW")Menu: Export\SearchNote This PhotoÅphotolistExport Full Text Å FULLEXPORTExport This Page OnlyÅpageonlytextSearch CaptionsÅphotoreadySearch TextÅtextreadyCancel SearchÅprepsearchMenu: ControlAuto Slideshow off ÅtogglemodeCaptions on ÅcaptionHot text off ÅhottextMusic on ÅmusicNarration on Å radio ("cities:sounds:pompeiin")Sound louderÅset the soundlevel to the soundlevel + 2Sound softerÅset the soundlevel to the soundlevel -2
Find
gladiator
Next
Script Channel Commands
--------------------
GO TO THE FRAMEgo to the frame + 1cursor 4slider ("FOUNTS")cursor -1PUPPETSPRITE 20, TRUEIF THE CASTNUM OF SPRITE 20 = THE NUMBER OF CAST "OUTSI1S..sm" THEN NOTHINGELSE captionup updatestage SET THE CASTNUM OF SPRITE 20 TO THE CASTNUM OF SPRITE 20 - 1 puppetTransition 13, 0, 40 UPDATESTAGEend ifpupoffmarkexecgo to marker (1)entersearchIF THE MOUSEDOWN THEN GO TO MARKER (1)set the perframehook to roverNOTHINGgo to the frame - 1global reader, thefile, linenumber, searchswitchset linenumber to 0set searchswitch to trueentersearchIF THE MOUSEDOWN THEN GO TO MARKER (1)puppetsprite 23, trueset the castnum of sprite 23 to the castnum of sprite 1 + 153IF THE MOUSEDOWN THEN GO TO MARKER (1)puppetsprite 23, trueset the castnum of sprite 23 to the castnum of sprite 1 + 153IF THE MOUSEDOWN THEN GO TO MARKER (1)GO TO "FOUNTS"cursor 4set the locH of sprite 22 to -800set the loch of sprite 23 to -100puppetTransition 10, 0, 10, cursor -1IF the castnum of sprite 20 = the number of cast "VESUVT..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "VESUVT..SM" puppetTransition 11, 0, 40 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage cursor -1END IFGO TO "PUBLICS"GO TO "HOUSES"GO TO "WALLS"IF the castnum of sprite 20 = the number of cast "FUGIT2T..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "FUGIT2T..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage global slideshowname puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --set slideshowname to "fugitiveshow" cursor -1END IFpupoffrepeat with x = 1 to 24 set the cursor of sprite x to 0end repeatmarkexecGO TO "WALLSL"puppetsprite 23, trueset the castnum of sprite 23 to the castnum of sprite 1 + 152IF the castnum of sprite 20 = the number of cast "FMARCHT..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "FMARCHT..SM" puppetTransition 11, 0, 40 set the ink of sprite 4 to 39 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFGO TO "HOUSESL"global modeset mode to falseset the perframehook to roverset the visibility of sprite 19 to 0GO TO "PUBLICSL"mapit ("SAFNTT.PIC")--IF THE MOUSEDOWN THEN GO TO MARKER (1)set the controller of cast "guitar.mov" to 1sound playFile 1, "CITIES:SOUNDS:POMPEIIN"set the perframehook to rover--go to marker (1)puppetsprite 23, trueset the castnum of sprite 23 to the castnum of sprite 1 + 153--IF THE MOUSEDOWN THEN GO TO MARKER (1)IF the castnum of sprite 20 = the number of cast "LELONGT..SM" THEN NOTHINGELSE puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "LELONGT..SM" puppetTransition 11, 0, 40 set the ink of sprite 4 to 39 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow"END IFmapit ("mctowr2T.PIC")puppetsprite 23, trueset the castnum of sprite 23 to the castnum of sprite 1 + 153--IF THE MOUSEDOWN THEN GO TO MARKER (1)IF the castnum of sprite 20 = the number of cast "FMVESP1T..sm" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "FMVESP1T..sm" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFglobal slideshownameCURSOR 4if not (the ink of sprite 10 = 8) then nothingelse slider (slideshowname)end ifCURSOR -1IF the castnum of sprite 20 = the number of cast "VCUPID..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 10, True set the castnum of sprite 20 to the number of cast "VCUPID..SM" puppetTransition 11, 0, 40 set the ink of sprite 10 to 8 puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage global slideshowname set slideshowname to "vettishow" cursor -1END IF--PUPOFFcursor 4set the ink of sprite 10 to 39GO TO THE FRAME + 1cursor -1GO TO "FOUNTSL"--PUPOFFcursor 4set the ink of sprite 10 to 39GO TO THE FRAME -1cursor -1cursor 4put THE CASTNUM OF SPRITE 20 + 152 into rpreLoadCast r cursor -1puppetTransition 09, 0, 20PUPPETSPRITE 22, TRUEPUPPETSPRITE 23, TRUESET THE CASTNUM OF SPRITE 22 TO THE CASTNUM OF SPRITE 20 + 152SET THE LOCH OF SPRITE 22 TO 320if THE VISIBILITY OF sprite 19 = 0 then UPDATESTAGEelse set the castnum of sprite 23 to the castnum of sprite 19 set the locH of sprite 23 to 100 SET THE VISIBILITY OF SPRITE 23 TO 1 updatestageend ifif the castnum of sprite 20 = the number of cast "WOUTT..sm" then nothingelse captiondown updatestage PUPPETSPRITE 20, TRUE SET THE CASTNUM OF SPRITE 20 TO THE CASTNUM OF SPRITE 20 + 1 puppetTransition 14, 0, 80 UPDATESTAGEend ifmapit ("MSTABIA2.PIC")mapit ("TFFNTT.PIC")mapit ("WIDET.PIC")mapit ("PPLSTRT.PIC")mapit ("NGFNT2T.PIC")cursor 4set the locH of sprite 22 to -800set the locH of sprite 23 to -800puppetTransition 10, 0, 10CAPTIONCAPTIONcursor -1mapit ("MCMFNT2T.PIC")mapit ("MSVILLA.PIC")mapit ("MIOUT1.PIC")--PUPOFFcursor 4GO TO THE FRAME + 1cursor -1--PUPOFFcursor 4GO TO THE FRAME -1cursor -1mapit ("PNEC2.PIC")IF the castnum of sprite 20 = the number of cast "WIDES..sm" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "WIDES..sm" puppetTransition 11, 0, 40 set the ink of sprite 4 to 39 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestagecursor -1END IFmapit ("FOWALL1T.PIC")mapit ("MRBOT2T.PIC")mapit ("FUGIT3T.PIC")mapit ("SGARD2T.PIC")GO TO THE FRAMEGO TO THE FRAMEREPEAT WITH X = 10 TO 21 SET THE CURSOR OF SPRITE X TO 3END REPEATmapit ("VGARD2T.PIC")mapit ("TFFINTT.PIC")mapit ("CGTBK2T.PIC")mapit ("LARUM2T.PIC")mapit ("WOUTT.PIC")mapit ("ODSTG2T.PIC")mapit ("LELONGT.PIC")mapit ("LPOUTT.PIC")mapit ("ATRIUMT.PIC")mapit ("TATRIUM.PIC")mapit ("TRICLINT.PIC")mapit ("MAUGUST.PIC")mapit ("TEPIDT.PIC")mapit ("FMEUMT.PIC")mapit ("EREART.PIC")mapit ("PMINSD.PIC")mapit ("VESUVT.PIC")mapit ("PMOUTSD.PIC")IF the castnum of sprite 20 = the number of cast "PPLSTRT..sm" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "PPLSTRT..sm" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "CALIDART..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "CALIDART..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 39 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "MCTOWR3T..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "MCTOWR3T..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFmapit ("PNEC6.PIC")IF the castnum of sprite 20 = the number of cast "LTFOUNT..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "LTFOUNT..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "FMARCHT..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "FMARCHT..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "LELONGT..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "LELONGT..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "OUTSI2S..sm" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "OUTSI2S..sm" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "MISIS.PIC" THEN NOTHINGELSE cursor 4 puppetsprite 20, True set the castnum of sprite 20 to the number of cast "MISIS.PIC..SM" puppetTransition 11, 0, 40 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage cursor -1END IFIF the castnum of sprite 20 = the number of cast "ECOMPLEST..sm" THEN NOTHINGELSE cursor 4 puppetsprite 20, True set the castnum of sprite 20 to the number of cast "ECOMPLEST..sm" puppetTransition 11, 0, 40 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage cursor -1END IFIF the castnum of sprite 20 = the number of cast "VESUVT..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "VESUVT..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "FMMACE1T..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "FMMACE1T..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "LARUM1T..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "LARUM1T..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "WIDES..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "WIDES..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "TMOSAICS..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "TMOSAICS..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "SAFNTT..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "SAFNTT..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "TEPIDT..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "TEPIDT..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "FCOLN2T..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "FCOLN2T..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "ABATTL1T..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "ABATTL1T..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "VHERC1T..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "VHERC1T..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "MRTROYT..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True puppetsprite 4, True set the castnum of sprite 20 to the number of cast "MRTROYT..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "PMOUSD.PIC.SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True set the castnum of sprite 20 to the number of cast "PMOUSD.PIC.SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFIF the castnum of sprite 20 = the number of cast "PNEC4.PIC..SM" THEN NOTHINGELSE cursor 4 puppetsprite 20, True set the castnum of sprite 20 to the number of cast "PNEC4.PIC..SM" puppetTransition 11, 0, 40 --set the ink of sprite 4 to 37 updatestage puppetsprite 19, true set the castnum of sprite 19 to the castnum of sprite 20 + 304 updatestage --global slideshowname --set slideshowname to "fugitiveshow" cursor -1END IFCURSOR 4sound stop 1set the perframehook to 0GO TO FRAME "TOC" OF MOVIE "TOP"CURSOR -1