Jump to content

myieee

Members
  • Posts

    83
  • Joined

  • Last visited

Everything posted by myieee

  1. Hi rathena. im using an event warper from eathena. so i'd like to suggest if its possible to hide the npc when the gm announced like Event Warps is now closed . so to prevent abusing by some players (they wont go to the event) and also if the gm announce that RFYL warps is now opened and the Event Warper NPC will be enable so the players will join to that event //===== eAthena Unofficial Script =========================================== //= Event Warper //===== By: ================================================================= //= rad417 //===== Current Version: ==================================================== //= 2.2 //===== Tested With: ==================================================== //= Trunk, SVN 13366+ //===== Description: ======================================================== //= Warps players to event place //===== Additional Comments: ================================================ //= For revisions, see the change log! //= 1.0 Script created //= 1.1 Added Test Warp for GMs //= 1.2 Added status PUB. //= 2.0 Implemented an ON and OFF system and an indicator(PUB and npc), //= also started with remote funtions, but failed to implement //=2.1 Added the line "sc_end SC_ALL;" for debuff upon warping (tnx ~AnnieRuru~, i read one of your post about this ) //=2.2 Finally implemented the remote function //=========================================================================== prontera,156,170,5 script Event Warper 811,{ if (getgmlevel()>=1){ check: if($state==0){ goto off; } else{ goto on; } close; //--------------STATE: OFF---------------------------------------------------- off: mes "[^3333FFEvent Warper^000000]"; mes "Event NPC State: ^FF0000OFF^000000"; mes "^221122--------Current Settings:--------^000000"; mes "Map: "+$map$+" "+$x+" "+$y; mes "Event: "+$event$; //mes "For remote commands:"; not yet implemented //mes "PM ^FF0000NPC:Event Warper^000000"; menu "Nothing",noon,"Turn ON",yeson,"Set Event Warp.",setplace,"Warp",yeswarp; yeson: set $state,1; next; mes "[^3333FFEvent Warper^000000]"; mes "Ok it is now turned ^009900ON^000000."; next; goto check; noon: next; mes "[^3333FFEvent Warper^000000]"; mes "Ok bye!"; close; //--------------STATE: ON---------------------------------------------------- on: mes "[^3333FFEvent Warper^000000]"; mes "Event NPC State: ^009900ON^000000"; mes "^221122--------Current Settings:--------^000000"; mes "Map: "+$map$+" "+$x+" "+$y; mes "Event: "+$event$; //mes "For remote commands:"; //mes "PM ^FF0000NPC:Event Warper^000000"; menu "Nothing",nooff,"Turn OFF",yesoff,"Set Event Warp.",setplace,"Warp",yeswarp; yesoff: set $state,0; next; mes "[^3333FFFULLRO Event Warper^000000]"; mes "Ok it is now turned ^FF0000OFF^000000."; next; goto check; nooff: next; mes "[^3333FFEvent Warper^000000]"; mes "Ok bye!"; close; setplace: next; mes "[^3333FFEvent Warper^000000]"; mes "You can set the event place here for easy access to players."; mes "Set it?"; menu "Yes",yes,"No.",no; yes: next; mes "[^3333FFEvent Warper^000000]"; mes "Just make sure you have the right coordinates."; mes "It should be map x-coordinate y coordinate"; next; change: mes "[^3333FFEvent Warper^000000]"; mes "Enter map name"; mes "example: prontera"; input $map$; next; mes "[^3333FFEvent Warper^000000]"; mes "Enter the x-coordinate:"; mes "example: 150"; input $x; next; mes "[^3333FFEvent Warper^000000]"; mes "Enter the y-coordinate:"; mes "example: 150"; input $y; next; mes "That is "+$map$+" "+$x+" "+$y+" right?"; menu "Yes.",-,"Let me change it.",change; mes "[^3333FFEvent Warper^000000]"; mes "Enter the Name of the EVENT:"; mes "example: RFYL"; input $event$; next; mes "[^3333FFEvent Warper^000000]"; mes "Ok, I will warp the contestants there."; close; no: mes "[^3333FFEvent Warper^000000]"; mes "Ok. Bye."; close; } //----------------------Normal Player--------------------------------- else{ if($state<=0){ mes "[^3333FFEvent Warper^000000]"; mes "Sorry. No events at this time."; emotion 17; close; } else{ emotion 21; mes "[^3333FFEvent Warper^000000]"; mes "There is an active event!"; mes "Do you want to go to the event place?"; menu "Yes, please.",yeswarp,"No, thanks.",nowarp; yeswarp: atcommand "@warp "+$map$+" "+$x+" "+$y; sc_end SC_ALL; end; nowarp: close; }} //---------------------remote functions-------------------------NOTE: Not yet functional------------------------------ OnWhisperGlobal: if (@whispervar0$=="|00On") {goto remoteon; close;} if (@whispervar0$=="|00Off"){goto remoteoff; close;} else dispbottom "Invalid syntax, you typed '"+@whispervar0+"'? you can only type On or Off."; end; remoteon: set $state,1; dispbottom "Ok it is now turned ON."; end; remoteoff: set $state,0; dispbottom "Ok it is now turned OFF."; end; OnInit: set $state,0; end; } morocc,155,90,5 duplicate(Event Warper) Event Warper#h1-1 811
  2. regarding on this topic . is there any way to put a max cap damage let say Bowling Bash i want a max cap damage like 36000 is it possible?
  3. go to your db folder look for skill_tree.txt then put your skills scripts on baby jobs ! and restart.
  4. i want to put a restriction like only base level 255 and job level 120 can use the npc thank you prontera,181,212,4 script Job Swapper 512,{ set @name$, "[Dream]"; if(Class == 4008 || Class == 4009 || Class == 4010 || Class == 4011 || Class == 4012 || Class == 4013 || Class == 4014 || Class == 4015 || Class == 4016 || Class == 4017 || Class == 4018 || Class == 4019 || Class == 4020 || Class == 4021){ if(Sex == 0)goto L_female; if(Sex == 1); mes @name$; mes "I can swap your job for 200 TCG Card only"; next; mes @name$; mes "Would you like to swap your job?"; if(select("No","Yes")==1){ mes @name$; mes "Okay, goodbye."; close; next; } else { next; mes @name$; mes "Please choose a job."; switch(select("Lord Knight","High Priest","High Wizard","Whitesmith","Sniper","Assassin Cross","Paladin","Champion","Professor","Stalker","Creator","Clown")){ Case 1: if(Class == 4008){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4008; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 2: if(Class == 4009){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4009; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 3: if(Class == 4010){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4010; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 4: if(Class == 4011){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4011; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 5: if(Class == 4012){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4012; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 6: if(Class == 4013){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4013; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 7: if(Class == 4015){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4015; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 8: if(Class == 4016){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4016; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 9: if(Class == 4017){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4017; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 10: if(Class == 4018){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4018; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 11: if(Class == 4019){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4019; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 12: if(Class == 4020){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4020; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; } } L_female: mes @name$; mes "I can swap your job for 200 TCG only"; next; mes "Would you like to swap your job?"; if(select("No","Yes")==1){ next; mes @name$; mes "Okay, goodbye."; close; } else { next; mes @name$; mes "Please choose a job."; switch(select("Lord Knight","High Priest","High Wizard","Whitesmith","Sniper","Assassin Cross","Paladin","Champion","Professor","Stalker","Creator","Gypsy")){ Case 1: if(Class == 4008){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4008; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 2: if(Class == 4009){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4009; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 3: if(Class == 4010){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4010; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 4: if(Class == 4011){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4011; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 5: if(Class == 4012){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4012; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 6: if(Class == 4013){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4013; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 7: if(Class == 4015){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4015; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 8: if(Class == 4016){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4016; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 9: if(Class == 4017){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4017; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 10: if(Class == 4018){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4018; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 11: if(Class == 4019){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4019; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; Case 12: if(Class == 4021){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have tcg"; next; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,200; jobchange 4021; set baselevel,255; set joblevel,1; set skillpoint,117; ResetSkill; close; } break; } } } else { mes @name$; mes "Sorry I only work for Transcendant classes."; close; } } [/codeBOX]
  5. thanks for the reply. problem solved !
  6. it doesnt work .. after i put the comma behind the level in all menus .!
  7. im really really tortured about this [Error]: Loading NPC file: npc/custom/cardt.txt script error on npc/custom/cardt.txt line 17 parse_line:need ';' 12: menu "Normal MVP Cards",H_01,"Special MVP Cards",H_02,"Cancel",H_quit; 13: 14:H_01: 15:menu 16: "Amon Ra",I_amon * 17: '"'Dark Lord',I_darkld 18: "Eddga"",I_eddga 19 "Evil Snake Lord",I_esl 20 "Maya",I_maya 21 "Orc Hero",I_orc 22: "Return to Menu",H_top; can someone help me? prontera,147,169,6 script MVP Trader 803,{ mes "[Dream]"; mes "Are you looking for MVP cards? ."; next; mes "[Dream]"; mes "Well i have Special MVP Cards"; mes "and Normal MVP Cards"; goto H_top; H_top: menu "Normal MVP Cards",H_01,"Special MVP Cards",H_02,"Cancel",H_quit; H_01: menu "Amon Ra",I_amon "Dark Lord",I_darkld "Eddga",I_eddga "Evil Snake Lord",I_esl "Maya",I_maya "Orc Hero",I_orc "Return to Menu",H_top; H_02: menu "Golden Thief Bug",I_thief "Phreeoni",I_phree "Tao Gunka",I_gunka "Turtle General",I_general "Valkyrie Randgris",I_randgris "Return to Menu",H_top; I_amon: mes "[Dream]"; mes "You need 300 TCG card for (Amon ra)"; mes "Do you really want this??"; next; menu "Yes",M_amon,"Return to Menu",H_top; I_darkld: mes "[Dream]"; mes "You need 300 TCG Card for (Dard Lord)"; mes "Do you really want this?"; next; menu "Yes.",M_darkld,"Return to Menu",H_top; I_eddga: mes "[Dream]"; mes "You need 300 TCG Card for (Eddga)"; mes "Do you really want this?"; next; menu "Yes.",M_eddga,"Return to Menu"H_top; I_esl: mes "[Dream]"; mes "You need 300 TCG Card for (Evil Snake Lord)"; mes "Do you really want this?"; next; menu "Yes.",M_esl,"Return to Menu",H_top; I_thief: mes "[Dream]"; mes "You need 700 TCG Card for (Golden Thief Bug)"; mes "Do you really want this?"; next; menu "Yes.",M_thief,"Return to Menu",H_top; I_maya: mes "[Dream]"; mes "You need 300 TCG Card for (Maya)"; mes "Do you really want this?"; next; menu "Yes.",M_maya,"Return to Menu",H_top; I_orc: mes "[Dream]"; mes "You need 300 TCG Card for (Orc Hero)"; mes "Do you really want this?"; next; menu "Yes.",M_orc,"Return to Menu",H_top; I_phree: mes "[Dream]"; mes "You need 1000 TCG Card for (Phreeoni)"; mes "Do you wish to continue?"; next; menu "Yes.",M_phree,"Return to Menu",H_top; I_gunka: mes "[Dream]"; mes "You need 1000 TCG Card for (Tao Gunka)"; mes "Do you wish to continue?"; next; menu "Yes.",M_gunka,"Return to Menu",H_top; I_general: mes "[Dream]"; mes "You need 700 TCG Card for (Turtle General)"; mes "Do you wish to continue?"; next; menu "Yes.",M_general,"Return to Menu",H_top; I_randgris: mes "[Dream]"; mes "You need 2000 TCG Card for (Valkyrie Randgris)"; mes "Do you wish to continue?"; next; menu "Yes.",M_randgris,"Return to Menu",H_top; M_amon: if(countitem(7227) < 300) goto M_insufficient; delitem 7227,300; getitem 4236,1; close; M_darkld: if(countitem(7227) < 300) goto M_insufficient; delitem 7227,300; getitem 4168,1; close; M_eddga: if(countitem(7227) < 300) goto M_insufficient; delitem 7227,300; getitem 4123,1; close; M_esl: if(countitem(7227) < 300) goto M_insufficient; delitem 7227,300; getitem 4330,1; close; M_maya: if(countitem(7227) < 300) goto M_insufficient; delitem 7227,300; getitem 4146,1; close; M_orc: if(countitem(7227) < 300) goto M_insufficient; delitem 7227,300; getitem 4143,1; close; M_thief: if(countitem(7227) < 700) goto M_insufficient; delitem 7227,700; getitem 4128,1; close; M_phree: if(countitem(7227) < 1000) goto M_insufficient; delitem 7227,1000; getitem 4121,1; close; M_gunka: if(countitem(7227) < 1000) goto M_insufficient; delitem 7227,1000; getitem 4302,1; close; M_general: if(countitem(7227) < 700) goto M_insufficient; delitem 7227,700; getitem 4305,1; close; M_randgris: if(countitem(7227) < 2000) goto M_insufficient; delitem 7227,2000; getitem 4407,1; close; M_insufficient: next; mes "[Dream]"; mes "you dont have enough of tcg"; mes "please come back when you do..."; menu "Return to Main Menu",H_top,"Leave",H_quit; end; H_quit: close; } [/codeBOX]
  8. Hi i am requesting here an Pvp Event ! Description (Outside NPC) (GM Access) - only GM can open the npc - on GM Menu they will choose for 3vs3 , 4vs4 , 5vs5 , 8vs8 and 10vs10 - it will announce that the event is open for example (3vs3 party event is now open you have 5mins to join) same as 4vs4,5vs5,8vs8 and 10vs10 so the players know! (Player Access) - Menu options for players (Would you like to join?),(No thank you) - Only registered party are allowed to join (Inside NPC) (Player Access) - Map Checker NPC (How many players are left) and item reward npc - Prize - 30tcg per each player - if they finished the winners will go to npc and get the prize and the party name will be announce - MAP (i will edit by my own) i wish someone can help me
  9. go to conf/battle/gm.conf // The maximum quantity of monsters that can be summoned per GM command (0 denotes an unlimited quantity) atcommand_spawn_quantity_limit: 25 then @reloadbattleconf
  10. well yah the script is working now. but the problem is. the script doesnt have a time or what time they can able to play that event ? HELP?
  11. lol.. type @reloadbattleconf or restart your server @_@
  12. // The rate the common items are dropped (Items that are in the ETC tab, besides card) item_rate_common: 10000 item_rate_common_boss: 10000 item_drop_common_min: 10000 item_drop_common_max: 10000 // The rate healing items are dropped (items that restore HP or SP) item_rate_heal: 10000 item_rate_heal_boss: 10000 item_drop_heal_min: 10000 item_drop_heal_max: 10000 // The rate at which usable items (in the item tab) other then healing items are dropped. item_rate_use: 10000 item_rate_use_boss: 10000 item_drop_use_min: 10000 item_drop_use_max: 10000 // The rate at which equipment is dropped. item_rate_equip: 10000 item_rate_equip_boss: 3500 item_drop_equip_min: 3500 item_drop_equip_max: 10000 [/codeBOX]
  13. What i mean is they can vend in a certain map but they wont allowed to use @autotrade .
  14. how to disable @autotrade / @at in a certain map for example prontera !
  15. I am requesting a script and its all about cleaning event how does it works ? - well in activation they need to pay 150m - they have 5minutes to join on that event and the npc will be closed - MAP pvp_n_5-5 - they need to kill / clean those monster in every waves (ex:) Wave 1 - easy monster Wave 2 - easy monster Wave 3 - medium monster Wave 4 - hard monster (Sniper Cecil) Wave 5 - Bonus Stage (100 treasure box) Wave 6 - medium monster (doppelganger) Wave 7 - Hard monster (Sniper Cecil) Wave 8 - Lighthalzen Boss Wave 9 - Final Boss (i can put my own monster) Wave 10 - Bonus Stage (1000 Treasure Box) Event Mechanics - They have 60seconds to kill the monster in every waves - if they did not finish the event , they will automatically warp in outside. - There is a npc in inside of the event (Time Seller and check how many monsters left in that event) - They need to pay 50m for the time extension (30 seconds only) - The more players the more monsters will be summoned . (ex:) if 4 players = 12 monsters will be summoned (1 player = 3 monsters) - if they finished the event (the party name will announced - broadcast) - mapflag - no warp - no memo - no save - no exp - no branch i guess i gave the all informations . i hope some one could help me ! thanks and appriciate !! HELP ??
  16. i have a question.. its stackable and spammable. but i want to put some limit like 6-10 Demonstration only..
  17. well i tried that but what i want is . only 4 random coordinates or something like array .. bump
  18. i just want to ask a request please help! thank you! Informations � Automated every 1 hour. � Only 1 party can join with 255 base levels and job level 120 (a party consist of 10 players and a 1st Come 1st serve Basis). � Only the party leader can register. � Once party has entered the event map Monster will automatically spawn. � The NPC will announce the party who killed or Finished the event � Will automatically warp outside the event map after they killed the monster and recieved the reward. � They can only get the reward once the monster is dead (Auto Reward given to All Party Members) but if someone died in event or disconected in-game they wont recieve any price and the event npc will announce "Monster Hunt Event Failed to finish". � if the 1st party didnt finish or failed in the event, the event will automatically continue and allow other party to join the event and finish it. but they need to wait atleast 5mins to join again. here is the sample script ayothaya,80,173,2 script Monster Hunt 929,{ if(.monsterhunt)==1 goto M_game; mes "[Monster Hunt]"; mes "No event for the moment."; close; M_game: mes "[Monster Hunt]"; if(getmapusers("pvp_n_1-3")>=1) goto L_no; if (!getcharid(1)) { mes "You are not in a party."; close; } if (getpartyleader(getcharid(1),2) != getcharid(0)) { mes "You are not the party leader."; close; } //if(!isloggedin(getcharid(3,$@partymembername$[.i]),getcharid(0,$@partymembername$[.i]))) { if(isloggedin(getcharid(3, $@partymembername$[.@i]))) { mes "Some party members are not online."; mes "Come back with everyone."; close; } attachrid (getcharid(3)); if(BaseLevel<255) { mes "Some party members don't have the Base Level required to enter Monster Hunt."; close; } getpartymember(getcharid(1)); set .@PartyCount, $@partymembercount; if (.@PartyCount == 5) { warpparty "pvp_n_1-3",100,139,getcharid(1); end; } else{ mes "Dont have enough player/s on your party."; close; } L_no: mes "There's someone in the arena."; close; OnMinute: announce "Monster Hunt Event is open.",0; monster "pvp_n_1-3.gat",0,0,"Cryptic",1847,1,"Monster Hunt::OnMobKilled"; set .monsterhunt,1; end; OnMobKilled: if(getmapusers("pvp_n_1-3")==5) goto L_good; announce ""+strcharinfo(1)+" party failed.",bc_all; warpparty "prontera.gat",0,0,getcharid(1); set .monsterhunt,0; end; L_good: getpartymember (getcharid(1),0); for( set .@i, 0; .@i < getarraysize($@partymembername$); set .@i, .@i+1 ) getitem 512,1,getcharid(3, $@partymembername$[.@i]); announce ""+strcharinfo(1)+" party killed the monster.",bc_all; warpparty "prontera.gat",0,0,getcharid(1); set .monsterhunt,0; end; }
  19. someone can help me. i have a PK server and i want a random coordinates for example if they use @go 1 . They will warp/respawn in random coordinates like this morocc 123 123 , morocc 213 213 , morocc 412 412 , morocc something like that to avoid hit/kill by the other players . and also to other towns . just give me an example so i can edit the coordinates of the other towns thank you.
  20. well it works.. but theres no TCG payment tho.. @_@ i found a script like this.. but this one has a lot of errors.. prontera,166,207,5 script Job Swapper 852,{ set @name$, "[Job Swapper]"; if(Class == 4008 || Class == 4009 || Class == 4010 || Class == 4011 || Class == 4012 || Class == 4013 || Class == 4014 || Class == 4015 || Class == 4016 || Class == 4017 || Class == 4018 || Class == 4019 || Class == 4020 || Class == 4021){ if(Sex == 0)goto L_female; if(Sex == 1); mes @name$; mes "Would you like to swap your job sir?"; mes "I can swap your job if you have 35 TCG card to trade with me"; if(select("No","Yes")==1){ next; mes @name$; mes "Okay, goodbye."; close; } else { next; mes @name$; mes "Please choose a job."; switch(select("Lord Knight","High Priest","High Wizard","Whitesmith","Sniper","Assassin Cross","Paladin","Champion","Professor","Stalker","Creator","Clown")){ Case 1: if(Class == 4008){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4008; set JobLevel, 1; close; } break; Case 2: if(Class == 4009){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4009; set JobLevel, 1; close; } break; Case 3: if(Class == 4010){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4010; set JobLevel, 1; close; } break; Case 4: if(Class == 4011){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4011; set JobLevel, 1; close; } break; Case 5: if(Class == 4012){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4012; set JobLevel, 1; close; } break; Case 6: if(Class == 4013){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4013; set JobLevel, 1; close; } break; Case 7: if(Class == 4015){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4015; set JobLevel, 1; close; } break; Case 8: if(Class == 4016){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4016; set JobLevel, 1; close; } break; Case 9: if(Class == 4017){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4017; set JobLevel, 1; close; } break; Case 10: if(Class == 4018){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4018; set JobLevel, 1; close; } break; Case 11: if(Class == 4019){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4019; set JobLevel, 1; close; } break; Case 12: if(Class == 4020){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4020; set JobLevel, 1; close; } break; } } L_female: mes @name$; mes "Would you like to swap jobs, ma'am?"; mes "I can swap your job if you have TeamRO card to trade with me"; if(select("No","Yes")==1){ next; mes @name$; mes "Okay, goodbye."; close; } else { next; mes @name$; mes "Please choose a job."; switch(select("Lord Knight","High Priest","High Wizard","Whitesmith","Sniper","Assassin Cross","Paladin","Champion","Professor","Stalker","Creator","Gypsy")){ Case 1: if(Class == 4008){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4008; set JobLevel, 1; close; } break; Case 2: if(Class == 4009){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4009; set JobLevel, 1; close; } break; Case 3: if(Class == 4010){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4010; set JobLevel, 1; close; } break; Case 4: if(Class == 4011){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4011; set JobLevel, 1; close; } break; Case 5: if(Class == 4012){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4012; set JobLevel, 1; close; } break; Case 6: if(Class == 4013){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4013; set JobLevel, 1; close; } break; Case 7: if(Class == 4015){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4015; set JobLevel, 1; close; } break; Case 8: if(Class == 4016){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4016; set JobLevel, 1; close; } break; Case 9: if(Class == 4017){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4017; set JobLevel, 1; close; } break; Case 10: if(Class == 4018){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4018; set JobLevel, 1; close; } break; Case 11: if(Class == 4019){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4019; set JobLevel, 1; close; } break; Case 12: if(Class == 4021){ next; mes @name$; mes "That's already your current job."; close; } else { next; mes @name$; mes "Let me check if you have"; if(countitem(7227)<1){mes @name$; mes "Sorry, you don't have enough TCG."; close;} if(countitem(7227)>=1); mes @name$; mes "Job Swapping Successful"; delitem 7227,35; jobchange 4021; set JobLevel, 1; close; } break; } } } else { mes @name$; mes "Sorry I only work for Transcendant classes."; mes "Just come back when you are at your right level and class"; close; } ahmm bump !!
  21. ahmm it doesnt work @_@
×
×
  • Create New...