viewing paste Unknown #17804 | Aegis

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206
//---------------------- TOWER Dungeon Security Guard -----------------------
npc "e_tower" "Tower Protection Stone" 2_MONEMUS 81 105 0 0 0
 
OnClick:
var ins_mas = (v[VAR_ISPARTYMASTER])
var ins_pt = (v[VAR_CPARTY])
var p_name = PartyName
var p_reader = PcName
var md_name = "Endless Tower"
var p_name2 = PcName
var 102time = checkquest_playtime 12058
if (ins_pt > 0)
        if (102time == 0)
        if (ins_mas == 1)
        dialog "Confirmed the party has been made. Would you like to reserve for the entry to the Endless Tower? "
        wait
        choose menu md_name + "Dungeon Generated" "Enter the dungeon" "Return to Alberta" "Cancel"
                case 1
                        var in_wait = MD_Subscription md_name
                        if (in_wait == 0)
                                dialog "Party Name:"+p_name+""
                                dialog "Party Leader:"+p_reader+""
                                dialog "^0000ff"+md_name+" ^000000- Reservation Failed"
                                close
                        else
                                dialog "^0000ff"+md_name+"^000000 - Try to reserve"
                                dialog "After making a reservation, you have to talk to NPC behind and select the menu 'Enter the Dungeon' to enter the dungeon."
                                close
                        endif
                        return
                break
                case 2
                        var move_md = MD_Enter md_name
                        if (move_md == 3)
                                dialog "An unidentified error is occured."
                                close
                        elseif (move_md == 2)
                                dialog "The memorial dungeon " + md_name + " does not exist."
                                dialog "The party leader did not generate the dungeon yet."
                                close
                        elseif (move_md == 1)
                                dialog "You can enter the dungeon after making the party."
                                close
                        elseif (move_md == 0)
                                broadcastinmap2 "00ff99A party memeber, " + p_name2 + " of the party, " FW_NORMAL 12 0 0  p_name + ", is entering the dungeon, " + md_name + "."
                                setquest 12058
                                close
                        endif
                        return
                break
                case 3
                        dialog "I will move you to the place where you were."
                        close
                        moveto "alberta" 223 36
                        return
                break
                case 4
                        close
                        return
                break
        endchoose
                                close
                        return
else
        dialog "If you have the dungeon generated already, you can enter it. "
        wait
        choose menu md_name + "Enter the dungeon" "Return to Alberta" "Cancel"
                case 1
                        var move_md = MD_Enter md_name
                        if (move_md == 3)
                                dialog "An unidentified error is occured."
                                close
                        elseif (move_md == 2)
                                dialog "The memorial dungeon " + md_name + " does not exist."
                                dialog "Please confirm with your party leader wether the memorial dungeon has been destructed or if the time given for entering has been expired."
                                close
                        elseif (move_md == 1)
                                dialog "You can enter the dungeon after making the party."
                                close
                        elseif (move_md == 0)
                                broadcastinmap2 "00ff99A party memeber, " + p_name2 + " of the party, " FW_NORMAL 12 0 0  p_name + ", is entering the dungeon, " + md_name + "."
                                setquest 12058
                                close
                        endif
                        return
                break
                case 2
                        dialog "I will move you to the place where you were."
                        close
                        moveto "alberta" 223 36
                        return
                break
                case 3
                        close
                        return
                break
 
        endchoose
                        close
                        return
                endif
        return
 
        elseif (102time == 1)
                        dialog "^0000ffDue to the aftereffect, the protection stone of the tower did not repond to your request.^000000"
                close
                return
 
        elseif (102time == 2)
                dialog "^0000ffThe records and aftereffect related to the Endless Tower have been removed. You can genearte and enter the Endless Tower again.^000000"
                erasequest 12058
                close
                return
endif
 
else
        dialog "Make or join the party with more than 1 member or try again."
        close
endif
return
 
 
 
npc "e_tower" "Huge Vortex" CLEAR_NPC 30 30 2 2 0
OnTouch2:
        var p_name2 = PcName
        broadcastinmap2 "00ff99An adventurer," FW_NORMAL 12 0 0  "[ " + p_name2 + " ], seems to be engulfed by a huge vortex"
        moveto "alberta" 223 36
return
 
 
npc "e_tower" "#102Administrator Mode104" CLEAR_NPC 1 1 2 2 0
OnClick:
        dialog "Please enter the password"
        dlgwritestr
        wait
        if (inputstr == "dmc2008")
        choose menu "Generate Purification Stone" "Remove Purification Stone" "Cancel"
                case 1
                        dialog "Create the Purification Stone that stays for 30 minutes."
                        cmdothernpc "Purification Stone#102tower" "on"
                        close
                        return
                break
                case 2
                        dialog "Destroy the Purification Stone immediately"
                        cmdothernpc "Purification Stone#102tower" "off"
                        close
                        return
                break
                case 3
                        dialog "You have canceled it."
                        close
                        return
                break
        endchoose
        else
                dialog "Enter the password exactly."
                close
                return
        endif
return
 
 
npc "e_tower" "Purification Stone#102tower" 2_MONEMUS 69 117 4 0 0
 
OnInit:
         disablenpc "Purification Stone#102tower"
return
 
OnCommand: "on"
        InitTimer
return
 
OnCommand: "off"
        stoptimer
        disablenpc "Purification Stone#102tower"
return
 
OnTimer: 1000
        enablenpc "Purification Stone#102tower"
return
 
OnTimer: 1740000
        broadcastinmap2 "00ff99" FW_NORMAL 12 0 0  "The Purification Stone will be destroyted in one minute"
return
 
OnTimer: 1800000
        disablenpc "Purification Stone#102tower"
return
 
OnClick:
        erasequest 12058
        setitem in_102floor 0
        dialog "^0000ffThe records and aftereffect related to the Endless Tower have been removed. You can genearte and enter the Endless Tower again.^000000"
        close
return
 
npc "e_tower" "Purification Stone#102tower-2" CLEAR_NPC 151 185 4 0 0
OnClick:
        erasequest 12058
        setitem in_102floor 0
        dialog "^0000ffThe records and aftereffect related to the Endless Tower have been removed. You can genearte and enter the Endless Tower again.^000000"
        close
        moveto "e_tower" 75 108
return
Viewed 671 times, submitted by milk.