Jump to content

Ragnar Lothbrok

Members
  • Posts

    309
  • Joined

  • Last visited

Everything posted by Ragnar Lothbrok

  1. Can i request a NPC that convert MVP cards to Pods... like Garm Card = 10pods Stormy Card = 15pods FBH Card = 100pods ..... thanks in advance
  2. i got this problem to... how to fix this?
  3. how to make Food not stackable? like STR_DISH20 not stackable to STR_DISH10??? thanks
  4. Guys, pano fix to pg ng "/aura on" ung aura ko magiging bubbles pg ng "/aura off" namn ko lilitaw ung aura pang 99.... gnun b tlga un? hindi ba dapat pg "on" dun lilitaw ung aura? tapos pg off ung bubbles?
  5. on mid gear, can you teach me how to fix it?
  6. How to fix this sprite guys? or anyone have a working sprite of this wing... thanks
  7. thanks sir, what if want also to detect a item in his inventory?
  8. i want my script detect the level of the player, if the character is not yet lvl 99 it will not get the items or the conversation will not continue...thanks in advance if(BaseLevel <=98 ){ mes "GTFU"; close; }
  9. can i request a freebies npc but the npc detects the gender of the char and it will gives the item for the coresponding gender.. sample : if p = male then goto freebies for male if p = female then goto freebies for female then account base.... thanks in advance...
  10. yeah! i just copied the description of the real valkyrie armor, then i just change the ID #... still no description...
  11. how can i show the definition? i already edit client side idnum2itemdesctable.txt, but still nothing happens...
  12. guys pano gumawa ng custom box? penge guide please...thanks
  13. Guys, can you please fix this... every round it's always says "Last round now" phtownall,182,199,4 script Disguise NPC 794,{ 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 get it over with ~.~ "; sleep 4000; npctalk "But first I will explain to you how to play the game."; sleep 6000; npctalk "I am going to disguise into a random monster."; sleep 5000; npctalk "You have to guess the monster's name and shout it out."; sleep 5000; npctalk "Don't bother about the use of capital and small initial letters."; sleep 8000; npctalk "Now get ready."; sleep 5000; } else if ($DisguiseRound < $guessrounds-10) { 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; npctalk "Di mo alam?"; sleep 2000; npctalk "Balu meh?"; end; OnTimer10000: if (!.DisguiseWon) { npctalk "Come on. What monster am I?"; sleep 3000; npctalk "Dimolam?"; sleep 2000; npctalk "Balumeh?"; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} } end; OnTimer25000: if (!.DisguiseWon) { npctalk "Nobody knows that monster?"; sleep 3000; npctalk "Dimolam?"; sleep 2000; npctalk "Balumeh?"; } end; OnTimer35000: if (!.DisguiseWon) { npctalk "You get 10 more seconds to guess my name."; sleep 3000; npctalk "Dimolam?"; sleep 2000; npctalk "Balumeh?"; } end; OnTimer45000: if (!.DisguiseWon) { npctalk "Round is over."; if (!$guessactive) {disablenpc "guesswarp"; disablenpc "Disguise NPC"; end;} set $DisguiseRound, $DisguiseRound + 1; sleep 3000; deletepset 1; 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 guys"; sleep 2000; emotion 12; sleep 1000; set $guessactive, 0; setnpcdisplay "Disguise NPC",794; disablenpc "Disguise NPC"; disablenpc "guesswarp"; end; } goto OnStart; } end; winround: setnpctimer 0; deletepset 1; set .DisguiseWon, 1; set $DisguiseRound, $DisguiseRound + 1; npctalk strcharinfo(0) + " got my right name!"; sleep2 3000; npctalk $MonsterName$ + " is the correct answer."; sleep2 3000; npctalk "Take this as a reward."; getitem $guessprize, $guessprizecount; 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 guys"; sleep 2000; emotion 12; sleep 1000; setnpcdisplay "Disguise NPC",794; disablenpc "Disguise NPC"; disablenpc "guesswarp"; end; } sleep 5000; goto OnStart; end; } //----------------------------------------------------------------------------------- //----------------------------------------------------------------------------------- - script guessAnnouncer -1,{ OnGMStart: if ($guessactive) end; set $guessactive, 1; announce "A Gamemaster has started the Disguise Event",0; set $guessbegin, 0; sleep 3000; if (!$guessactive) end; announce "If you want to participate, go to our Maintown and head left!.",0; enablenpc "Disguise NPC"; enablenpc "guesswarp"; sleep 3000; announce "Number of Rounds: "+$guessrounds,0; sleep 2000; announce "Prize: "+ getitemname($guessprize) + " x " + $guessprizecount,0; sleep 2000; if (!$guessactive) {disablenpc "Disguise NPC"; end;} announce "The event is going to start in one minute.",0; sleep 60000; if (!$guessactive) {disablenpc "Disguise NPC"; end;} announce "The event is now starting.",0; set $DisguiseRound, 0; sleep 5000; if (!$guessactive) {disablenpc "Disguise NPC"; end;} if(getmapusers("phtownall") == 0) { disablenpc "Disguise NPC"; disablenpc "guesswarp"; set $guessactive, 0; end; } donpcevent "Disguise NPC::OnStart"; end; OnGMStop: if ($guessactive) { set $guessactive, 0; announce "A Gamemaster has stopped the Disguise Event",0; set $DisguiseRound, 0; setnpcdisplay "Disguise NPC",794; disablenpc "Disguise NPC"; } end; OnMinute00: if ($guessactive) end; set $guessactive, 1; announce "We are starting a Disguise Event now.",0; set $guessbegin, 0; sleep 3000; if (!$guessactive) end; announce "If you want to participate, go to our Maintown and head left!.",0; enablenpc "Disguise NPC"; enablenpc "guesswarp"; sleep 2000; announce "Prize: "+ getitemname($guessprize) + " x " + $guessprizecount,0; sleep 2000; if (!$guessactive) {disablenpc "Disguise NPC"; end;} announce "The event is going to start in 1 minute.",0; sleep 60000; if (!$guessactive) {disablenpc "Disguise NPC"; end;} announce "The event is now starting.",0; sleep 5000; if (!$guessactive) {disablenpc "Disguise NPC"; end;} announce "Next Event will start in 1 hour.",0; set $DisguiseRound, 0; if(getmapusers("phtownall") == 0) { disablenpc "Disguise NPC"; disablenpc "guesswarp"; 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,1324,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; }
  14. ganito gus2 kong gwin may mga pinatch ako mga custom item sa server ko kaso directory nila sa client hindi sa grf... ngyun gus2 ko gumawa ng updated installer na nasa grf na lahat ng ginawa kong custom items... pano ko ilalagay lahat ng custome items ko sa grf ko para mkagawa ako updated grf na hindi pinapatch?
  15. sql? check yout inter_athena.conf or maybe you sql database..
  16. thanks Sir Arcenciel.. what about to check party?
  17. already create entries on data\num2itemresnametable.txt,but still when the custom item drop i still get error... [solved] Euphy!
  18. i want this script to check for party before entering the room and when inside the room i want to disable /organize, please edit it... thanks - script LMS#disable -1,{ OnInit: disablenpc "Mr. Banker"; enablenpc "Last Man Standing"; end; } - script LMS -1,{ OnClock000: OnClock0305: OnClock0605: OnClock0905: OnClock1205: OnClock1505: OnClock1805: OnClock2105: goto startlmsevent; startlmsevent: announce "Mr. Manager: The Last Man Standing event will be starting shortly.",0; sleep2 10000; announce "Mr. Manager: Those who want to play, please proceed to Maintown.",0; sleep2 10000; announce "Mr. Manager: After 1 Minute the LMS NPC will close.",0; sleep2 10000; announce "Mr. Manager: Please go to Maintown now if you want to join.",0; enablenpc "Last Man Standing"; initnpctimer; end; OnTimer30000: announce "Mr. Manager: Last 30 seconds.",0; sleep2 5000; announce "Mr. Manager: If you want to join go in Maintown.",0; end; OnTimer50000: announce "Mr. Manager: Last 10 seconds.",0; end; OnTimer55000: announce "Mr. Manager: 5.",0; end; OnTimer56000: announce "Mr. Manager: 4.",0; end; OnTimer57000: announce "Mr. Manager: 3.",0; end; OnTimer58000: announce "Mr. Manager: 2.",0; end; OnTimer59000: announce "Mr. Manager: 1.",0; end; OnTimer60000: announce "Mr. Manager: Time's up.",0; end; OnTimer61000: disablenpc "Last Man Standing"; donpcevent "Mr. Banker::OnEnable"; stopnpctimer; end; } //---------All Job Registration--------------- phtownall,194,184,5 script Last Man Standing 488,{ if( Class == Job_Novice ){ mes "Novice cant join."; close; } if (ismounting) atcommand "@newmount"; else if (checkriding()) atcommand "@mount"; warp "quiz_02",310,267; atcommand "@disguise 1163"; atcommand "@fakename Raydric"; atcommand "@size 0"; mes "[Mr. Manager]"; mes "Hello What can I do for you?"; next; menu "Register",-,"What is LMS?",what,"Leave",leave; next; mes "[Mr. Manager]"; mes "Thankyou for registering Mr. " + strcharinfo(0) + ", Have fun!"; warp "quiz_02",310,267; end; what: mes "[Mr. Manager]"; mes "LMS is also known as Last Man Standing Event"; next; mes "[Mr. Manager]"; mes "LMS is also like a PvP."; mes "The only difference is at LMS you will get 5 Proof of Donation if you are the Last Man Standing at the arena."; next; mes "[Mr. Manager]"; mes "That's all"; close; leave: mes "[Mr. Manager]"; mes "I hope you will register next time"; close; } //-------------------------- //-------------------------- quiz_02,303,265,6 script Mr. Banker 56,{ mes "[banker]"; mes "Congrats. You've won."; next; announce "Mr. Manager: We have a winner! well done "+strcharinfo(0)+".",0; getitem 7179, 5; // Change This item id to what ever you want . item id,amount getitem 110, 30; dispbottom "5 Proof of Donation and 30 Event Coins"; mes "You will return now"; warp "phtownall",200,180; disablenpc "Mr. Banker"; close; end; OnEnable: pvpoff "quiz_02"; mapannounce "quiz_02","Mr. Manager:The Last Man Standing Event will start shortly",0; sleep2 10000; mapannounce "quiz_02","Mr. Manager:But before we start this is just a few reminders..",0; sleep2 10000; mapannounce "quiz_02","Mr. Manager:Using Cloaking , Hiding is strictly not allowed..",0; sleep2 10000; mapannounce "quiz_02","Mr. Manager: Only the Last Man Standing will win this event!!",0; sleep2 10000; mapannounce "quiz_02","Mr. Manager: What are we waiting for?..Let's Get Ready to Rumble!!...",0; sleep2 10000; goto L_Start; end; L_Start: if(getmapusers("quiz_02") == 1) goto L_Champ; if(getmapusers("quiz_02") == 0) goto L_None; if(getmapusers("quiz_02") > 1) { mapannounce "quiz_02","Mr. Manager: Get ready at the count of 5 we will start!....",0; sleep2 10000; mapannounce "quiz_02","Mr. Manager: 5",0; sleep2 5000; mapannounce "quiz_02","Mr. Manager: 4",0; sleep2 4000; mapannounce "quiz_02","Mr. Manager: 3",0; sleep2 3000; mapannounce "quiz_02","Mr. Manager: 2",0; sleep2 2000; mapannounce "quiz_02","Mr. Manager: 1",0; sleep2 1000; pvpon "quiz_02"; goto timer; end; } timer: initnpctimer; end; OnTimer1000: end; OnTimer1100: if(getmapusers("quiz_02") == 1) goto L_Champ; if(getmapusers("quiz_02") > 2) goto timer; if(getmapusers("quiz_02") == 2) goto champ; stopnpctimer; end; champ: announce "Mr. Manager: Last 2 Brave warriors are still alive!",0; sleep2 10000; if(getmapusers("quiz_02") == 1) goto L_Champ; if(getmapusers("quiz_02") > 1) goto timer; end; L_Champ: mapannounce "quiz_02","Mr. Banker: Please talk to me to get your prize..",0; pvpoff "quiz_02"; enablenpc "Mr. Banker"; end; L_None: disablenpc "Banker"; pvpoff "quiz_02"; end; } //----- Die = warp prt ----- - script Killa_warp -1,{ OnPCDieEvent: getmapxy(.@map$,.@x,.@y,0); if(.@map$=="quiz_02") { set #kill_point, 0; announce ""+strcharinfo(0)+" died, and out of the game!.",bc_all; warp "phtownall",188,188; sleep 1; atcommand "@raise"; end; } OnPCKillEvent: getmapxy(.@map$,.@x,.@y,0); if(.@map$=="quiz_02") { set #kill_point,#kill_point+1; if ( #kill_point % 4 == 0) { announce ""+strcharinfo(0)+" have made 4 Consecutive Kills!!He will be granted an item",bc_all; getitem 671, 10; getitem 7619, 2; getitem 7620, 2; end; } } } // == Mapflags quiz_02 mapflag nowarp quiz_02 mapflag nowarpto quiz_02 mapflag noteleport quiz_02 mapflag nosave quiz_02 mapflag nomemo quiz_02 mapflag nobranch quiz_02 mapflag pvp_noparty quiz_02 mapflag restricted 1 quiz_02 mapflag pvp_noguild quiz_02 mapflag nocommand 1
×
×
  • Create New...