Jump to content

Mhalicot

Community Contributors
  • Content Count

    1971
  • Joined

  • Last visited

  • Days Won

    37

Everything posted by Mhalicot

  1. Hello, I'd made some modification in your script because some if will be deleted in future. see details Deprecation of Legacy Script Commands. But I haven't test it yet. //==============================================================================////= Script Release : Job Changer + Max Leveler [ Version 1.6 ]//==================================By==========================================////= ManiacSociety//==============================================================================////= Idea Came From : ManiacSociety//= Helper : Emistry & Kenpachi//==============================================================================////= D E S C R I P T I O N S//==============================================================================//// -- 1. Character can choose a Job which he like to be.// -- 2. This NPC only have 1 Time Usage.// If it is set to Account Based then that account can use 1 times.// If it is set to Character Based then all new character can use 1 times.// -- 3. Complete skills / Skill Points will be given if it is set to be.// -- 4. Base Level and Job Level will be given upon Job Change.// -- 5. Allow players to click an items to call out the NPC.//==============================================================================////= V E R S I O N S//==============================================================================//// -- [ 1.6 ] : Added Item Script which allow the Scripts work as a "Tickets".// -- [ 1.5 ] : Added Configuration for Account Based / Character Based Settings// -- [ 1.4 ] : Added Baby Classes + 3rd Job Classes. // -- [ 1.3 ] : Added Configuration Option , 4 Announce Option , Informations. // -- [ 1.2 ] : Simplified Scripts + Shorten the Scripts. // -- [ 1.1 ] : Added New Job Change Option. // -- [ 1.0 ] : Simple Login Auto Max Level + Job Changer. //==============================================================================////= R U L E S//==============================================================================//// -- 1. Do not use for exchanging purpose. // -- 2. Do not claim it as yours. // -- 3. Do not change or remove the credits.// -- 4. Do not sell the script in order to get paid.// -- 5. Do not re-sharing upon modified without permission.//==============================================================================//// -- Add this at item DB. ( Change it to any items to your like. )// -- 30000,JobClassTicket,JobClassTicket,11,10,,10,,,,,0xFFFFFFFF,7,2,,,,,,{ doevent "ClassHelper::OnMenu"; },{},{}- script ClassHelper -1,{OnInit:// -- Configuration Option.npcname$ = "[ ^0000FF Class Helper ^000000 ]";.InfoMenu =1; // Classes Informations Option [ 0 - Disable / 1 - Enable ].1stClassMenu =1; // First Job Class Option [ 0 - Disable / 1 - Enable ].2ndClassMenu = 1; // Second Job Class Option [ 0 - Disable / 1 - Enable ].High1stClassMenu = 1; // High 1st Class Option [ 0 - Disable / 1 - Enable ].Trans2ndClassMenu = 1; // Transcendent Class Option [ 0 - Disable / 1 - Enable ].Trans3rdClassMenu = 1; // Third Job Class Option [ 0 - Disable / 1 - Enable ].ExpandedClassMenu = 1; // Expanded Class Option [ 0 - Disable / 1 - Enable ].BabyClassMenu = 1; // Baby Job Class Option [ 0 - Disable / 1 - Enable ].Baby3rdClassMenu = 1; // Baby Third Job Class Option [ 0 - Disable / 1 - Enable ].Allskills = 0; // Complete Skills Option [ 0 - Disable / 1 - Enable ]// -- Usable for Only 1 Time.Based = 1; // [ 0 - Account Based / 1 - Character Based ]end;OnMenu: if( ClassHelper == 1 || #ClassHelper == 1 ) end; mes .npcname$; mes "PLEASE CHOOSE YOUR JOB..."; mes " ^FF0000________________________________^000000"; mes "What do you want to be?"; mes " ^FF0000________________________________^000000"; next; mes .npcname$; mes "Do you admire those who have a great power ? Do you wish to become a part of them ? If yes , then which classes that you admire the most ?"; next; switch(select(( !.InfoMenu)?"":"^4EEE94Classes Information^000000", ( !.1stClassMenu)?"":"^0000FFFirst Job Classes^000000", ( !.2ndClassMenu)?"":"^0000FFSecond Job Classes^000000", ( !.High1stClassMenu)?"":"^0000FFHigh First Job Classes^000000", ( !.Trans2ndClassMenu)?"":"^0000FFTranscendent Job Classes^000000", ( !.Trans3rdClassMenu)?"":"^0000FFThird Job Classes^000000", ( !.ExpandedClassMenu)?"":"^0000FFExpanded Job Classes^000000", ( !.BabyClassMenu)?"":"^0000FFBaby Normal Job Classes^000000", ( !.Baby3rdClassMenu)?"":"^0000FFBaby Third Job Classes^000000", "^FF0000Sorry, I admire nobody....^000000")) { case 1: callsub Classes_info; case 2: callsub FirstJob_Classes; case 3: callsub SecondJob_Classes; case 4: callsub HighFirstJob_Classes; case 5: callsub TransSecondJob_Classes; case 6: callsub TransThirdJob_Classes; case 7: callsub ExpandedJob_Classes; case 8: callsub BabyJob_Classes; case 9: callsub BabyThirdJob_Classes; case 10: if (!.Based) #ClassHelper = 1; else ClassHelper = 1; close; } FirstJob_Classes: mes .npcname$; mes "So, I give you a chance now. Which Classes will you choose to join ? Tell me your desired Classes."; next; switch(select("^76EE00Swordman^000000", "^76EE00Magician^000000", "^76EE00Archer^000000", "^76EE00Acolyte^000000", "^76EE00Merchant^000000", "^76EE00Thief^000000", "^FF0000Back^000000")) {// --- callsub Job_Changing,<JOB>,<BaseLv>,<JobLv>,<Skill>,<Announce>; case 1: callsub Job_Changing,1,174,50,60,"All"; case 2: callsub Job_Changing,2,174,50,60,"All"; case 3: callsub Job_Changing,3,174,50,60,"All"; case 4: callsub Job_Changing,4,174,50,60,"All"; case 5: callsub Job_Changing,5,174,50,60,"All"; case 6: callsub Job_Changing,6,174,50,60,"All"; case 7: callsub OnMenu; }HighFirstJob_Classes: mes .npcname$; mes "So, i give you a chance now. Which Classes will you choose to join ? Tell me your desired Classes."; next; switch(select("^76EE00High Swordsman^000000", "^76EE00High Magician^000000", "^76EE00High Archer^000000", "^76EE00High Acolyte^000000", "^76EE00High Merchant^000000", "^76EE00High Thief^000000", "^FF0000Back^000000")) {// --- callsub Job_Changing,<JOB>,<BaseLv>,<JobLv>,<Skill>,<Announce>; case 1: callsub Job_Changing,4002,174,50,60,"All"; case 2: callsub Job_Changing,4003,174,50,60,"All"; case 3: callsub Job_Changing,4004,174,50,60,"All"; case 4: callsub Job_Changing,4005,174,50,60,"All"; case 5: callsub Job_Changing,4006,174,50,60,"All"; case 6: callsub Job_Changing,4007,174,50,60,"All"; case 7: callsub OnMenu; } SecondJob_Classes: mes .npcname$; mes "So, I give you a chance now. Which Classes will you choose to join ? Tell me your desired Classes."; next; switch(select("^76EE00Knight^000000", "^76EE00Priest^000000", "^76EE00Wizard^000000", "^76EE00Blacksmith^000000", "^76EE00Hunter^000000", "^76EE00Assassin^000000", "^76EE00Crusader^000000", "^76EE00Monk^000000", "^76EE00Sage^000000", "^76EE00Rogue^000000", "^76EE00Alchemist^000000", ( Sex == 0 )?"":"^76EE00Dancer^000000", ( Sex == 1 )?"":"^76EE00Bard^000000", "^FF0000Back^000000")) {// --- callsub Job_Changing,<JOB>,<BaseLv>,<JobLv>,<Skill>,<Announce>; case 1: callsub Job_Changing,7,174,50,110,"All"; case 2: callsub Job_Changing,8,174,50,110,"All"; case 3: callsub Job_Changing,9,174,50,110,"All"; case 4: callsub Job_Changing,10,174,50,110,"All"; case 5: callsub Job_Changing,11,174,50,110,"All"; case 6: callsub Job_Changing,12,174,50,110,"All"; case 7: callsub Job_Changing,14,174,50,110,"All"; case 8: callsub Job_Changing,15,174,50,110,"All"; case 9: callsub Job_Changing,16,174,50,110,"All"; case 10: callsub Job_Changing,17,174,50,110,"All"; case 11: callsub Job_Changing,18,174,50,110,"All"; case 12: callsub Job_Changing,20,174,50,110,"All"; case 13: callsub Job_Changing,19,174,50,110,"All"; case 14: callsub OnMenu; }TransSecondJob_Classes: mes .npcname$; mes "So, i give you a chance now. Which Classes will you choose to join ? Tell me your desired Classes."; next; switch(select("^76EE00Lord Knight^000000", "^76EE00High Priest^000000", "^76EE00High Wizard^000000", "^76EE00Whitesmith^000000", "^76EE00Sniper^000000", "^76EE00Assassin Cross^000000", "^76EE00Paladin^000000", "^76EE00Champion^000000", "^76EE00Professor^000000", "^76EE00Stalker^000000", "^76EE00Creator^000000", ( Sex == 0 )?"":"^76EE00Gypsy^000000", ( Sex == 1 )?"":"^76EE00Clowm^000000", "^FF0000Back^000000")) {// --- callsub Job_Changing,<JOB>,<BaseLv>,<JobLv>,<Skill>,<Announce>; case 1: callsub Job_Changing,4008,174,70,130,"All"; case 2: callsub Job_Changing,4009,174,70,130,"All"; case 3: callsub Job_Changing,4010,174,70,130,"All"; case 4: callsub Job_Changing,4011,174,70,130,"All"; case 5: callsub Job_Changing,4012,174,70,130,"All"; case 6: callsub Job_Changing,4013,174,70,130,"All"; case 7: callsub Job_Changing,4015,174,70,130,"All"; case 8: callsub Job_Changing,4016,174,70,130,"All"; case 9: callsub Job_Changing,4017,174,70,130,"All"; case 10: callsub Job_Changing,4018,174,70,130,"All"; case 11: callsub Job_Changing,4019,174,70,130,"All"; case 12: callsub Job_Changing,4021,174,70,130,"All"; case 13: callsub Job_Changing,4020,174,70,130,"All"; case 14: callsub OnMenu; }TransThirdJob_Classes: mes .npcname$; mes "So, i give you a chance now. Which Classes will you choose to join ? Tell me your desired Classes."; next; switch(select("^76EE00Rune Knight^000000", "^76EE00Warlock^000000", "^76EE00Ranger^000000", "^76EE00Arch Bishop^000000", "^76EE00Mechanic^000000", "^76EE00Guillotine Cross^000000", "^76EE00Royal Guard^000000", "^76EE00Sorcerer^000000", ( Sex == 0 )?"":"^76EE00Wanderer^000000", ( Sex == 1 )?"":"^76EE00Minstrel^000000", "^76EE00Shura^000000", "^76EE00Genetic^000000", "^76EE00Shadow Chaser^000000", "^FF0000Back^000000")) {// --- callsub Job_Changing,<JOB>,<BaseLv>,<JobLv>,<Skill>,<Announce>; case 1: callsub Job_Changing,4060,174,70,210,"All"; case 2: callsub Job_Changing,4061,174,70,210,"All"; case 3: callsub Job_Changing,4062,174,70,210,"All"; case 4: callsub Job_Changing,4063,174,70,210,"All"; case 5: callsub Job_Changing,4064,174,70,210,"All"; case 6: callsub Job_Changing,4065,174,70,210,"All"; case 7: callsub Job_Changing,4073,174,70,210,"All"; case 8: callsub Job_Changing,4074,174,70,210,"All"; case 9: callsub Job_Changing,4076,174,70,210,"All"; case 10: callsub Job_Changing,4075,174,70,210,"All"; case 11: callsub Job_Changing,4077,174,70,210,"All"; case 12: callsub Job_Changing,4078,174,70,210,"All"; case 13: callsub Job_Changing,4079,174,70,210,"All"; case 14: callsub OnMenu; } ExpandedJob_Classes: mes .npcname$; mes "So, i give you a chance now. Which Classes will you choose to join ? Tell me your desired Classes."; next; switch(select("^76EE00Super Novice^000000", "^76EE00Gunslinger^000000", "^76EE00Ninja^000000", "^76EE00Takewon^000000", "^76EE00Star Gladiator^000000", "^76EE00Soul Linker^000000", ( Sex == 0 )?"":"^76EE00Kagerou^000000", ( Sex == 1 )?"":"^76EE00Oboro^000000", "^76EE00Extended Super Novice^000000", "^76EE00Rebellion^000000", "^FF0000Back^000000")) {// --- callsub Job_Changing,<JOB>,<BaseLv>,<JobLv>,<Skill>,<Announce>; case 1: callsub Job_Changing,23,174,99,110,"All"; case 2: callsub Job_Changing,24,174,50,600,"All"; case 3: callsub Job_Changing,25,174,50,60,"All"; case 4: callsub Job_Changing,4046,174,50,60,"All"; case 5: callsub Job_Changing,4047,174,50,110,"All"; case 6: callsub Job_Changing,4049,174,50,110,"All"; case 7: callsub Job_Changing,4212,174,100,130,"All"; case 8: callsub Job_Changing,4211,174,100,130,"All"; case 9: callsub Job_Changing,4190,174,100,130,"All"; case 10: callsub Job_Changing,4215,174,100,130,"All"; case 11: callsub OnMenu; }BabyJob_Classes: mes .npcname$; mes "So, I give you a chance now. Which Classes will you choose to join ? Tell me your desired Classes."; next; switch(select("^76EE00Baby Swordsman^000000", "^76EE00Baby Magician^000000", "^76EE00Baby Archer^000000", "^76EE00Baby Acolyte^000000", "^76EE00Baby Merchant^000000", "^76EE00Baby Thief^000000", "^76EE00Baby Knight^000000", "^76EE00Baby Priest^000000", "^76EE00Baby Wizard^000000", "^76EE00Baby Blacksmith^000000", "^76EE00Baby Hunter^000000", "^76EE00Baby Assassin^000000", "^76EE00Baby Crusader^000000", "^76EE00Baby Monk^000000", "^76EE00Baby Sage^000000", "^76EE00Baby Rogue^000000", "^76EE00Baby Alchemist^000000", ( Sex == 0 )?"":"^76EE00Baby Dancer^000000", ( Sex == 1 )?"":"^76EE00Baby Bard^000000", "^76EE00Baby Baby^000000", "^FF0000Back^000000")) {// --- callsub Job_Changing,<JOB>,<BaseLv>,<JobLv>,<Skill>,<Announce>; case 1: callsub Job_Changing,4024,174,50,60,"All"; case 2: callsub Job_Changing,4025,174,50,60,"All"; case 3: callsub Job_Changing,4026,174,50,60,"All"; case 4: callsub Job_Changing,4027,174,50,60,"All"; case 5: callsub Job_Changing,4028,174,50,60,"All"; case 6: callsub Job_Changing,4029,174,50,60,"All"; case 7: callsub Job_Changing,4030,174,50,110,"All"; case 8: callsub Job_Changing,4031,174,50,110,"All"; case 9: callsub Job_Changing,4032,174,50,110,"All"; case 10: callsub Job_Changing,4033,174,50,110,"All"; case 11: callsub Job_Changing,4034,174,50,110,"All"; case 12: callsub Job_Changing,4035,174,50,110,"All"; case 13: callsub Job_Changing,4037,174,50,110,"All"; case 14: callsub Job_Changing,4038,174,50,110,"All"; case 15: callsub Job_Changing,4039,174,50,110,"All"; case 16: callsub Job_Changing,4040,174,50,110,"All"; case 17: callsub Job_Changing,4041,174,50,110,"All"; case 18: callsub Job_Changing,4043,174,50,110,"All"; case 19: callsub Job_Changing,4042,174,50,110,"All"; case 20: callsub Job_Changing,4045,174,50,110,"All"; case 21: callsub OnMenu; } BabyThirdJob_Classes: mes .npcname$; mes "So, I give you a chance now. Which Classes will you choose to join ? Tell me your desired Classes."; next; switch(select("^76EE00Baby Rune Knight^000000", "^76EE00Baby Warlock^000000", "^76EE00Baby Ranger^000000", "^76EE00Baby Arch Bishop^000000", "^76EE00Baby Mechanic^000000", "^76EE00Baby Guillotine Cross^000000", "^76EE00Baby Royal Guard^000000", "^76EE00Baby Sorcerer^000000", ( Sex == 0 )?"":"^76EE00Baby Wanderer^000000", ( Sex == 1 )?"":"^76EE00Baby Minstrel^000000", "^76EE00Baby Sura^000000", "^76EE00Baby Genetic^000000", "^76EE00Baby Shadow Chaser^000000", "^FF0000Back^000000")) {// --- callsub Job_Changing,<JOB>,<BaseLv>,<JobLv>,<Skill>,<Announce>; case 1: callsub Job_Changing,4096,174,70,210,"All"; case 2: callsub Job_Changing,4097,174,70,210,"All"; case 3: callsub Job_Changing,4098,174,70,210,"All"; case 4: callsub Job_Changing,4099,174,70,210,"All"; case 5: callsub Job_Changing,4100,174,70,210,"All"; case 6: callsub Job_Changing,4101,174,70,210,"All"; case 7: callsub Job_Changing,4102,174,70,210,"All"; case 8: callsub Job_Changing,4103,174,70,210,"All"; case 9: callsub Job_Changing,4105,174,70,210,"All"; case 10: callsub Job_Changing,4104,174,70,210,"All"; case 11: callsub Job_Changing,4106,174,70,210,"All"; case 12: callsub Job_Changing,4107,174,70,210,"All"; case 13: callsub Job_Changing,4108,174,70,210,"All"; case 14: callsub OnMenu; }Job_Changing: mes .npcname$; mes "You are now a part of ^FF0000"+jobname(getarg(0))+"^000000."; if (compare(getarg(4),"All")){ announce "[ "+strcharinfo(0)+" ] has changed to [ "+jobname(getarg(0))+" ].",bc_all,0x76EE00; } if (compare(getarg(4),"Map")){ announce "[ "+strcharinfo(0)+" ] has changed to [ "+jobname(getarg(0))+" ].",bc_map,0x76EE00; } if (compare(getarg(4),"Area")){ announce "[ "+strcharinfo(0)+" ] has changed to [ "+jobname(getarg(0))+" ].",bc_area,0x76EE00; } if (compare(getarg(4),"Self")){ announce "[ "+strcharinfo(0)+" ] has changed to [ "+jobname(getarg(0))+" ].",bc_self,0x76EE00; } jobchange getarg(0); set BaseLevel,getarg(1); set JobLevel,getarg(2); resetskill; resetstatus; set SkillPoint,getarg(3); if ( .Allskills == 1 ){ atcommand "@allskills"; SkillPoint = 0; } percentheal 100,100; if (!.Based) #ClassHelper = 1; else ClassHelper = 1; delitem 20401,1; dispbottom "Congratulation! Thank you for choosing a Class!."; dispbottom "Please make your base level 175 to get out of this area.."; close; Classes_info: mes .npcname$; mes "=====[^76EE00 Swordman Classes ^000000]====="; mes " ^FF0000________________________________^000000"; mes "^4EEE94Description :^000000"; mes "Enthusiastic skills in sword fighting is a definite attraction to all teenagers. Easy to control and master character enables most players to be a great player."; mes " ^FF0000________________________________^000000"; next; mes .npcname$; mes "=====[^76EE00 Archer Classes ^000000]====="; mes " ^FF0000________________________________^000000"; mes "^4EEE94Description :^000000"; mes "Long ranged attack ability and special techniques of archers in defeating enemy often lure players to try this."; mes " ^FF0000________________________________^000000"; next; mes .npcname$; mes "=====[^76EE00 Mage Classes ^000000]====="; mes " ^FF0000________________________________^000000"; mes "^4EEE94Description :^000000"; mes "Fascinating element techniques involvement of nature in its abilities is truly amazing with their series of undefeatable magics."; mes " ^FF0000________________________________^000000"; next; mes .npcname$; mes "=====[^76EE00 Thief Classes ^000000]====="; mes " ^FF0000________________________________^000000"; mes "^4EEE94Description :^000000"; mes "Poisoning and dodging abilities will defeat most of the enemy. Maximum defensive and offensive ability caused this character to fearsome one."; mes " ^FF0000________________________________^000000"; next; mes .npcname$; mes "=====[^76EE00 Acolyte Classes ^000000]====="; mes " ^FF0000________________________________^000000"; mes "^4EEE94Description :^000000"; mes "A supportive character, most of the skills like helping will benefit to teammates who lead to teammates act like a terminator."; mes " ^FF0000________________________________^000000"; next; mes .npcname$; mes "=====[^76EE00 Merchant Classes ^000000]====="; mes " ^FF0000________________________________^000000"; mes "^4EEE94Description :^000000"; mes "Involving communication with other players that emphasizes on battles, intelligence in business dealing. His versatility made him must not be look down."; mes " ^FF0000________________________________^000000"; next; mes .npcname$; mes "=====[^76EE00 Super Novice ^000000]====="; mes " ^FF0000________________________________^000000"; mes "^4EEE94Description :^000000"; mes "A job who are Advanced after Novice Class. It look alike like a Novice but it is not. Beside that, it can learn most of the skills for all 1st Job Class."; mes " ^FF0000________________________________^000000"; next; mes .npcname$; mes "=====[^76EE00 Gunslinger ^000000]====="; mes " ^FF0000________________________________^000000"; mes "^4EEE94Description :^000000"; mes "The only Job class in RO who are using Gun as weapon. If are you a Gun Lover , there is no doubt you will choose this Job."; mes " ^FF0000________________________________^000000"; next; mes .npcname$; mes "=====[^76EE00 Ninja ^000000]====="; mes " ^FF0000________________________________^000000"; mes "^4EEE94Description :^000000"; mes "A mysterious Job Class , who alway processing Ancient Spells , look alike with Mage but not mage , good in PK , can evade very well during PK."; mes " ^FF0000________________________________^000000"; next; mes .npcname$; mes "=====[^76EE00 Taekwon ^000000]====="; mes " ^FF0000________________________________^000000"; mes "^4EEE94Description :^000000"; mes "Just like the name has mentioned. The only class in RO who are not using any Weapon. Attack enemy using barehand and foots. "; mes " ^FF0000________________________________^000000"; next; mes .npcname$; mes "=====[^76EE00 Star Gladiator ^000000]====="; mes " ^FF0000________________________________^000000"; mes "^4EEE94Description :^000000"; mes "A class who can use the power of the Sun / Star / Moon. By processing the power of Universe to gain a stronger Power."; mes " ^FF0000________________________________^000000"; next; mes .npcname$; mes "=====[^76EE00 Soul Linker ^000000]====="; mes " ^FF0000________________________________^000000"; mes "^4EEE94Description :^000000"; mes "Class that work like a Shaman, who able to recalling the soul of the dead from the underworld to Boost other class ability."; mes " ^FF0000________________________________^000000"; next; callsub OnMenu;}
  2. I don't think you can make one using via bindatcommand unless there is a script command appropriate with it.. so here I make a simple HPM plugin for you..just browse the wiki on how to install it..enjoy.. // Copyright (c) Hercules Dev Team, licensed under GNU GPL.// See the LICENSE file// Sample Hercules Plugin#include <stdio.h>#include <stdlib.h>#include <string.h>#include "../common/HPMi.h"#include "../common/malloc.h"#include "../common/mmo.h"#include "../common/socket.h"#include "../common/strlib.h"#include "../map/clif.h"#include "../map/pc.h"#include "../map/script.h"#include "../common/HPMDataCheck.h" /* should always be the last file included! (if you don't make it last, it'll intentionally break compile time) *//* malufett@yourservice */HPExport struct hplugin_info pinfo = {"ATCMD_NO_ATK", // Plugin nameSERVER_TYPE_MAP,// Which server types this plugin works with?"0.1", // Plugin versionHPM_VERSION, // HPM Version (don't change, macro is automatically updated)};struct atk_state{int enabled;};ACMD(no_atk) {struct atk_state *data;if(!(data = getFromMSD(sd,0))){ CREATE(data,struct atk_state,1); data->enabled = 0; addToMSD(sd,data,0,true);}if(data->enabled){ data->enabled = 0; clif->message(sd->fd, "You can now attack normally.");}else{ data->enabled = 1; clif->message(sd->fd, "You are now disabled to attack.");}return true;}int hook_battle_check_target(int retVal, struct block_list *src, struct block_list *target,int *flag){struct map_session_data* sd;struct atk_state *data;struct block_list *s_bl = src;if( retVal != 1 || src->type != BL_PC ) return retVal;if( (s_bl = battle->get_master(src)) == NULL ) s_bl = src;sd = BL_CAST(BL_PC, s_bl);if(sd && *flag&BCT_ENEMY && (data = getFromMSD(sd,0)) && data->enabled) return 0;return retVal;}HPExport void plugin_init (void) {char *server_type;char *server_name; /* core vars */server_type = GET_SYMBOL("SERVER_TYPE");server_name = GET_SYMBOL("SERVER_NAME");/* core interfaces */battle = GET_SYMBOL("battle");clif = GET_SYMBOL("clif");iMalloc = GET_SYMBOL("iMalloc");/* addAtcommand */addAtcommand("noatk",no_atk); // @noatkaddAtcommand("na",no_atk); // @na/* postHook */addHookPost("battle->check_target",hook_battle_check_target);ShowStatus ("Running HPM Plugin: '"CL_WHITE"%s"CL_RESET"'.n", pinfo.name);} Bro, I am having this error in console after rebuilding: not sure if related to this: http://herc.ws/board/topic/7723-building-on-windows-platform-hpm-hooking-errors/#entry46426 Thanks! Simple enable it in conf/plugins.conf plugins_list: [ /* Enable HPMHooking when plugins in use rely on Hooking */- //"HPMHooking",+ "HPMHooking", //"db2sql", //"sample", //"other",]
  3. I think your topic is same with HPMHooking_char.so (faild to load). Please read the information in the link.. (Moved to Plugins Support).
  4. Hello, Please point out how you fix it by Clicking "Mark Solved" or please comment how you fix it in your post and click the "Mark Solved" button at the bottom right. Thanks for cooperation. Int'l Moderator, Mhalicot
  5. It seems the author is not yes active since Dec 06 2013 03:35 PM e So drop him/her a email that provided in his/her post.
  6. Hello, If i have free time.. Let me take a look at it Int'l Moderator, Mhalicot
  7. Hello, Do not forget to Click "Mark Solved" if you think your problem has been solved. (Mark Solved). Int'l Moderator, Mhalicot
  8. Hello, Please comment the information that make your problem solved not just writing solved on it so that others have reference.. Thanks for cooperation. Int'l Moderator, Mhalicot
  9. Hello Jolteo, Please provide more detailed information on your topic.. no one can help you if they don't know exactly what you want or what you talking about. Int'l Moderator, Mhalicot
  10. Hello, If you have time.. Please post or comment the information on how you fix your problem for others reference.. Thanks.. Int'l Moderator, Mhalicot
  11. Your welcome.. BTW.. how your problem solved? please mark solved the comment for others reference? Thanks
  12. Can't confirm your information.. because based on [WIKI]Quest Log System the format is correct.. Try to add HUNTING on all questprogress? for instance copy the script below prontera,92,210,4 script Icarus 4_KAVAC,{set .@nombre$, "^01A9DB[Icarus]^000000";showevent QTYPE_QUEST,1;if(!questprogress(70000)) {mes .@nombre$;mes "Asi que puedes hablar conmigo...";mes "Soy uno de los guerreros de Ragnarok.";mes "Fui un fiel sirviente del ^0B610BCaballero Ark^000000";next;mes .@nombre$;mes "Pero durante la batalla final en odin_tem02, algo salio mal...";mes "Nos vimos acorralados por una gran cantidad de monstruos.";mes "Espero que ^6E6E6EBelfus^000000 se encuentre con vida...";next;mes .@nombre$;mes "Durante ese dia que he vagado por todo Midgard en busca de mi liberacion.";mes "Espero algun dia poder traer la paz a este lugar...";next;mes .@nombre$;mes "^088A4B"+strcharinfo(0)+"^000000 por favor, debes ayudarme.";mes "Encuentra a Belfus, he escuchado sobre un rumor.";mes "He escuchado que se encuentra pricionero en odin_tem02, camino al puente.";mes "Por desgracia nadie más me puede ver a excepcion tuya.";mes "Si decides ayudarme, te ayudare en poder crear unas ^8A0829Wings Legendarias^000000.";mes "Con ellas podras equiparte unas poderosas armas, que estoy seguro que te ayudaran en tus batallas";next;mes .@nombre$;mes "Cuando encuentres a ^6E6E6EBelfus^000000, ven a visitarme nuevamente.";setquest 70000;close;} else if (questactive(70000)) {next;mes .@nombre;mes "Te estare esperando aqui.";close;} if((questprogress(70000) == 2) && (questprogress(70001,HUNTING) == 2) && (questprogress(70002) == 2)) {mes .@nombre$;mes "Lo prometido es deuda...";mes "Te enseñare a crear las wings que he inventado";mes "^088A08Icarus Wings^000000";mes "Con estas Wings tendras el derecho de portar las armas que algun dia use.";mes "Pero... como sabras estoy muerto.";mes "Deberas encontrar tu el material...";next;if(getequipid(EQI_HEAD_LOW) == icarus_wings) {set .weapons, 1; mes .@nombre$; mes "Asi que ya has conseguido las icarus Wings."; mes "Muy bien, toma nota."; mes "He repartido mis armas en las siguientes direcciones:"; mes ".."; close;}switch(select("Ingredientes",( .weapons?"::":"Icarus Weapons" ) ) ){ case 1: mes .@nombre$; mes "Necesito los siguientes ingredientes :"; while(.@i < getarraysize(.items_req) ) { mes ""+getitemname(.items_req[.@i]) +" ^B40404 x"+ .items_cantidad[.@i] +"^000000"; .@i++; } switch(select("Tengo todo!:Aun no...")) { case 1: if ( (countitem(.items_req[0]) < .items_cantidad[0] ) || (countitem(.items_req[1]) < .items_cantidad[1] ) || (countitem(.items_req[2]) < .items_cantidad[2] ) || (countitem(.items_req[3]) < .items_cantidad[3] ) || (countitem(.items_req[4]) < .items_cantidad[4] ) || (countitem(.items_req[5]) < .items_cantidad[5] ) || (countitem(.items_req[6]) < .items_cantidad[6] ) || (countitem(.items_req[7]) < .items_cantidad[7] )) { mes "No tienes todos los items necesarios."; mes "Revisa que este todo en orden."; close; } if ( !checkweight(.recompensa_item, .recompensa_total) ){ mes "No tienes suficiente espacio !. Libera espacio en tu inventario."; close; } while( .@j < getarraysize(.items_req) ){ delitem .items_req[.@j], .items_cantidad[.@j]; .@j++; } announce " "+strcharinfo(0)+"Ha creado "+.recompensa_item+"",bc_all,0xDC143C; getitem .recompensa_item, .recompensa_total; break; case 2: mes .@nombre$; mes "Te estare esperando aqui.!"; break;} } } OnInit:.weapons = 0;.recompensa_item = 20134;.recompensa_total = 1;setarray .items_req[0], 20360, 20028, 20347, 20346, 980,716,715,969;setarray .items_cantidad[0], 1,1,1,1,100,100,100;end;}odin_tem02,181,269,4 script Prisionero 4_LEVITATEMAN,{set .@nombrez$, "^0000FF[Belfus]^000000";if(!questprogress(70001,HUNTING)) {mes .@nombrez$;mes "Maldicion..!. ";mes "Tu ^0000FF" +strcharinfo(0)+ "^000000 rescatame!";mes "Elimina a estas bestias:";mes "^FF0040x15 Frus^000000 ";mes "^FF0040x5 Skogul^000000";setquest 70001;close;} else if (questprogress(70001,HUNTING) == 1) {mes .@nombrez$;mes "Vamos!... Ayudame.";mes "Eliminalos y te ayudare en lo que quieras";close;} else if (questprogress(70001,HUNTING) == 2) {mes .@nombrez$;mes "Gracias, te debo una.";mes "Ahora...";mes "Que deseas saber?";next;switch(select("Cuentame sobre Icarus")){ case 1: mes .@nombrez$; mes "OH!... Es increible!"; mes "Como conoces a Icarus!"; mes ".........."; next; mes .@nombrez$; mes "Bien como sea..."; mes "Icarus fue... uhmmm.."; mes "Fue un gran guerrero, un fiel seguidor de ^0B610BArk^000000"; mes "Creo que daria la vida por ^0B610BArk^000000..."; mes "Solo espero que se encuentre bien..."; next; mes .@nombrez$; mes "Durante la batalla nos vimos acorralados por criaturas misteriosas"; mes "Se caracterizaban por tener 3 tipos de elementos..."; mes "^0000FFAgua^000000, ^FF0040Fuego^000000 y ^0B610BHierba^000000"; mes "Solo recuerdo que el de elemento Agua parecia una clase de tortuga..."; mes "Gracias a Icarus pude seguir con vida."; mes "Luego que logre escapar de aquella invasion, estuve buscando informacion acerca de algunas ^31B404armas misteriosas^000000."; mes "No tuve resultado alguno... Solo acabe prisionero en este puente."; next; mes .@nombrez$; mes "Si pudiera encontrar a Icarus..."; completequest 70000; completequest 70001; close; break; } } } prontera,247,244,2 script Caballero Ark 4_WHITEKNIGHT,{set .@nombrex$, "^FFBF00[Ark]^000000";if((questprogress(70000) == 2) && (questprogress(70001,HUNTING) == 2)){setquest 70000;mes .@nombrex$;mes "Ya veo... asi que ya conoces a ^01A9DBIcarus^000000 y a ^0000FFBelfus^000000.";next;mes .@c$;mes "Esas bestias son realmente invencibles !";mes "Recuerdo aquel dia...";mes "Sus nombres eran ^0B610BBafermon^000000, ^0000FFIzilormon^000000 y ^FF0040Froremon^000000";mes "Desgarraron a mas de 500 soldados en cuestion de segundos...";mes "Icarus era el unico quien sus poderes podia combatirlos.";mes "Era el portador de las armas legendarias. He intentado encontrarlas, pero el...";mes "EL NO DEBIA MORIR!";next;mes .@nombrex$;mes "Maldicion... es el fin...";mes "Nadie nos podra salvar...";mes "Si tan solo... si tan solo...";completequest 70002;close;} else {mes .@nombrex$;mes "Saludos " +strcharinfo(0)+"";close;} } prontera,142,229,5 script Maquina 2_DROP_MACHINE,{if(getequipid(EQI_HEAD_LOW) == icarus_wings && Bow == 1) {mes ".....";mes "......";close;}else{mes "Una maquina defectuosa.";mes "Oculta un poder misterioso.";close;}}
  13. Maybe it is an emulator problem.. refer to http://herc.ws/board/topic/7484-checkquest-questprogress/?p=46349
  14. Try to add in quest_db the others "70000, 70002" which has been used in your script?
  15. you experience that error in odin_tem02 only? did you add your quest in quest/db? // need to add the quest to /db/quest_db.txt - e.g:// 70000,0,1002,3,0,0,0,0,"3 Splats Please!"
  16. try this one prontera,92,210,4 script Icarus 4_KAVAC,{set .@nombre$, "^01A9DB[Icarus]^000000";showevent QTYPE_QUEST,1;if(questprogress(70000) == 0) {mes .@nombre$;mes "Asi que puedes hablar conmigo...";mes "Soy uno de los guerreros de Ragnarok.";mes "Fui un fiel sirviente del ^0B610BCaballero Ark^000000";next;mes .@nombre$;mes "Pero durante la batalla final en odin_tem02, algo salio mal...";mes "Nos vimos acorralados por una gran cantidad de monstruos.";mes "Espero que ^6E6E6EBelfus^000000 se encuentre con vida...";next;mes .@nombre$;mes "Durante ese dia que he vagado por todo Midgard en busca de mi liberacion.";mes "Espero algun dia poder traer la paz a este lugar...";next;mes .@nombre$;mes "^088A4B"+strcharinfo(0)+"^000000 por favor, debes ayudarme.";mes "Encuentra a Belfus, he escuchado sobre un rumor.";mes "He escuchado que se encuentra pricionero en odin_tem02, camino al puente.";mes "Por desgracia nadie más me puede ver a excepcion tuya.";mes "Si decides ayudarme, te ayudare en poder crear unas ^8A0829Wings Legendarias^000000.";mes "Con ellas podras equiparte unas poderosas armas, que estoy seguro que te ayudaran en tus batallas";next;mes .@nombre$;mes "Cuando encuentres a ^6E6E6EBelfus^000000, ven a visitarme nuevamente.";setquest 70000;close;} else if (questactive(70000)) {next;mes .@nombre;mes "Te estare esperando aqui.";close;} if((questprogress(70000) == 2) && (questprogress(70001) == 2) && (questprogress(70002) == 2)) {mes .@nombre$;mes "Lo prometido es deuda...";mes "Te enseñare a crear las wings que he inventado";mes "^088A08Icarus Wings^000000";mes "Con estas Wings tendras el derecho de portar las armas que algun dia use.";mes "Pero... como sabras estoy muerto.";mes "Deberas encontrar tu el material...";next;if(getequipid(EQI_HEAD_LOW) == icarus_wings) {set .weapons, 1; mes .@nombre$; mes "Asi que ya has conseguido las icarus Wings."; mes "Muy bien, toma nota."; mes "He repartido mis armas en las siguientes direcciones:"; mes ".."; close;}switch(select("Ingredientes",( .weapons?"::":"Icarus Weapons" ) ) ){ case 1: mes .@nombre$; mes "Necesito los siguientes ingredientes :"; while(.@i < getarraysize(.items_req) ) { mes ""+getitemname(.items_req[.@i]) +" ^B40404 x"+ .items_cantidad[.@i] +"^000000"; .@i++; } switch(select("Tengo todo!:Aun no...")) { case 1: if ( (countitem(.items_req[0]) < .items_cantidad[0] ) || (countitem(.items_req[1]) < .items_cantidad[1] ) || (countitem(.items_req[2]) < .items_cantidad[2] ) || (countitem(.items_req[3]) < .items_cantidad[3] ) || (countitem(.items_req[4]) < .items_cantidad[4] ) || (countitem(.items_req[5]) < .items_cantidad[5] ) || (countitem(.items_req[6]) < .items_cantidad[6] ) || (countitem(.items_req[7]) < .items_cantidad[7] )) { mes "No tienes todos los items necesarios."; mes "Revisa que este todo en orden."; close; } if ( !checkweight(.recompensa_item, .recompensa_total) ){ mes "No tienes suficiente espacio !. Libera espacio en tu inventario."; close; } while( .@j < getarraysize(.items_req) ){ delitem .items_req[.@j], .items_cantidad[.@j]; .@j++; } announce " "+strcharinfo(0)+"Ha creado "+.recompensa_item+"",bc_all,0xDC143C; getitem .recompensa_item, .recompensa_total; break; case 2: mes .@nombre$; mes "Te estare esperando aqui.!"; break;} } } OnInit:.weapons = 0;.recompensa_item = 20134;.recompensa_total = 1;setarray .items_req[0], 20360, 20028, 20347, 20346, 980,716,715,969;setarray .items_cantidad[0], 1,1,1,1,100,100,100;end;}odin_tem02,181,269,4 script Prisionero 4_LEVITATEMAN,{set .@nombrez$, "^0000FF[Belfus]^000000";if(questprogress(70001) == 0) {mes .@nombrez$;mes "Maldicion..!. ";mes "Tu ^0000FF" +strcharinfo(0)+ "^000000 rescatame!";mes "Elimina a estas bestias:";mes "^FF0040x15 Frus^000000 ";mes "^FF0040x5 Skogul^000000";setquest 70001;close;} else if (questactive(70001)) {mes .@nombrez$;mes "Vamos!... Ayudame.";mes "Eliminalos y te ayudare en lo que quieras";close;} else if (questprogress(70001,HUNTING) == 2) {mes .@nombrez$;mes "Gracias, te debo una.";mes "Ahora...";mes "Que deseas saber?";next;switch(select("Cuentame sobre Icarus")){ case 1: mes .@nombrez$; mes "OH!... Es increible!"; mes "Como conoces a Icarus!"; mes ".........."; next; mes .@nombrez$; mes "Bien como sea..."; mes "Icarus fue... uhmmm.."; mes "Fue un gran guerrero, un fiel seguidor de ^0B610BArk^000000"; mes "Creo que daria la vida por ^0B610BArk^000000..."; mes "Solo espero que se encuentre bien..."; next; mes .@nombrez$; mes "Durante la batalla nos vimos acorralados por criaturas misteriosas"; mes "Se caracterizaban por tener 3 tipos de elementos..."; mes "^0000FFAgua^000000, ^FF0040Fuego^000000 y ^0B610BHierba^000000"; mes "Solo recuerdo que el de elemento Agua parecia una clase de tortuga..."; mes "Gracias a Icarus pude seguir con vida."; mes "Luego que logre escapar de aquella invasion, estuve buscando informacion acerca de algunas ^31B404armas misteriosas^000000."; mes "No tuve resultado alguno... Solo acabe prisionero en este puente."; next; mes .@nombrez$; mes "Si pudiera encontrar a Icarus..."; completequest 70000; completequest 70001; close; break; } } } prontera,247,244,2 script Caballero Ark 4_WHITEKNIGHT,{set .@nombrex$, "^FFBF00[Ark]^000000";if((questprogress(70000) == 2) && (questprogress(70001) == 2)){setquest 70000;mes .@nombrex$;mes "Ya veo... asi que ya conoces a ^01A9DBIcarus^000000 y a ^0000FFBelfus^000000.";next;mes .@c$;mes "Esas bestias son realmente invencibles !";mes "Recuerdo aquel dia...";mes "Sus nombres eran ^0B610BBafermon^000000, ^0000FFIzilormon^000000 y ^FF0040Froremon^000000";mes "Desgarraron a mas de 500 soldados en cuestion de segundos...";mes "Icarus era el unico quien sus poderes podia combatirlos.";mes "Era el portador de las armas legendarias. He intentado encontrarlas, pero el...";mes "EL NO DEBIA MORIR!";next;mes .@nombrex$;mes "Maldicion... es el fin...";mes "Nadie nos podra salvar...";mes "Si tan solo... si tan solo...";completequest 70002;close;} else {mes .@nombrex$;mes "Saludos " +strcharinfo(0)+"";close;} } prontera,142,229,5 script Maquina 2_DROP_MACHINE,{if(getequipid(EQI_HEAD_LOW) == icarus_wings && Bow == 1) {mes ".....";mes "......";close;}else{mes "Una maquina defectuosa.";mes "Oculta un poder misterioso.";close;}} in line 70: close; completequest 70000; completequest 70001; break; maybe because you close the script before completequest.. completequest 70000; completequest 70001; close; break; use can transfer close; to bottom or replace close; into close2;
  17. Okay... Thanks for your info.. please use this revised code of yours. error should be fixed. prontera,92,210,4 script Icarus 4_KAVAC,{set .@nombre$, "^01A9DB[Icarus]^000000";showevent QTYPE_QUEST,1;if(questprogress(70000) == 0) {mes .@nombre$;mes "Asi que puedes hablar conmigo...";mes "Soy uno de los guerreros de Ragnarok.";mes "Fui un fiel sirviente del ^0B610BCaballero Ark^000000";next;mes .@nombre$;mes "Pero durante la batalla final en odin_tem02, algo salio mal...";mes "Nos vimos acorralados por una gran cantidad de monstruos.";mes "Espero que ^6E6E6EBelfus^000000 se encuentre con vida...";next;mes .@nombre$;mes "Durante ese dia que he vagado por todo Midgard en busca de mi liberacion.";mes "Espero algun dia poder traer la paz a este lugar...";next;mes .@nombre$;mes "^088A4B"+strcharinfo(0)+"^000000 por favor, debes ayudarme.";mes "Encuentra a Belfus, he escuchado sobre un rumor.";mes "He escuchado que se encuentra pricionero en odin_tem02, camino al puente.";mes "Por desgracia nadie más me puede ver a excepcion tuya.";mes "Si decides ayudarme, te ayudare en poder crear unas ^8A0829Wings Legendarias^000000.";mes "Con ellas podras equiparte unas poderosas armas, que estoy seguro que te ayudaran en tus batallas";next;mes .@nombre$;mes "Cuando encuentres a ^6E6E6EBelfus^000000, ven a visitarme nuevamente.";setquest 70000;close;} else if (questactive(70000)) {next;mes .@nombre;mes "Te estare esperando aqui.";close;} if((questprogress(70000) == 2) && (questprogress(70001) == 2) && (questprogress(70002) == 2)) {mes .@nombre$;mes "Lo prometido es deuda...";mes "Te enseñare a crear las wings que he inventado";mes "^088A08Icarus Wings^000000";mes "Con estas Wings tendras el derecho de portar las armas que algun dia use.";mes "Pero... como sabras estoy muerto.";mes "Deberas encontrar tu el material...";next;if(getequipid(EQI_HEAD_LOW) == icarus_wings) {set .weapons, 1; mes .@nombre$; mes "Asi que ya has conseguido las icarus Wings."; mes "Muy bien, toma nota."; mes "He repartido mis armas en las siguientes direcciones:"; mes ".."; close;}switch(select("Ingredientes",( .weapons?"::":"Icarus Weapons" ) ) ){ case 1: mes .@nombre$; mes "Necesito los siguientes ingredientes :"; while(.@i < getarraysize(.items_req) ) { mes ""+getitemname(.items_req[.@i]) +" ^B40404 x"+ .items_cantidad[.@i] +"^000000"; .@i++; } switch(select("Tengo todo!:Aun no...")) { case 1: if ( (countitem(.items_req[0]) < .items_cantidad[0] ) || (countitem(.items_req[1]) < .items_cantidad[1] ) || (countitem(.items_req[2]) < .items_cantidad[2] ) || (countitem(.items_req[3]) < .items_cantidad[3] ) || (countitem(.items_req[4]) < .items_cantidad[4] ) || (countitem(.items_req[5]) < .items_cantidad[5] ) || (countitem(.items_req[6]) < .items_cantidad[6] ) || (countitem(.items_req[7]) < .items_cantidad[7] )) { mes "No tienes todos los items necesarios."; mes "Revisa que este todo en orden."; close; } if ( !checkweight(.recompensa_item, .recompensa_total) ){ mes "No tienes suficiente espacio !. Libera espacio en tu inventario."; close; } while( .@j < getarraysize(.items_req) ){ delitem .items_req[.@j], .items_cantidad[.@j]; .@j++; } announce " "+strcharinfo(0)+"Ha creado "+.recompensa_item+"",bc_all,0xDC143C; getitem .recompensa_item, .recompensa_total; break; case 2: mes .@nombre$; mes "Te estare esperando aqui.!"; break;} } } OnInit:.weapons = 0;.recompensa_item = 20134;.recompensa_total = 1;setarray .items_req[0], 20360, 20028, 20347, 20346, 980,716,715,969;setarray .items_cantidad[0], 1,1,1,1,100,100,100;end;}odin_tem02,181,269,4 script Prisionero 4_LEVITATEMAN,{set .@nombrez$, "^0000FF[Belfus]^000000";if(questprogress(70001) == 0) {mes .@nombrez$;mes "Maldicion..!. ";mes "Tu ^0000FF" +strcharinfo(0)+ "^000000 rescatame!";mes "Elimina a estas bestias:";mes "^FF0040x15 Frus^000000 ";mes "^FF0040x5 Skogul^000000";setquest 70001;close;} else if (questactive(70001)) {mes .@nombrez$;mes "Vamos!... Ayudame.";mes "Eliminalos y te ayudare en lo que quieras";close;} else if (questprogress(70001,HUNTING) == 2) {mes .@nombrez$;mes "Gracias, te debo una.";mes "Ahora...";mes "Que deseas saber?";next;switch(select("Cuentame sobre Icarus")){ case 1: mes .@nombrez$; mes "OH!... Es increible!"; mes "Como conoces a Icarus!"; mes ".........."; next; mes .@nombrez$; mes "Bien como sea..."; mes "Icarus fue... uhmmm.."; mes "Fue un gran guerrero, un fiel seguidor de ^0B610BArk^000000"; mes "Creo que daria la vida por ^0B610BArk^000000..."; mes "Solo espero que se encuentre bien..."; next; mes .@nombrez$; mes "Durante la batalla nos vimos acorralados por criaturas misteriosas"; mes "Se caracterizaban por tener 3 tipos de elementos..."; mes "^0000FFAgua^000000, ^FF0040Fuego^000000 y ^0B610BHierba^000000"; mes "Solo recuerdo que el de elemento Agua parecia una clase de tortuga..."; mes "Gracias a Icarus pude seguir con vida."; mes "Luego que logre escapar de aquella invasion, estuve buscando informacion acerca de algunas ^31B404armas misteriosas^000000."; mes "No tuve resultado alguno... Solo acabe prisionero en este puente."; next; mes .@nombrez$; mes "Si pudiera encontrar a Icarus..."; close; completequest 70000; completequest 70001; break; } } } prontera,247,244,2 script Caballero Ark 4_WHITEKNIGHT,{set .@nombrex$, "^FFBF00[Ark]^000000";if((questprogress(70000) == 2) && (questprogress(70001) == 2)){setquest 70000;mes .@nombrex$;mes "Ya veo... asi que ya conoces a ^01A9DBIcarus^000000 y a ^0000FFBelfus^000000.";next;mes .@c$;mes "Esas bestias son realmente invencibles !";mes "Recuerdo aquel dia...";mes "Sus nombres eran ^0B610BBafermon^000000, ^0000FFIzilormon^000000 y ^FF0040Froremon^000000";mes "Desgarraron a mas de 500 soldados en cuestion de segundos...";mes "Icarus era el unico quien sus poderes podia combatirlos.";mes "Era el portador de las armas legendarias. He intentado encontrarlas, pero el...";mes "EL NO DEBIA MORIR!";next;mes .@nombrex$;mes "Maldicion... es el fin...";mes "Nadie nos podra salvar...";mes "Si tan solo... si tan solo...";completequest 70002;close;} else {mes .@nombrex$;mes "Saludos " +strcharinfo(0)+"";close;} } prontera,142,229,5 script Maquina 2_DROP_MACHINE,{if(getequipid(EQI_HEAD_LOW) == icarus_wings && Bow == 1) {mes ".....";mes "......";close;}else{mes "Una maquina defectuosa.";mes "Oculta un poder misterioso.";close;}} The problem is at line 69: case 1: mes .@nombre$; mes "Necesito los siguientes ingredientes :"; while(.@i < getarraysize(.items_req) ) { mes ""+getitemname(.items_req[.@i]) +" ^B40404 x"+ .items_cantidad[.@i] +"^000000";- .@i+++ .@i++; } you forgot to add ';' semi colon..
  18. can you insert your updated code where? can't see any problem xD put it in Code Box <>
  19. Hello, Try to rearrange your script set .@nombrez$, "^0000FF[Belfus]^000000";if(questprogress(70001) == 0) {toif(questprogress(70001) == 0) {set .@nombrez$, "^0000FF[Belfus]^000000";
  20. Mhalicot

    vending options

    Okay, kung may error man sa pag compile mo check mo muna yung line at try mo re-arrange. sa simpleng pag fix lang nang error sa pag compile kaya mong matuto mag debug..
  21. Mhalicot

    vending options

    mejo outdate na nga ata yan.. mejo busy pa kasi ako.. halos wlang free time.. pero may isa pang version nyan. try mo humingi nang tulong sa isa nating scripter active pa nman ata sya.. http://herc.ws/board/topic/759-extended-vending-system-v181
  22. Mhalicot

    vending options

    Hello Naori, After a quick research, eto mga nakita ko na pwede mong magamit.. pero ewan ko kung eto ang sagot sa tanong mo.. Extended Vending System. Int'l Moderator, Mhalicot
  23. Actually it can.. Please use my Plugins as an example No Banking Mapflag..
  24. Yeah forgot to ask what evilpunker said.. Did you recompile your server?
  25. You can rollback your changes if you want. Its better if you post it in Bug Tracker Forum so that it can easily detect by our developers
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.