viewing paste Gold Room Ordeal v1 | Athena

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
// Gold Room Ordeal by Rokimoki v1.0
// Request by: InsanityProductionsR (eAthena Forum)
// ---
 
// Gold Room Warper v1.0
prontera,164,172,3  script  Ordeal Gold Room    1086,{
set .@nombre$, "[^0000FFCucaracha de Oro^000000]";
mes .@nombre$;
if (gold > 0) {
    mes "BZbRzBrZ !!";
    next;
    mes .@nombre$;
    mes "Now I can talk!! Hey, do you want to exchange gold points to gold item?";
    next;
    if (select("Sure!:Nope") == 2) close;
    mes .@nombre$;
    mes "Done ^^ BzBzBZ!!";
    getitem 969,gold;
    set gold, 0;
    next;
    mes .@nombre$;
} // End if
mes "Bz Bz BZ!??!";
next;
if (select("Gold BzBz!!:A bug?") == 2) close;
close2;
warp "ordeal_3-2",154,154;
end;
} // End Script
 
// Script Gold v1.0
-   script  GoldRoom    -1,{
OnNPCKillEvent:
if (strcharinfo(3) != "ordeal_3-2") end;
if (killedrid != 1233) end;
switch (rand(3)) {
    case 0:
        set .@g, 1;
        set gold, gold + .@g;
        break;
        
    case 1:
        set .@g, 2;
        set gold, gold + .@g;
        break;
        
    case 2:
        set .@g, 3;
        set gold, gold + .@g;
        break;
} // End switch
dispbottom "You earned " +.@g +" Gold Points, you have at the moment " +gold +" gold points.";
end;
 
OnPCDieEvent:
if (strcharinfo(3) != "ordeal_3-2") end;
dispbottom "You have lost all your gold points, you have been killed by a player inside the gold room.";
set gold, 0;
end;
} // End Script
 
// Warps a prontera v1.0
-   script  Retorno::Retorno    45,2,2,{
end;
OnTouch:
warp "prontera",153,193;
end;
} // End Script
 
// Duplicados Warps v1.0
ordeal_3-2,24,228,0 duplicate(Retorno)  Retorno#r1  45
ordeal_3-2,25,58,0  duplicate(Retorno)  Retorno#r2  45
ordeal_3-2,289,130,0    duplicate(Retorno)  Retorno#r3  45
ordeal_3-2,283,230,0    duplicate(Retorno)  Retorno#r4  45
ordeal_3-2,210,203,0    duplicate(Retorno)  Retorno#r5  45
 
// Natural Monsters v1.0
ordeal_3-2,154,154,0,0  monster Gold Peco Peco  1233,15,0,0,0
ordeal_3-2,0,0,0,0  monster Gold Peco Peco  1233,25,0,0,0
ordeal_3-2,0,0,0,0  monster Gold Peco Peco  1233,25,0,0,0
ordeal_3-2,0,0,0,0  monster Gold Peco Peco  1233,25,0,0,0
ordeal_3-2,0,0,0,0  monster Gold Guardian   1439,30,0,0,0
ordeal_3-2,154,154,0,0  monster Gold Guardian   1439,5,0,0,0
 
// Map Flags v1.0
ordeal_3-2  mapflag nowarp
ordeal_3-2  mapflag nobranch
ordeal_3-2  mapflag nomemo
ordeal_3-2  mapflag nowarpto
ordeal_3-2  mapflag nopenalty
ordeal_3-2  mapflag pvp_noparty
 
// Put this in the mob_db2.txt without "//" and with the gm do @reloadmobdb or reboot the server
// 1233,PECOPECO,Gold Peco Peco,Gold Peco Peco,60,3500,0,0,0,1,300,400,0,0,1,13,13,25,27,9,10,12,2,2,23,0x1089,200,1564,864,576,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
// 1439,G_HIGH_ORC,High Orc,High Orc,90,9000000,0,0,0,1,5000,10000,90,90,90,90,90,90,90,90,10,12,2,7,43,0x3885,160,1500,500,1000,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Viewed 2467 times, submitted by Guest.