Rage Guy
-
Posts
354 -
Joined
-
Last visited
Content Type
Profiles
Forums
Downloads
Jobs Available
Server Database
Third-Party Services
Top Guides
Store
Crowdfunding
Posts posted by Rage Guy
-
-
What? I don't understand..
now when i start the event with the gm
first
the portal is opened....
and the portal will close after 1 minite
then the portal closed
then the disguise NPC Hide
like the event is over
Any help ?
-
find
getitem 674,7, $guessprizecount;
replace
getitem 674,$guessprizecount,getcharid(3);
Now after the portal has been closed
the npc HIDE
vip_lounge,151,128,5 script Disguise CP 968,{ if (getgmlevel()<20) { mes "^3399FF[Disguise CP]^000000"; mes "Sorry, you are not a GM!"; close; } mes "^3399FF[Disguise CP]^000000"; mes "Hello GameMaster!"; mes "What do you want to do?"; switch(select("Start Event:Stop Event:Set number of rounds[^E50000"+$guessrounds+"^000000]:Set prize^E50000 ["+getitemname($guessprize)+"]^000000 ^E50000 ["+ $guessprizecount + "]^000000:Nothing")) { case 1: { next; mes "^3399FF[Disguise CP]^000000"; mes "Please confirm by typing START."; input .@confirm$; if (.@confirm$ == "START") { donpcevent "guessAnnouncer::OnGMStart"; close; } mes "Confirmation failed"; close; break; } case 2: { next; mes "^3399FF[Disguise CP]^000000"; mes "Please confirm by typing STOP."; input .@confirm$; if (.@confirm$ == "STOP") { donpcevent "guessAnnouncer::OnGMStop"; close; } mes "Confirmation failed"; close; break; } case 3: { next; mes "^3399FF[Disguise CP]^000000"; mes "Please type in the new number."; input $guessrounds; if ($guessrounds > 30) set $guessrounds, 30; else if ($guessrounds < 1) set $guessrounds, 1; close; } case 4: { next; mes "^3399FF[Disguise CP]^000000"; mes "Please type in the new prize id."; input .@guessprizeid; if (getitemname(.@guessprizeid) == "null" || getitemname(.@guessprizeid) == "") {next; mes "^3399FF[Disguise CP]^000000"; mes "Error"; mes "This item does not exist in the database..."; close;} set $guessprize, .@guessprizeid; next; mes "^3399FF[Disguise CP]^000000"; mes "Please type in the amount."; input .@guessprizeamount; if (!.@guessprizeamount) set .@guessprizeamount,1 ; set $guessprizecount,.@guessprizeamount; next; mes "^3399FF[Disguise CP]^000000"; mes "Prize has been set to ^E50000 "+ getitemname($guessprize)+ "^000000 and the amount to ^E50000 " +$guessprizecount+"^000000"; close; } case 5: { next; mes "^3399FF[Disguise CP]^000000"; mes "Good bye"; close; } } } vip_lounge,153,128,4 script Disguise NPC 933,{ if (!$guessbegin) { mes "^3399FF[Disguise NPC]^000000"; mes "The event is going to start soon!"; close; } end; OnStart: set $guessbegin, 1; set .DisguiseWon, 0; if (!$DisguiseRound) { npctalk "Alright. Let's start this game!"; sleep 2000; npctalk "But first I will explain the rules."; sleep 2000; npctalk "I am going to disguise into a random monster."; sleep 2000; npctalk "You have to guess the monster's name and shout it out."; sleep 2000; npctalk "Don't bother about the use of capital and small initial letters."; sleep 2000; npctalk "Now get ready!"; sleep 5000; } else if ($DisguiseRound < $guessrounds-1) { npctalk "Get ready for the next round."; setnpctimer 0; sleep 8000; } else { npctalk "Last round now!"; sleep 2000; npctalk "Get ready!"; sleep 6000; } do { set .@guessrepeat, 0; setarray .mvplist[0],1583,1312; // replace with MVP Mob IDs set .mvprand,rand(2); //change to length of .mvplist array set $monster,.mvplist[.mvprand]; for (set .@k, 0; .@k <getarraysize($Forbidden); set .@k, .@k+1) { if ($monster == $Forbidden[.@k]) { set .@guessrepeat, 1; break; } } } while (.@guessrepeat); setnpctimer 0; initnpctimer; setnpcdisplay "Disguise NPC",$monster; set $MonsterName$, strmobinfo(1,$monster); defpattern 1, "([^:]+):.*\\s"+$MonsterName$+"(.*)", "winround"; activatepset 1; npctalk "What's my name?"; sleep 3000; npcwalkto 102,103; sleep 2000; npcwalkto 102,99; end; OnTimer5000: if (!.DisguiseWon) { sleep 3000; npcwalkto 102,103; sleep 2000; npcwalkto 102,99; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} } end; OnTimer15000: if (!.DisguiseWon) { sleep 3000; npcwalkto 102,103; sleep 2000; npcwalkto 102,99; } end; OnTimer25000: if (!.DisguiseWon) { npctalk "You get 10 more seconds to guess my name."; sleep 3000; npcwalkto 102,103; sleep 2000; npcwalkto 102,99; } end; OnTimer35000: if (!.DisguiseWon) { npctalk "Round is over."; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} set $DisguiseRound, $DisguiseRound + 1; deletepset 1; sleep 3000; npctalk $MonsterName$ + " would have been the correct answer."; sleep 5000; if ($DisguiseRound >= $guessrounds) { set $DisguiseRound, 0; sleep 3000; npctalk "Event is over now!"; sleep 3500; npctalk "See ya!"; sleep 2000; emotion 12; sleep 1000; set $guessactive, 0; mapwarp "poring_c01.gat","prontera.gat",143,171; setnpcdisplay "Disguise NPC",933; disablenpc "Disguise NPC"; end; } goto OnStart; } end; winround: setnpctimer 0; deletepset 1; set .DisguiseWon, 1; set $DisguiseRound, $DisguiseRound + 1; npctalk strcharinfo(0) + " got my right name!"; getitem 674,$guessprizecount,getcharid(3); sleep2 3000; npctalk $MonsterName$ + " is the correct answer."; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} if ($DisguiseRound >= $guessrounds) { set $DisguiseRound, 0; set $guessactive, 0; sleep 3000; npctalk "Event is over now!"; sleep 3500; npctalk "See ya!"; sleep 2000; emotion 12; sleep 1000; mapwarp "poring_c01.gat","prontera.gat",143,171; setnpcdisplay "Disguise NPC",933; disablenpc "Disguise NPC"; end; } sleep 5000; goto OnStart; end; } //----------------------------------------------------------------------------------- //----------------------------------------------------------------------------------- - script guessAnnouncer -1,{ OnGMStart: if ($guessactive) end; set $guessactive, 1; announce "The server is starting a Disguise Event now!",0; set $guessbegin, 0; sleep 3000; if (!$guessactive) end; announce "If you want to join, come to prontera, head downwards and enter the warp portal.",0; enablenpc "guesswarp"; enablenpc "Disguise NPC"; sleep 3000; announce "Number of Rounds: "+$guessrounds,0; sleep 2000; announce "Prize: "+ getitemname($guessprize) + " x " + $guessprizecount,0; sleep 2000; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} announce "The portal is going to close in one minute.",0; sleep 60000; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} announce "The portal has been closed.",0; disablenpc "guesswarp"; set $DisguiseRound, 0; sleep 5000; if (!$guessactive) {disablenpc "Disguise NPC"; end;} if(getmapusers("poring_c01") == 0) { disablenpc "Disguise NPC"; set $guessactive, 0; end; } donpcevent "Disguise NPC::OnStart"; end; OnGMStop: if ($guessactive) { set $guessactive, 0; announce "The disguise event has been stopped.",0; set $DisguiseRound, 0; mapwarp "poring_c01.gat","prontera.gat",143,171; setnpcdisplay "Disguise NPC",933; disablenpc "Disguise NPC"; disablenpc "guesswarp"; } end; OnMinute20: // SET THE 30 TO THE MINUTE YOU WANT THE EVENT TO START EACH HOUR. if ($guessactive) end; set $guessactive, 1; announce "The server is starting a Disguise Event now!",0; set $guessbegin, 0; sleep 3000; if (!$guessactive) end; announce "If you want to join, come to prontera, head downwards and enter the warp portal.",0; enablenpc "guesswarp"; enablenpc "Disguise NPC"; sleep 2000; announce "Prize: "+ getitemname($guessprize) + " x " + $guessprizecount,0; sleep 2000; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} announce "The portal is going to close in one minute.",0; sleep 60000; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} announce "The portal has been closed.",0; disablenpc "guesswarp"; sleep 5000; if (!$guessactive) {disablenpc "Disguise NPC"; end;} announce "Next Event will start in 2 hours.",0; set $DisguiseRound, 0; if(getmapusers("poring_c01") == 0) { disablenpc "Disguise NPC"; set $guessactive, 0; end; } donpcevent "Disguise NPC::OnStart"; end; OnInit: disablenpc "Disguise NPC"; disablenpc "guesswarp"; set $guessactive, 0; setarray $Forbidden[0],1003,1006,1017,1021,1022,1027,1043,1136,1137,1168,1171,1172,1173,1181,1210,1217,1218,1223,1284,1325,1326,1327,1328,1329,1330,1331,1332,1333,1334,1335,1336,1337,1338,1339,1340,1341,1342,1343,1344,1345,1346,1347,1348,1349,1350,1351,1352,1353,1354,1355,1356,1357,1358,1359,1360,1361,1362,1363,1407,1411,1414,1496,1501,1900,1948,1892,1949,1950,1983,1984,2010,1003,1006,1017,1021,1022,1027,1043,1075,1136,1137,1168,1171,1172,1173,1181,1210,1222,1223,1224,1225,1226,1227,1228,1233,1284,1407,1411,1414,1496,1501,1900,1996,2002,2003,2004,2005,2006,2007,2011,2012,2025,2028,2029,2030,2031,2032,2033,2034,2035,2036,2037,2038,2039,2040,2041,2042,2043,2044,2045,2046,2047,2048,2049,2050,2051,2052,2053,2054,2055,2056,2057,2058,2059,2060,2061,2062,2063,2064,2065,2066,2067,2075,2076,2077,2078,2079,2080,2081,2084,2093,2094,2095,2096,2097,2098,2099,2100,2101,2102,2103,2104,2105,2106,2107,2108,2109,2110,2111,2112,2113,2114,2115,2116,2117,2118,2119,2120,2121,2122,2123,2124,2125,1900,1901,1902,1903,1237,1239,1145,1175,1209,1841,1842,1843,1844,3014,3001,3002,2114,2115,2117,2118,2119,2120,6049,6050,6051,6052,2200,2205,2207; } //----------------------------------------------------------------------------------- //------------------Warp Portal------------------------------------------------------ prontera,156,180,0 warp guesswarp 2,2,poring_c01,103,95 //----------------------------------------------------------------------------------- //------------------Map Flags-------------------------------------------------------- poring_c01 mapflag nowarpto poring_c01 mapflag noskill poring_c01 mapflag nosave poring_c01 mapflag nomemo poring_c01 mapflag noteleport poring_c01 mapflag nowarp //----------------------------------------------------------------------------------- -
thank you
but i got anthor problem
when i win i dont get a prize
and i added to him a 674,1
how can i make it
give me prize when someone win
-
Now he is always Diguising to yoyo monster
and when it ends
he say , 0 would have been the correct answer
vip_lounge,151,128,5 script Disguise CP 968,{ if (getgmlevel()<20) { mes "^3399FF[Disguise CP]^000000"; mes "Sorry, you are not a GM!"; close; } mes "^3399FF[Disguise CP]^000000"; mes "Hello GameMaster!"; mes "What do you want to do?"; switch(select("Start Event:Stop Event:Set number of rounds[^E50000"+$guessrounds+"^000000]:Set prize^E50000 ["+getitemname($guessprize)+"]^000000 ^E50000 ["+ $guessprizecount + "]^000000:Nothing")) { case 1: { next; mes "^3399FF[Disguise CP]^000000"; mes "Please confirm by typing START."; input .@confirm$; if (.@confirm$ == "START") { donpcevent "guessAnnouncer::OnGMStart"; close; } mes "Confirmation failed"; close; break; } case 2: { next; mes "^3399FF[Disguise CP]^000000"; mes "Please confirm by typing STOP."; input .@confirm$; if (.@confirm$ == "STOP") { donpcevent "guessAnnouncer::OnGMStop"; close; } mes "Confirmation failed"; close; break; } case 3: { next; mes "^3399FF[Disguise CP]^000000"; mes "Please type in the new number."; input $guessrounds; if ($guessrounds > 30) set $guessrounds, 30; else if ($guessrounds < 1) set $guessrounds, 1; close; } case 4: { next; mes "^3399FF[Disguise CP]^000000"; mes "Please type in the new prize id."; input .@guessprizeid; if (getitemname(.@guessprizeid) == "null" || getitemname(.@guessprizeid) == "") {next; mes "^3399FF[Disguise CP]^000000"; mes "Error"; mes "This item does not exist in the database..."; close;} set $guessprize, .@guessprizeid; next; mes "^3399FF[Disguise CP]^000000"; mes "Please type in the amount."; input .@guessprizeamount; if (!.@guessprizeamount) set .@guessprizeamount,1 ; set $guessprizecount,.@guessprizeamount; next; mes "^3399FF[Disguise CP]^000000"; mes "Prize has been set to ^E50000 "+ getitemname($guessprize)+ "^000000 and the amount to ^E50000 " +$guessprizecount+"^000000"; close; } case 5: { next; mes "^3399FF[Disguise CP]^000000"; mes "Good bye"; close; } } } vip_lounge,153,128,4 script Disguise NPC 933,{ if (!$guessbegin) { mes "^3399FF[Disguise NPC]^000000"; mes "The event is going to start soon!"; close; } end; OnStart: set $guessbegin, 1; set .DisguiseWon, 0; if (!$DisguiseRound) { npctalk "Alright. Let's start this game!"; sleep 2000; npctalk "But first I will explain the rules."; sleep 2000; npctalk "I am going to disguise into a random monster."; sleep 2000; npctalk "You have to guess the monster's name and shout it out."; sleep 2000; npctalk "Don't bother about the use of capital and small initial letters."; sleep 2000; npctalk "Now get ready!"; sleep 5000; } else if ($DisguiseRound < $guessrounds-1) { npctalk "Get ready for the next round."; setnpctimer 0; sleep 8000; } else { npctalk "Last round now!"; sleep 2000; npctalk "Get ready!"; sleep 6000; } do { set .@guessrepeat, 0; setarray .mvplist[0],1234,4567,9812; // replace with MVP Mob IDs set .mvprand,rand(2); //change to length of .mvplist array set $monster,.mvplist[.mvprand]; for (set .@k, 0; .@k <getarraysize($Forbidden); set .@k, .@k+1) { if ($monster == $Forbidden[.@k]) { set .@guessrepeat, 1; break; } } } while (.@guessrepeat); setnpctimer 0; initnpctimer; setnpcdisplay "Disguise NPC",$monster; set $MonsterName$, strmobinfo(1,$monster); defpattern 1, "([^:]+):.*\\s"+$MonsterName$+"(.*)", "winround"; activatepset 1; npctalk "What's my name?"; sleep 3000; npcwalkto 102,103; sleep 2000; npcwalkto 102,99; end; OnTimer5000: if (!.DisguiseWon) { sleep 3000; npcwalkto 102,103; sleep 2000; npcwalkto 102,99; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} } end; OnTimer15000: if (!.DisguiseWon) { sleep 3000; npcwalkto 102,103; sleep 2000; npcwalkto 102,99; } end; OnTimer25000: if (!.DisguiseWon) { npctalk "You get 10 more seconds to guess my name."; sleep 3000; npcwalkto 102,103; sleep 2000; npcwalkto 102,99; } end; OnTimer35000: if (!.DisguiseWon) { npctalk "Round is over."; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} set $DisguiseRound, $DisguiseRound + 1; deletepset 1; sleep 3000; npctalk $MonsterName$ + " would have been the correct answer."; sleep 5000; if ($DisguiseRound >= $guessrounds) { set $DisguiseRound, 0; sleep 3000; npctalk "Event is over now!"; sleep 3500; npctalk "See ya!"; sleep 2000; emotion 12; sleep 1000; set $guessactive, 0; mapwarp "poring_c01.gat","prontera.gat",143,171; setnpcdisplay "Disguise NPC",933; disablenpc "Disguise NPC"; end; } goto OnStart; } end; winround: setnpctimer 0; deletepset 1; set .DisguiseWon, 1; set $DisguiseRound, $DisguiseRound + 1; npctalk strcharinfo(0) + " got my right name!"; getitem 674,7, $guessprizecount; sleep2 3000; npctalk $MonsterName$ + " is the correct answer."; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} if ($DisguiseRound >= $guessrounds) { set $DisguiseRound, 0; set $guessactive, 0; sleep 3000; npctalk "Event is over now!"; sleep 3500; npctalk "See ya!"; sleep 2000; emotion 12; sleep 1000; mapwarp "poring_c01.gat","prontera.gat",143,171; setnpcdisplay "Disguise NPC",933; disablenpc "Disguise NPC"; end; } sleep 5000; goto OnStart; end; } //----------------------------------------------------------------------------------- //----------------------------------------------------------------------------------- - script guessAnnouncer -1,{ OnGMStart: if ($guessactive) end; set $guessactive, 1; announce "The server is starting a Disguise Event now!",0; set $guessbegin, 0; sleep 3000; if (!$guessactive) end; announce "If you want to join, come to prontera, head downwards and enter the warp portal.",0; enablenpc "guesswarp"; enablenpc "Disguise NPC"; sleep 3000; announce "Number of Rounds: "+$guessrounds,0; sleep 2000; announce "Prize: "+ getitemname($guessprize) + " x " + $guessprizecount,0; sleep 2000; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} announce "The portal is going to close in one minute.",0; sleep 60000; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} announce "The portal has been closed.",0; disablenpc "guesswarp"; set $DisguiseRound, 0; sleep 5000; if (!$guessactive) {disablenpc "Disguise NPC"; end;} if(getmapusers("poring_c01") == 0) { disablenpc "Disguise NPC"; set $guessactive, 0; end; } donpcevent "Disguise NPC::OnStart"; end; OnGMStop: if ($guessactive) { set $guessactive, 0; announce "The disguise event has been stopped.",0; set $DisguiseRound, 0; mapwarp "poring_c01.gat","prontera.gat",143,171; setnpcdisplay "Disguise NPC",933; disablenpc "Disguise NPC"; disablenpc "guesswarp"; } end; OnMinute20: // SET THE 30 TO THE MINUTE YOU WANT THE EVENT TO START EACH HOUR. if ($guessactive) end; set $guessactive, 1; announce "The server is starting a Disguise Event now!",0; set $guessbegin, 0; sleep 3000; if (!$guessactive) end; announce "If you want to join, come to prontera, head downwards and enter the warp portal.",0; enablenpc "guesswarp"; enablenpc "Disguise NPC"; sleep 2000; announce "Prize: "+ getitemname($guessprize) + " x " + $guessprizecount,0; sleep 2000; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} announce "The portal is going to close in one minute.",0; sleep 60000; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} announce "The portal has been closed.",0; disablenpc "guesswarp"; sleep 5000; if (!$guessactive) {disablenpc "Disguise NPC"; end;} announce "Next Event will start in 2 hours.",0; set $DisguiseRound, 0; if(getmapusers("poring_c01") == 0) { disablenpc "Disguise NPC"; set $guessactive, 0; end; } donpcevent "Disguise NPC::OnStart"; end; OnInit: disablenpc "Disguise NPC"; disablenpc "guesswarp"; set $guessactive, 0; setarray $Forbidden[0],1003,1006,1017,1021,1022,1027,1043,1136,1137,1168,1171,1172,1173,1181,1210,1217,1218,1223,1284,1325,1326,1327,1328,1329,1330,1331,1332,1333,1334,1335,1336,1337,1338,1339,1340,1341,1342,1343,1344,1345,1346,1347,1348,1349,1350,1351,1352,1353,1354,1355,1356,1357,1358,1359,1360,1361,1362,1363,1407,1411,1414,1496,1501,1900,1948,1892,1949,1950,1983,1984,2010,1003,1006,1017,1021,1022,1027,1043,1075,1136,1137,1168,1171,1172,1173,1181,1210,1222,1223,1224,1225,1226,1227,1228,1233,1284,1407,1411,1414,1496,1501,1900,1996,2002,2003,2004,2005,2006,2007,2011,2012,2025,2028,2029,2030,2031,2032,2033,2034,2035,2036,2037,2038,2039,2040,2041,2042,2043,2044,2045,2046,2047,2048,2049,2050,2051,2052,2053,2054,2055,2056,2057,2058,2059,2060,2061,2062,2063,2064,2065,2066,2067,2075,2076,2077,2078,2079,2080,2081,2084,2093,2094,2095,2096,2097,2098,2099,2100,2101,2102,2103,2104,2105,2106,2107,2108,2109,2110,2111,2112,2113,2114,2115,2116,2117,2118,2119,2120,2121,2122,2123,2124,2125,1900,1901,1902,1903,1237,1239,1145,1175,1209,1841,1842,1843,1844,3014,3001,3002,2114,2115,2117,2118,2119,2120,6049,6050,6051,6052,2200,2205,2207; } //----------------------------------------------------------------------------------- //------------------Warp Portal------------------------------------------------------ prontera,156,180,0 warp guesswarp 2,2,poring_c01,103,95 //----------------------------------------------------------------------------------- //------------------Map Flags-------------------------------------------------------- poring_c01 mapflag nowarpto poring_c01 mapflag noskill poring_c01 mapflag nosave poring_c01 mapflag nomemo poring_c01 mapflag noteleport poring_c01 mapflag nowarp //----------------------------------------------------------------------------------- -
Hello
i got the disguise event working
but my problem is it summon a random monster
i want it to summon a random MVP
vip_lounge,151,128,5 script Disguise CP 968,{ if (getgmlevel()<20) { mes "^3399FF[Disguise CP]^000000"; mes "Sorry, you are not a GM!"; close; } mes "^3399FF[Disguise CP]^000000"; mes "Hello GameMaster!"; mes "What do you want to do?"; switch(select("Start Event:Stop Event:Set number of rounds[^E50000"+$guessrounds+"^000000]:Set prize^E50000 ["+getitemname($guessprize)+"]^000000 ^E50000 ["+ $guessprizecount + "]^000000:Nothing")) { case 1: { next; mes "^3399FF[Disguise CP]^000000"; mes "Please confirm by typing START."; input .@confirm$; if (.@confirm$ == "START") { donpcevent "guessAnnouncer::OnGMStart"; close; } mes "Confirmation failed"; close; break; } case 2: { next; mes "^3399FF[Disguise CP]^000000"; mes "Please confirm by typing STOP."; input .@confirm$; if (.@confirm$ == "STOP") { donpcevent "guessAnnouncer::OnGMStop"; close; } mes "Confirmation failed"; close; break; } case 3: { next; mes "^3399FF[Disguise CP]^000000"; mes "Please type in the new number."; input $guessrounds; if ($guessrounds > 30) set $guessrounds, 30; else if ($guessrounds < 1) set $guessrounds, 1; close; } case 4: { next; mes "^3399FF[Disguise CP]^000000"; mes "Please type in the new prize id."; input .@guessprizeid; if (getitemname(.@guessprizeid) == "null" || getitemname(.@guessprizeid) == "") {next; mes "^3399FF[Disguise CP]^000000"; mes "Error"; mes "This item does not exist in the database..."; close;} set $guessprize, .@guessprizeid; next; mes "^3399FF[Disguise CP]^000000"; mes "Please type in the amount."; input .@guessprizeamount; if (!.@guessprizeamount) set .@guessprizeamount,1 ; set $guessprizecount,.@guessprizeamount; next; mes "^3399FF[Disguise CP]^000000"; mes "Prize has been set to ^E50000 "+ getitemname($guessprize)+ "^000000 and the amount to ^E50000 " +$guessprizecount+"^000000"; close; } case 5: { next; mes "^3399FF[Disguise CP]^000000"; mes "Good bye"; close; } } } vip_lounge,153,128,4 script Disguise NPC 933,{ if (!$guessbegin) { mes "^3399FF[Disguise NPC]^000000"; mes "The event is going to start soon!"; close; } end; OnStart: set $guessbegin, 1; set .DisguiseWon, 0; if (!$DisguiseRound) { npctalk "Alright. Let's start this game!"; sleep 2000; npctalk "But first I will explain the rules."; sleep 2000; npctalk "I am going to disguise into a random monster."; sleep 2000; npctalk "You have to guess the monster's name and shout it out."; sleep 2000; npctalk "Don't bother about the use of capital and small initial letters."; sleep 2000; npctalk "Now get ready!"; sleep 5000; } else if ($DisguiseRound < $guessrounds-1) { npctalk "Get ready for the next round."; setnpctimer 0; sleep 8000; } else { npctalk "Last round now!"; sleep 2000; npctalk "Get ready!"; sleep 6000; } do { set .@guessrepeat, 0; set $monster, 1000 + rand(1,950); for (set .@k, 0; .@k <getarraysize($Forbidden); set .@k, .@k+1) { if ($monster == $Forbidden[.@k]) { set .@guessrepeat, 1; break; } } } while (.@guessrepeat); setnpctimer 0; initnpctimer; setnpcdisplay "Disguise NPC",$monster; set $MonsterName$, strmobinfo(1,$monster); defpattern 1, "([^:]+):.*\\s"+$MonsterName$+"(.*)", "winround"; activatepset 1; npctalk "What's my name?"; sleep 3000; npcwalkto 102,103; sleep 2000; npcwalkto 102,99; end; OnTimer5000: if (!.DisguiseWon) { sleep 3000; npcwalkto 102,103; sleep 2000; npcwalkto 102,99; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} } end; OnTimer15000: if (!.DisguiseWon) { sleep 3000; npcwalkto 102,103; sleep 2000; npcwalkto 102,99; } end; OnTimer25000: if (!.DisguiseWon) { npctalk "You get 10 more seconds to guess my name."; sleep 3000; npcwalkto 102,103; sleep 2000; npcwalkto 102,99; } end; OnTimer35000: if (!.DisguiseWon) { npctalk "Round is over."; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} set $DisguiseRound, $DisguiseRound + 1; deletepset 1; sleep 3000; npctalk $MonsterName$ + " would have been the correct answer."; sleep 5000; if ($DisguiseRound >= $guessrounds) { set $DisguiseRound, 0; sleep 3000; npctalk "Event is over now!"; sleep 3500; npctalk "See ya!"; sleep 2000; emotion 12; sleep 1000; set $guessactive, 0; mapwarp "poring_c01.gat","prontera.gat",143,171; setnpcdisplay "Disguise NPC",933; disablenpc "Disguise NPC"; end; } goto OnStart; } end; winround: setnpctimer 0; deletepset 1; set .DisguiseWon, 1; set $DisguiseRound, $DisguiseRound + 1; npctalk strcharinfo(0) + " got my right name!"; getitem 674,7, $guessprizecount; sleep2 3000; npctalk $MonsterName$ + " is the correct answer."; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} if ($DisguiseRound >= $guessrounds) { set $DisguiseRound, 0; set $guessactive, 0; sleep 3000; npctalk "Event is over now!"; sleep 3500; npctalk "See ya!"; sleep 2000; emotion 12; sleep 1000; mapwarp "poring_c01.gat","prontera.gat",143,171; setnpcdisplay "Disguise NPC",933; disablenpc "Disguise NPC"; end; } sleep 5000; goto OnStart; end; } //----------------------------------------------------------------------------------- //----------------------------------------------------------------------------------- - script guessAnnouncer -1,{ OnGMStart: if ($guessactive) end; set $guessactive, 1; announce "The server is starting a Disguise Event now!",0; set $guessbegin, 0; sleep 3000; if (!$guessactive) end; announce "If you want to join, come to prontera, head downwards and enter the warp portal.",0; enablenpc "guesswarp"; enablenpc "Disguise NPC"; sleep 3000; announce "Number of Rounds: "+$guessrounds,0; sleep 2000; announce "Prize: "+ getitemname($guessprize) + " x " + $guessprizecount,0; sleep 2000; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} announce "The portal is going to close in one minute.",0; sleep 60000; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} announce "The portal has been closed.",0; disablenpc "guesswarp"; set $DisguiseRound, 0; sleep 5000; if (!$guessactive) {disablenpc "Disguise NPC"; end;} if(getmapusers("poring_c01") == 0) { disablenpc "Disguise NPC"; set $guessactive, 0; end; } donpcevent "Disguise NPC::OnStart"; end; OnGMStop: if ($guessactive) { set $guessactive, 0; announce "The disguise event has been stopped.",0; set $DisguiseRound, 0; mapwarp "poring_c01.gat","prontera.gat",143,171; setnpcdisplay "Disguise NPC",933; disablenpc "Disguise NPC"; disablenpc "guesswarp"; } end; OnMinute20: // SET THE 30 TO THE MINUTE YOU WANT THE EVENT TO START EACH HOUR. if ($guessactive) end; set $guessactive, 1; announce "The server is starting a Disguise Event now!",0; set $guessbegin, 0; sleep 3000; if (!$guessactive) end; announce "If you want to join, come to prontera, head downwards and enter the warp portal.",0; enablenpc "guesswarp"; enablenpc "Disguise NPC"; sleep 2000; announce "Prize: "+ getitemname($guessprize) + " x " + $guessprizecount,0; sleep 2000; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} announce "The portal is going to close in one minute.",0; sleep 60000; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} announce "The portal has been closed.",0; disablenpc "guesswarp"; sleep 5000; if (!$guessactive) {disablenpc "Disguise NPC"; end;} announce "Next Event will start in 2 hours.",0; set $DisguiseRound, 0; if(getmapusers("poring_c01") == 0) { disablenpc "Disguise NPC"; set $guessactive, 0; end; } donpcevent "Disguise NPC::OnStart"; end; OnInit: disablenpc "Disguise NPC"; disablenpc "guesswarp"; set $guessactive, 0; setarray $Forbidden[0],1003,1006,1017,1021,1022,1027,1043,1136,1137,1168,1171,1172,1173,1181,1210,1217,1218,1223,1284,1325,1326,1327,1328,1329,1330,1331,1332,1333,1334,1335,1336,1337,1338,1339,1340,1341,1342,1343,1344,1345,1346,1347,1348,1349,1350,1351,1352,1353,1354,1355,1356,1357,1358,1359,1360,1361,1362,1363,1407,1411,1414,1496,1501,1900,1948,1892,1949,1950,1983,1984,2010,1003,1006,1017,1021,1022,1027,1043,1075,1136,1137,1168,1171,1172,1173,1181,1210,1222,1223,1224,1225,1226,1227,1228,1233,1284,1407,1411,1414,1496,1501,1900,1996,2002,2003,2004,2005,2006,2007,2011,2012,2025,2028,2029,2030,2031,2032,2033,2034,2035,2036,2037,2038,2039,2040,2041,2042,2043,2044,2045,2046,2047,2048,2049,2050,2051,2052,2053,2054,2055,2056,2057,2058,2059,2060,2061,2062,2063,2064,2065,2066,2067,2075,2076,2077,2078,2079,2080,2081,2084,2093,2094,2095,2096,2097,2098,2099,2100,2101,2102,2103,2104,2105,2106,2107,2108,2109,2110,2111,2112,2113,2114,2115,2116,2117,2118,2119,2120,2121,2122,2123,2124,2125,1900,1901,1902,1903,1237,1239,1145,1175,1209,1841,1842,1843,1844,3014,3001,3002,2114,2115,2117,2118,2119,2120,6049,6050,6051,6052,2200,2205,2207; } //----------------------------------------------------------------------------------- //------------------Warp Portal------------------------------------------------------ prontera,156,180,0 warp guesswarp 2,2,poring_c01,103,95 //----------------------------------------------------------------------------------- //------------------Map Flags-------------------------------------------------------- poring_c01 mapflag nowarpto poring_c01 mapflag noskill poring_c01 mapflag nosave poring_c01 mapflag nomemo poring_c01 mapflag noteleport poring_c01 mapflag nowarp //----------------------------------------------------------------------------------- -
thank you verry much :*
-
new error
:/
or i did something wrong
-
what should i do with
set #PVPDeathsAccount,#PVPDeathsAccount+1;
srry
-
what should i do ?
errors when more than 1 people kill someone
thats written under the error
plz help
-
find
//Announcement (Setting for Char) if (pvpbroadcast == 2){ announce strcharinfo(0)+" just claimed the "+((@PosinLadder+@considerdeath)+1)+". Position in the Top "+$@LadderLength+" after killing "+getd("$@PVPkilledplayer"+$@PVPcounter+"$")+".",16; } //Announcement (Setting for Account) if (#pvpbroadcast == 2){ announce strcharinfo(0)+" just claimed the "+((@PosinLadder+@considerdeath)+1)+". Position in the Top "+$@LadderLength+" after killing "+getd("$@PVPkilledplayer"+$@PVPcounter+"$")+".",16; } end;replace
//Announcement (Setting for Char) if (pvpbroadcast == 2){ announce strcharinfo(0)+" just claimed the "+((@PosinLadder+@considerdeath)+1)+". Position in the Top "+$@LadderLength,16; } //Announcement (Setting for Account) if (#pvpbroadcast == 2){ announce strcharinfo(0)+" just claimed the "+((@PosinLadder+@considerdeath)+1)+". Position in the Top "+$@LadderLength,16; } end;Now i got this error .
What Should i do ?
-
Find
mes @colour$[0]+(@x+1)+"^000000: "+@colour$[1]+$terces_PVP_names$[@x]+"^000000 "+@colour$[2]+$terces_PVP_kills[@x]+"^000000:"+@colour$[3]+$terces_PVP_deaths[@x]+"^000000 ~ "+@colour$[4]+callfunc ("Gettime",$terces_PVP_times[@x])+"^000000";Replace
mes @colour$[0]+(@x+1)+"^000000: "+@colour$[1]+$terces_PVP_names$[@x]+"^000000 "+@colour$[2]+$terces_PVP_kills[@x]+"^000000:";
and can u tell me plz
How to remove that
example
Player3131 have claimed the 16 after killing player123
i want to make it only
Player3131 have claimed the 16 !
-
Hello Everybody ^___^
i want help on editing this npc ..
i want the Kills only apears on the ranking No Death / No time
Example...
normally : kills:death ~ time
what i want / kills
Only Kills
Plz anyone help me on that
and thank you//===== eAthena Script ======================================= //= eAthena PVP-Ladder //===== By: ================================================== //= Terces //===== Current Version: ===================================== //= 1.7.2 //===== Compatible With: ===================================== //= Any Athena Version that has "for" implemented //===== Credits: ============================================= //= The whole eAthena Board and the eAthena Chat //===== Notes: =============================================== //= Note 1: //= Experience gain works like this formula: //= ($@LadderLength-(<new position>-1))*$@LadderExp //= so if someone gets the first place he'll get //= $@LadderLength*$@LadderExp experience points. //============================================================ //= Fixxed by Dante //= V1.7.2 //= Hosted by Dant3 aka Dante //= HAFE FUN! READ THE TOPIC! IT DONT WORKS MAYBE ON OLDER REV //= LAST UPDATE: 12th,February.2008 // Main Script - Terces (Main Thanks to Terces ) // V1.7.0 - Dant3 // v1.7.1 - AnnieRuRu // v1.7.2 - Dant3 // v1.7.3 - Dant3 // THIS SCRIPT WORKS ONLY ON THE NEW EATHENA REVISIONS! ENJOY! - script PVPLADDEROPTIONS -1,{ end; OnInit: // 0 = Disabled (NO) // 1 = Enable (YES) set $@languageselect, 0; //Enable/Disable language selection [English/German] (Default: 1) set $@LadderAnnounce, 0; //Enable/Disable the announcement when a char reaches a new position in the ladder (Default: 1) set $@LadderLength, 30; //Set the length of the Ladder [!Not higher than 128!] (Default: 30) set $@LadderSteps, 10; //Set the views per page (Default: 10)set $@LadderExpGain, 1; //Enable/Disable experience gain when reaching a new position in the ladder (*Note1) set $@LadderExp, 50; //Set Experience gain value (*Note1) set $@LadderZenyGain, 1; //Enable/Disable zeny gain when reaching a new position in the ladder set $@LadderZeny, 50; //Set Zeny gain value set $@LadderChatRoom, 1; //Enable/Disable an Chat Room over the NPC with the message "PvP Ladder" (Users can not enter the Chat room) set $@LadderAskLogin, 1; //Enable/Disable that the NPC asks about the Broadcast when a Player logins / or with the Npc Chat (0 = Login Ask , 1 = Npc Chat) Related: 0 set $@LadderGM, 60; //All GM LVL UNDER this value will show on the PvP Ladder (Over GM LVL: Not shown on Ladder | under GM LVL: Shown on Ladder) set $@LadderGMMenu, 99; //GM LVL that need for entering GM Menu } - script PVPLADDER -1,{ OnPCKillEvent: if ( getgmlevel() >= $@LadderGM ) end; if (terces_PVP_resets != $terces_PVP_resets) { dispbottom "Please relog your character, in order to get the correct kills for you in the PVP ladder."; dispbottom "Because a GM just reset the ladder."; end; } if ( killedrid == getcharid(3) ) { set PVPDeaths, PVPDeaths +1; set #PVPDeathsAccount, ; set @PVPDeathstoday, @PVPDeathstoday +1; end; } set $@PVPcounter,$@PVPcounter+1; set getd("$@PVPKill"+$@PVPcounter),getcharid(3); //getd to avoid errors when more than 1 people kill someone attachrid(killedrid); set PVPDeaths,PVPDeaths+1; set @PVPDeathstoday,@PVPDeathstoday+1; set #PVPDeathsAccount,#PVPDeathsAccount+1; set getd("$@PVPkilledplayer"+$@PVPcounter+"$"), strcharinfo(0); //again, getd to avoid possible glitches detachrid; attachrid(getd("$@PVPKill"+$@PVPcounter)); CountKills: set PVPKills,PVPKills+1; set @PVPKillstoday,@PVPKillstoday+1; set #PVPKillsAccount,#PVPKillsAccount+1; setarray @playerstats[0],@PVPKillstoday,@PVPDeathstoday,PVPKills,PVPDeaths,#PVPKillsAccount,#PVPDeathsAccount; l_ladder: set @considerdeath,0; for (set @PosinLadder, 0; @PosinLadder < $@LadderLength; set @PosinLadder, @PosinLadder + 1){ if (PVPKills >= $terces_PVP_kills[@PosinLadder]){ //Player deserves to be in the ladder //Check if Death plays a role on the position if ((PVPKills == $terces_PVP_kills[@PosinLadder]) && (PVPDeaths > $terces_PVP_deaths[@PosinLadder])) set @considerdeath,1; //Consider Deaths //Check if the player only topped his own scores if ($terces_PVP_names$[@PosinLadder] == strcharinfo(0)){ set $terces_PVP_kills[@PosinLadder],PVPKills; set $terces_PVP_deaths[@PosinLadder],PVPDeaths; end; } //Moves all characters in the Ladder for (set @beginmoving, $@LadderLength; @beginmoving >= (@PosinLadder+@considerdeath); set @beginmoving, @beginmoving - 1){ if ($terces_PVP_names$[@beginmoving] == strcharinfo(0)){ //If the player already is in the Ladder it only has to move players between characters new position and characters old position callsub L_LadderMove,0; end; } else if (@beginmoving == (@PosinLadder+@considerdeath)){ //Player is not in the Ladder and therefor it has to move all players from characters new position downwards callsub L_LadderMove,1; end; } } end; } } end; L_LadderMove: if (getarg(0) == 0) set @length,@beginmoving; if (getarg(0) == 1) set @length,$@LadderLength; for (set @movecycle, @length; @movecycle > (@PosinLadder+@considerdeath); set @movecycle, @movecycle - 1){ set $terces_PVP_names$[@movecycle],$terces_PVP_names$[(@movecycle-1)]; set $terces_PVP_kills[@movecycle],$terces_PVP_kills[(@movecycle-1)]; set $terces_PVP_deaths[@movecycle],$terces_PVP_deaths[(@movecycle-1)]; set $terces_PVP_times[@movecycle],$terces_PVP_times[(@movecycle-1)]; } //sets the character's stats in the new position set $terces_PVP_names$[(@PosinLadder+@considerdeath)],strcharinfo(0); set $terces_PVP_kills[(@PosinLadder+@considerdeath)],PVPKills; set $terces_PVP_deaths[(@PosinLadder+@considerdeath)],PVPDeaths; set $terces_PVP_times[(@PosinLadder+@considerdeath)],gettimetick(2); //Experience Gain if ($@LadderExpGain == 1){ set BaseExp,BaseExp+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderExp); dispbottom "You have just been rewarded with "+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderExp)+" base experience points"; } //Zeny Gain if ($@LadderZenyGain == 1){ set Zeny,Zeny+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderZeny); dispbottom "You have just been rewarded with "+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderZeny)+" Zeny"; } //Announcement (Setting for Char) if (pvpbroadcast == 2){ announce strcharinfo(0)+" just claimed the "+((@PosinLadder+@considerdeath)+1)+". Position in the Top "+$@LadderLength+" after killing "+getd("$@PVPkilledplayer"+$@PVPcounter+"$")+".",16; } //Announcement (Setting for Account) if (#pvpbroadcast == 2){ announce strcharinfo(0)+" just claimed the "+((@PosinLadder+@considerdeath)+1)+". Position in the Top "+$@LadderLength+" after killing "+getd("$@PVPkilledplayer"+$@PVPcounter+"$")+".",16; } end; OnPCLoginEvent: if (terces_PVP_resets != $terces_PVP_resets){ set PVPDeaths,0; set @PVPDeathstoday,0; set #PVPDeathsAccount,0; set PVPKills,0; set @PVPKillstoday,0; set #PVPKillsAccount,0; set terces_PVP_resets,$terces_PVP_resets; } if ($@LadderAskLogin == 0){ if (#pvpbroadcast == 2) goto L_ignore; if (pvpbroadcast == 2) goto L_ignore; if (#pvpbroadcast == 1) goto L_ignore; if (pvpbroadcast == 1) goto L_ignore; if (pvpbroadcast == 0) mes "Hi, "+strcharinfo(0)+""; mes "Me is the PvP Top Management!"; mes "Let me ask you one Question and i will let you play!"; menu "Later please",L_close,"Okay, fine",L_fine; L_fine: next; mes "Well, do you want read Broadcast Messages when a Player reach a new position on the PvP Ranglist?"; menu "Yeah, why not",L_accept,"No, thanks",L_accept_2,"Wtf is Broadcast?",L_broadcast; L_accept: next; mes "Yay, thank you! ^_^"; mes "Will this Setting work on all your Chars on this account or only this char?"; menu "Account",L_account,"Only this char",L_char; L_account: set #pvpbroadcast,2; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; close; L_char: set pvpbroadcast,2; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; goto access_eng; close; L_accept_2: next; mes "Yay, thank you! ^_^"; mes "Will this Setting work on all your Chars on this account or only this char?"; menu "Account",L_account_2,"Only this char",L_char_2; L_close: close; L_account_2: set #pvpbroadcast,1; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; close; L_char_2: set pvpbroadcast,1; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; goto access_eng; close; L_broadcast: mes "Broadcasts are this yellow messages from the GMs"; goto L_fine; } } caspen,174,230,3 script PvP Ladder 57,{ if ($@LadderChatRoom == 1) { delwaitingroom; waitingroom "PvP Top "+$@LadderLength+"",0; // Look on the configuration! } set @name$,"[PvP-Ladder]"; //Colour of: Position Name Kills Deaths Time setarray @colour$[0], "^996600", "^006699", "^00AA00", "^FF0000", "^EE8800"; if ($@LadderAskLogin == 1){ if (#pvpbroadcast == 2) goto access_eng; if (pvpbroadcast == 2) goto access_eng; if (#pvpbroadcast == 1) goto access_eng; if (pvpbroadcast == 1) goto access_eng; if (pvpbroadcast == 0) mes "Hi, "+strcharinfo(0)+""; mes "Me is the PvP Top Management!"; mes "Let me ask you one Question and i will let you play!"; menu "Later please",L_close,"Okay, fine",L_fine; L_fine: next; mes "Well, do you want read Broadcast Messages when a Player reach a new position on the PvP Ranglist?"; menu "Yeah, why not",L_accept,"No, thanks",L_accept_2,"Wtf is Broadcast?",L_broadcast; L_accept: next; mes "Yay, thank you! ^_^"; mes "Will this Setting work on all your Chars on this account or only this char?"; menu "Account",L_account,"Only this char",L_char; L_account: set #pvpbroadcast,2; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; close; L_char: set pvpbroadcast,2; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; goto access_eng; close; L_accept_2: next; mes "Yay, thank you! ^_^"; mes "Will this Setting work on all your Chars on this account or only this char?"; menu "Account",L_account_2,"Only this char",L_char_2; L_close: close; L_account_2: set #pvpbroadcast,1; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; close; L_char_2: set pvpbroadcast,1; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; goto access_eng; close; L_broadcast: mes "Broadcasts are this yellow messages from the GMs"; goto L_fine; } access_eng: mes @name$; mes "Hello "+strcharinfo(0)+"..."; mes "If you want to I can show you your PVP stats."; next; M_selection_eng: if ( getgmlevel () < $@LadderGMMenu ) menu "Show me the PVP Ladder",M_Ladder_eng,"PvP stats since my login",M_seitLogin_eng,"PvP stats of this Char",M_dieserChar_eng,"Stats of the whole account",M_vomAccount_eng,"Cancel",M_abbrechen_eng; else menu "[GM MENU]",GMMenu,"[USER MENU]",UserMenu; UserMenu: menu "Show me the PVP Ladder",M_Ladder_eng,"PvP stats since my login",M_seitLogin_eng,"PvP stats of this Char",M_dieserChar_eng,"Stats of the whole account",M_vomAccount_eng,"Cancel",M_abbrechen_eng; GMMenu: mes "PVP Ladder Script"; mes "Version: 1.7.3"; mes "Status of functions: "; mes "Reset Ladder: No Bugs"; mes "Delete Char on the ladder: BETA [Not working perfect]"; menu "Reset Ladder",L_reset,"Delete a Char on the Ladder",L_del_char,"Cancel",M_abbrechen_eng; M_Ladder_eng: mes "Alright...I'll show you the Top "+ $@LadderLength +" with "+$@LadderSteps+" entries per page."; mes "It'll be viewed like this:"; mes @colour$[0]+"Place^000000: "+@colour$[1]+"<name>^000000 :"+@colour$[2]+"<kills>^000000:"+@colour$[3]+"<deaths>^000000 "+@colour$[4]+"<time>"; next; callsub L_Ladder; goto M_selection_eng; M_seitLogin_eng: mes @name$; mes "Your stats since your login:"; mes @PVPKillstoday+"/"+@PVPDeathstoday+"(Kills/Deaths)"; next; goto M_selection_eng; M_dieserChar_eng: mes @name$; mes "Your stats of this Char:"; mes PVPKills+"/"+PVPDeaths+"(Kills/Deaths)"; next; goto M_selection_eng; M_vomAccount_eng: mes @name$; mes "Your stats of the whole account:"; mes #PVPKillsAccount+"/"+#PVPDeathsAccount+"(Kills/Deaths)"; next; goto M_selection_eng; M_abbrechen_eng: mes @name$; mes "OK. You can come back to me and see your stats whenever you want."; close; L_del_char: if (getgmlevel() < 99) end; mes "Do you want to delete a char on the Ladder?"; if (select ("Yes","No") == 2) goto L_end; next; mes "Please give me the Ladder Position of the Char"; input $@CharLadderInput; set $@CharLadder, $@CharLadderInput; deletearray @PosinLadder, $@CharLadderInput; next; mes "THIS IS ONLY BETA"; mes "When this step has not worked PLEASE wait until the next Update for this script"; mes "Please don't request support when this step has not worked"; close; L_reset: if (getgmlevel() < 99) end; mes "Do you want to reset the ladder?"; if (select ("Yes","No") == 2) goto L_end; mes "Are you really really sure you want to reset it?"; menu "Yes, ffs!!",-,"No",L_end; deletearray $terces_PVP_kills,128; deletearray $terces_PVP_deaths,128; deletearray $terces_PVP_names$,128; deletearray $terces_PVP_times,128; set $terces_PVP_resets,$terces_PVP_resets +1; L_end: mes "Okay...cya"; close; L_Ladder: for (set @y,0; @y < $@LadderLength; set @y,@y+$@LadderSteps){ for (set @x,@y; (@x < (@y+$@LadderSteps)) && (@x < ($@LadderLength)); set @x,@x+1){ if ($terces_PVP_names$[@x] != ""){ mes @colour$[0]+(@x+1)+"^000000: "+@colour$[1]+$terces_PVP_names$[@x]+"^000000 "+@colour$[2]+$terces_PVP_kills[@x]+"^000000:"+@colour$[3]+$terces_PVP_deaths[@x]+"^000000 ~ "+@colour$[4]+callfunc ("Gettime",$terces_PVP_times[@x])+"^000000"; } else { mes "^DD0000"+(@x+1)+": ^006699None^000000 "; } } next; } return; } function script Gettime { if (getarg(0)==0) return; set @difftimedays,(gettimetick(2) - getarg(0)); set @difftimehours,@difftimedays%86400; set @difftimeminutes,@difftimehours%3600; set @difftimeseconds,@difftimeminutes%60; set @days,@difftimedays/86400; set @hours,@difftimehours/3600; set @minutes,@difftimeminutes/60; set @seconds,@difftimeseconds; set @result$,""; if(@days != 0) set @result$,@result$+@days+"d "; if(@hours != 0) set @result$,@result$+@hours+"h "; if(@minutes != 0) set @result$,@result$+@minutes+"m "; if(@seconds != 0) set @result$,@result$+@seconds+"s"; return (@result$); } -
-
File Name: Investigation Room !!
File Submitter: Rage Guy
File Submitted: 13 Nov 2013
File Category: Maps & 3D Resources
Content Author: Rage GuyIts my First Map
and i will try to work on updating it ..Investigation Room can be used in Investigation of hacks and steeling whatever
u can summon the player on it
it got 2 chairs - 1-GM Chair 2-Player Chair
Have Fun ^^
You Can Download Now Version 2 of the map
-
when i open any map with Browedit it only appears to me with white colors
how to make it with the map colors? or this is a bug ..
-
I Want a verry simple npc
) A npc that got alot of rooms like [ 0/20 ]
u can take a room u and ur party
and no one else can enter
entering the room costs 50million Zeny
This room in alot of servers but the only diffrance i dont want a summoning mvp npc ..
i want it only room for the summoners to use Bloody Branch .
___
So When the party enter if someone tryed to enter the same room and his is not in the same party
he Cant Enter .. All What they can do inthere only using Bloody Branch's ..
Any one help me pls
-
i want any solve to this crash
pls help
-
how to make duel every 1 minite
its every 1 houre
or how to remove the time
thanks
-
How to solve thise error pls help
-
yes but custom one's
-
i mean a npc Style not a script ^^
-
How to add a custom NPC
Full Guide Please ^__^
Thanks....
-
how to add a custom robe view id
-
i mean i want to make the custom hair style example
@hairstyle 50
Disguise event
in Script Requests
Posted
hello ..
i want a disguise event
that only disguise to MVP monsters
plz anyone help me on that