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

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

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

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

:furnituretutorial020
if
    turn > 10
then
    place_peep scutter 6 2 sub_deck 1024
    tutorial "tutorial_tutorial24" set furnituretutorial 1
    disable
end

:furnituretutorial030
if
    furnituretutorial = 1
then
    cam_pos 80 100 200 0 256
    placeportable furniture_plan_crate 8 12 sub_deck 1000 plaza_bench
    tutorial "tutorial_tutorial25" set furnituretutorial 2 "opencratebutton"
    disable
end


:furnituretutorial040
if
    furnituretutorial = 2
then
    tutorial "tutorial_tutorial26" set wibble 3 special placeroom
    disable
end

:furniturebodge040
if
    plaza_bench_count > 0
then
    set furnituretutorial 3
    disable
end

:furnituretutorial050
if
    furnituretutorial = 3
then
    tutorial "tutorial_tutorial27" set furnituretutorial 4
    disable
end


;COMPLEX ROOM BUILDING - BERTH
:berthtutorial010
if
    furnituretutorial = 4
then
    cam_pos 80 100 200 0 256
    placeportable hard_plan_crate 8 14 sub_deck 1000 berth
    set scriptwait (turn + 10)
    disable
end

:berthtutorial015
if
    turn > scriptwait
    cargoexists hard_plan_crate berth > 0
then
    tutorial "tutorial_tutorial28" set bbtutorial 1 findportable hard_plan_crate berth
    disable
end



:berthtutorial020
if
    bbtutorial = 1
then
    tutorial "tutorial_tutorial29" set bbtutorial 2 "opencratebutton"
    disable
end

:berthtutorial030
if
    bbtutorial = 2
then
    tutorial "tutorial_tutorial30" set bbtutorial 3 special placeroom 2
    disable
end

:berthtutorial040
if
    bbtutorial = 3
then
    tutorial "tutorial_tutorial31" set bbtutorial 4 special placeroom
    disable
end

:berthtutorial050
if
    bbtutorial = 4
then
    tutorial "tutorial_tutorial32" set bbtutorial 5 special placeroom 1
    disable
end

:berthtutorial060
if
    bbtutorial = 5
then
    tutorial "tutorial_tutorial33" set bbtutorial 6 special placeroom
    disable
end

:berthtutorial070
if
    bbtutorial = 6
then
    tutorial "tutorial_tutorial34" set bbtutorial 7 special placeroom 3
    disable
end

:berthtutorial080
if
    bbtutorial = 7
then
    tutorial "tutorial_tutorial35" set bbtutorial 8 "roompanelokbutton"
    disable
end

:berthtutorial090
if
    bbtutorial = 8
then
    tutorial "tutorial_tutorial36" set bbtutorial 9 "roompanelokbutton"
    disable
end

:berthwait
if
    berth_count > 0
then
    set berthwait (turn + 50)
    disable
end

:berthtutorial000
if
    turn > berthwait
    berth_count > 0
    bunk_count > 0
    bbtutorial < 9
    edittutorial < 1
then
    tutorial "tutorial_tutorial37" set edittutorial 1
    disable
end

:berthtutorial001
if
    turn > berthwait
    berth_count > 0
    bunk_count < 1
    bbtutorial < 9
    edittutorial < 1
then
    tutorial "tutorial_tutorial38" set edittutorial 1
    disable
end

:berthtutorial002
if
    turn > berthwait
    berth_count > 0
    bunk_count < 1
    bbtutorial = 9
    edittutorial < 1
then
    tutorial "tutorial_tutorial39" set edittutorial 1
    disable
end

:berthtutorial100
if
    turn > berthwait
    berth_count > 0
    bunk_count > 0
    bbtutorial = 9
    edittutorial < 1
then
    tutorial "tutorial_tutorial40" set edittutorial 1
    disable
end

:edittutorial010
if
    berth_count > 0
    edittutorial = 1
then
    tutorial "tutorial_tutorial41" set edittutorial 2 findroom berth
    disable
end

:edittutorial020
if
    edittutorial = 2
then
    tutorial "tutorial_tutorial42" set edittutorial 3 "addfurniturebutton"
    disable
end

:edittutorial030
if
    edittutorial = 3
then
    tutorial "tutorial_tutorial43" set edittutorial 4 "roompanelokbutton"
    disable
end

:edittutorial040
if
    edittutorial = 4
then
    tutorial "tutorial_tutorial44" set segmenttutorial 1
    disable
end

:segmenttutorial010
if
    segmenttutorial = 1
then
    unlock 15
    unlock 1
    tutorial "tutorial_tutorial45" set segmenttutorial 2 "segmentdoor"
    disable
end

:peepplace
if
    segmenttutorial = 2
then
    place_peep grey 8 12 sub_deck 1024
    disable
end

:peeptutorial010
if
    grey_count > 0
then
    tutorial "tutorial_tutorial46" set peeptutorial 2 findpeep grey
    disable
end

:peeptutorial020
if
    peeptutorial = 2
then
    tutorial "tutorial_tutorial47" set peeptutorial 3
    disable
end

:peeptutorial030
if
    peeptutorial = 3
then
    set scriptwait (turn + 100)
    set peeptutorial 4
    disable
end

:peeptutorial040
if
    turn > scriptwait
    peeptutorial = 4
then
    set scriptwait (turn + 200)
    set peeptutorial 5
    incoming local_comms icon 0 respond reply02 "tutorial_tutorial48"
end

:peeptutorial050
if
    reply02 = 2
then
    win
    disable
end

:peeptutorial060
if
    reply02 < 2
then
    set reply02 3
    set scriptwait (turn + 200)
    set peeptutorial 4
end