PC World Plus! (NZ) 2001 October/PCW1001.iso/Games/startopiademo1.exe/missions/34/mish34.txt

Text File | 2001-05-14 | 5KB | 276 lines

:autorun
if
then
    title "Tutorial05"
    disallow decks mid_deck
    disallow decks bio_deck
    set reply01 3
    set reply02 3
    disable
end

:energytopup
if
    turn > topup
then
    set topup (turn + 1000)
    set energy 100000
end


:wartutorial010
if
    turn > 10
then
    tutorial "tutorial_tutorial81" set wartutorial 1
    disable
end

:wartutorial020
if
      wartutorial = 1
then
    cam_pos 80 100 200 0 256
    place_peep grey resident 6 6 sub_deck 1024
    place_peep salt_hog resident 6 7 sub_deck 1024
    place_peep targ resident 6 8 sub_deck 1024
    place_peep gor resident 6 9 sub_deck 1024
    place_peep grey resident 7 6 sub_deck 1024
    place_peep salt_hog resident 7 7 sub_deck 1024
    place_peep targ resident 7 8 sub_deck 1024
    place_peep gor resident 7 9 sub_deck 1024
    tutorial "tutorial_tutorial82" set wartutorial 2
    disable
end

:wartutorial030
if
      wartutorial = 2
then
    tutorial "tutorial_tutorial83" set wartutorial 3
    disable
end

:wartutorial040
if
      wartutorial = 3
then
    tutorial "tutorial_tutorial84" set wartutorial 4
    disable
end

:wartutorial050
if
    wartutorial = 4
then
    tutorial "tutorial_tutorial85" set wartutorial 5
    disable
end

:wartutorial060
if
    wartutorial = 5
then
    tutorial "tutorial_tutorial86" set wartutorial 6
    disable
end


:wartutorial070
if
    wartutorial = 6
then
    tutorial "tutorial_tutorial87" set wartutorial 7
    disable
end

:spygenerator
if
    wartutorial = 7
    normal_peep_count > 2
    turn > spygenerator
then
    place_peep spy assassin 8 16 sub_deck 1024
    set spygenerator (turn + 500)
    set spiesgenerated (spiesgenerated + 1)
end

:wartutorial090
if
    spiesgenerated > 6
then
    set wartutorial 8
    set scriptwait (turn + 100)
    disable
end

:wartutorial095
if
    peepstat stationwide allset dead resident roger = resident_count
    spy_count > 0
then
    incoming local_comms "tutorial_tutorial99"
    disable
end

:wartutorial100
if
    wartutorial = 8
    peepstat stationwide race spy allset dead roger = spy_count
    turn > scriptwait
then
    tutorial "tutorial_tutorial88" set wartutorial 9
    disable
end


:peeptopup100
if
    peepstat stationwide race spy allset dead roger =  spy_count
    wartutorial > 7
    wartutorial < 10
    gor_count < 2
then
    place_peep gor resident 8 16 sub_deck 1024
end

:peeptopup200
if
    peepstat stationwide race spy allset dead roger =  spy_count
    wartutorial > 7
    wartutorial < 10
    grey_count < 2
then
    place_peep grey resident 8 16 sub_deck 1024
end

:peeptopup300
if
    peepstat stationwide race spy allset dead roger =  spy_count
    wartutorial > 7
    wartutorial < 10
    targ_count < 2
then
    place_peep targ resident 8 16 sub_deck 1024
end

:peeptopup400
if
    peepstat stationwide race spy allset dead roger =  spy_count
    wartutorial > 7
    wartutorial < 10
    salt_hog_count < 2
then
    place_peep salt_hog resident 8 16 sub_deck 1024
end

:peeptopup500
if
    wartutorial = 9
    scutter_count < 1
then
    place_peep scutter 8 16 sub_deck 1024
end

:wartutorial110
if
    wartutorial = 9
    resident_count = 8
then
    tutorial "tutorial_tutorial89" set wartutorial 10 "OSDpeepmanagement"
    disable
end

:wartutorial120
if
    wartutorial = 10
then
    tutorial "tutorial_tutorial90" set wartutorial 11 "managementoverview"
    disable
end

:wartutorial130
if
    wartutorial = 11
then
    tutorial "tutorial_tutorial91" set wibble 3 special placeroom
    disable
end

:wartutorial140
if
    enemy_count > 1
    wartutorial > 10
then
    tutorial "tutorial_tutorial92" set wartutorial 13
    disable
end

:wartutorial150
if
    wartutorial = 13
then
    place_peep police_scutter 8 16 sub_deck 1024
    place_peep police_scutter 8 17 sub_deck 1024
    tutorial "tutorial_tutorial93" set wartutorial 14 "segmentdoor"
    disable
end

:wartutorial160
if
    wartutorial = 14
then
    tutorial "tutorial_tutorial94" set wartutorial 15
    disable
end

:wartutorial170
if
    wartutorial = 15
then
    tutorial "tutorial_tutorial95" set wartutorial 16 "segmentdoor"
    disable
end

:wartutorial180
if
    wartutorial = 16
    array ownsubdeck 1 = 1
then
    multitrigger :attack
    tutorial "tutorial_tutorial96" set wartutorial 17
    disable
end

:attack
if
    0
then
    disable
end

:wartutorial190
if
    wartutorial = 17
    array ownsubdeck 2 = 1
then
    incoming local_comms icon 0 respond reply01 "tutorial_tutorial97"
    disable
end

:wartutorial200
if
    wartutorial = 17
    police_scutter_count < 1
then
    incoming local_comms icon 0 respond reply01 "tutorial_tutorial98"
    disable
end

:tutorialend
if
    reply01 < 3
then
    win
    disable
end