Jump to content

quesoph

Members
  • Content Count

    562
  • Joined

  • Last visited

  • Days Won

    6

Everything posted by quesoph

  1. Here you go: 1. edit trunk/src/map/clif.c so OnPCLoadMapEvent always triggers, even if maps do not have the 'loadevent' mapflag. Find these lines: if(map[sd->bl.m].flag.loadevent) // Lance npc_script_event(sd, NPCE_LOADMAP); and change to look like this: npc_script_event(sd, NPCE_LOADMAP); 2. load this script: where_am_i.txt (I commented out maps that did not have an English translation in mapnametable.txt, so there will be no announcement when you load on those maps. Follow these steps or place loadevent mapflag in every map listed in this script.
  2. I forgot something. i updated it. http://herc.ws/board/topic/5834-request-movespeed-mapflag/#entry36956
  3. here @edit updated map.patch
  4. This is an old modification by AnnieRuru
  5. I don't see any errors in your screen shot. or you are talking about your CMS table's width?
  6. gat, rsw, gnd must be inside ROFOLDERdata . and for the bmp ROFOLDERdatatextureÀ¯ÀúÀÎÅÍÆäÀ̽ºmap mp3 files are inside ROFOLDERBGM and you need to add it here: mp3nametable.txt files you need to edit: serverdbmapindex.txt serverconfmaps.conf ROFOLDERdataresnametable.txt ROFOLDERdatamapnametable.txt Use weemapcache http://rathena.org/board/topic/53424-weemapcache/
  7. You need to test that theme first and report it here if you encounter any problems..
  8. //===== Hercules Script ======================================//= Job Master//===== By: ==================================================//= Euphy//===== Current Version: =====================================//= 1.3//===== Description: =========================================//= A fully functional job changer.//===== Additional Comments: =================================//= 1.1 Fixed reset on Baby job change. [Euphy]//= 1.2 Added Expanded Super Novice support and initial Kagerou/Oboro support. [Euphy]//= 1.3 Kagerou/Oboro added. [Euphy]//============================================================prontera,153,193,6 script Job Master 2_F_MAGICMASTER,{function Job_Menu; function A_An; mes "[Job Master]"; if (Class > 4049) { mes "No more jobs are available."; close; } if (checkfalcon() || checkcart() || checkriding() || ismounting()) { mes "Please remove your "+((checkfalcon())?"falcon":"")+((checkcart())?"cart":"")+((checkriding())?"Peco":"")+((ismounting())?"mount":"")+" before proceeding."; close; } if (.SkillPointCheck && SkillPoint) { mes "Please use all your skill points before proceeding."; close; } set .@eac, eaclass(); set .@i, ((.ThirdClass)?roclass(.@eac&EAJ_UPPERMASK):Class); if (.@i > 6 && .@i < 22) { if (BaseLevel < .Rebirth[0] || JobLevel < .Rebirth[1]) { set .@blvl, .Rebirth[0]-BaseLevel; set .@jlvl, .Rebirth[1]-JobLevel; mes "You need "+((.@blvl>0)?.@blvl+" more base levels "+((.@jlvl>0)?"/ ":""):"")+((.@jlvl>0)?.@jlvl+" more job levels ":"")+"to continue."; close; } if (Class > 21) { mes "Switch to third class?"; next; Job_Menu(roclass(.@eac|EAJL_THIRD)); close; } while(1) { mes "Select an option."; next; set .@i, select(" ~ ^0055FFRebirth^000000:"+((.ThirdClass)?" ~ ^FF0000Third Class^000000":"")+": ~ ^777777Cancel^000000"); if (.@i==3) close; mes "[Job Master]"; mes "Are you sure?"; next; Job_Menu(((.@i==1)?4001:roclass(.@eac|EAJL_THIRD))); mes "[Job Master]"; } } set .@j1, roclass(.@eac|EAJL_2_1); set .@j2,roclass(.@eac|EAJL_2_2); if ((.@eac&EAJ_UPPERMASK) == EAJ_SUPER_NOVICE) setarray .@exp[0],roclass(.@eac|EAJL_THIRD),99;// if (Class == Job_Ninja) setarray .@exp[0],.@j1,70; if (.@exp[0] && .ThirdClass) { if (BaseLevel < .Rebirth[0] || JobLevel < .@exp[1]) { set .@blvl, .Rebirth[0]-BaseLevel; set .@jlvl, .@exp[1]-JobLevel; mes "You need "+((.@blvl>0)?.@blvl+" more base levels "+((.@jlvl>0)?"/ ":""):"")+((.@jlvl>0)?.@jlvl+" more job levels ":"")+"to continue."; close; } mes "Switch to "+jobname(.@exp[0])+"?"; next; Job_Menu(.@exp[0]); close; } if (.@eac&EAJL_2) if (.@eac&(EAJL_UPPER|EAJL_BABY) || roclass(.@eac|EAJL_UPPER) == -1) { mes "No more jobs are available."; close; } if ((.@eac&EAJ_BASEMASK) == EAJ_NOVICE) { if (JobLevel < .JobReq[0]) mes "A job level of "+.JobReq[0]+" is required to change into the 1st Class."; else if (Class == 4001 && .LastJob && lastJob) { mes "Switch classes now?"; next; Job_Menu(roclass((eaclass(lastJob)&EAJ_BASEMASK)|EAJL_UPPER)); } else switch(Class) { case 0: Job_Menu(1,2,3,4,5,6,23,4046,24,25,4023); case 4001: Job_Menu(4002,4003,4004,4005,4006,4007); case 4023: Job_Menu(4024,4025,4026,4027,4028,4029,4045); default: mes "An error has occurred."; break; } close; } if (roclass(.@eac|EAJL_2_1) == -1 || roclass(.@eac|EAJL_2_2) == -1) mes "No more jobs are available."; else if (!(.@eac&EAJL_2) && JobLevel < .JobReq[1]) mes "A job level of "+.JobReq[1]+" is required to change into the 2nd Class."; else if (.LastJob && lastJob && (.@eac&EAJL_UPPER)) { mes "Switch classes now?"; next; Job_Menu(lastJob+4001); } else Job_Menu(.@j1,.@j2); close;function Job_Menu { while(1) { if (getargcount() > 1) { mes "Select a job."; set .@menu$,""; for(set .@i,0; .@i<getargcount(); set .@i,.@i+1) set .@menu$, .@menu$+" ~ "+jobname(getarg(.@i))+":"; set .@menu$, .@menu$+" ~ ^777777Cancel^000000"; next; set .@i, getarg(select(.@menu$)-1,0); if (!.@i) close; if ((.@i == 23 || .@i == 4045) && BaseLevel < .SNovice) { mes "[Job Master]"; mes "A base level of "+.SNovice+" is required to turn into a "+jobname(.@i)+"."; close; } mes "[Job Master]"; mes "Are you sure?"; next; } else set .@i, getarg(0); if (select(" ~ Change into ^0055FF"+jobname(.@i)+"^000000 class: ~ ^777777"+((getargcount() > 1)?"Go back":"Cancel")+"^000000") == 1) { mes "[Job Master]"; mes "You are now "+A_An(jobname(.@i))+"!"; if (.@i==4001 && .LastJob) set lastJob, Class; jobchange .@i; if (.@i==4001 || .@i==4023) resetlvl(1); specialeffect2 338; specialeffect2 432; if (.Platinum) callsub Get_Platinum; close; } if (getargcount() == 1) return; mes "[Job Master]"; } end;}function A_An { setarray .@A$[0],"a","e","i","o","u"; set .@B$, "_"+getarg(0); for(set .@i,0; .@i<5; set .@i,.@i+1) if (compare(.@B$,"_"+.@A$[.@i])) return "an "+getarg(0); return "a "+getarg(0);}Get_Platinum: skill 142,1,0; switch(BaseClass) { case 0: if (Class !=23) skill 143,1,0; break; case 1: skill 144,1,0; skill 145,1,0; skill 146,1,0; break; case 2: skill 157,1,0; break; case 3: skill 147,1,0; skill 148,1,0; break; case 4: skill 156,1,0; break; case 5: skill 153,1,0; skill 154,1,0; skill 155,1,0; break; case 6: skill 149,1,0; skill 150,1,0; skill 151,1,0; skill 152,1,0; break; default: break; } switch(BaseJob) { case 7: skill 1001,1,0; break; case 8: skill 1014,1,0; break; case 9: skill 1006,1,0; break; case 10: skill 1012,1,0; skill 1013,1,0; break; case 11: skill 1009,1,0; break; case 12: skill 1003,1,0; skill 1004,1,0; break; case 14: skill 1002,1,0; break; case 15: skill 1015,1,0; skill 1016,1,0; break; case 16: skill 1007,1,0; skill 1008,1,0; skill 1017,1,0; skill 1018,1,0; skill 1019,1,0; break; case 17: skill 1005,1,0; break; case 18: skill 238,1,0; break; case 19: skill 1010,1,0; break; case 20: skill 1011,1,0; break; default: break; } return;OnInit: setarray .Rebirth[0],99,50; // Minimum base level, job level to rebirth OR change to third class setarray .JobReq[0],10,40; // Minimum job level to turn into 1st class, 2nd class set .ThirdClass,1; // Enable third classes? (1: yes / 0: no) set .SNovice,45; // Minimum base level to turn into Super Novice set .LastJob,1; // Enforce linear class changes? (1: yes / 0: no) set .SkillPointCheck,1; // Force player to use up all skill points? (1: yes / 0: no) set .Platinum,1; // Get platinum skills automatically? (1: yes / 0: no) end;}
  9. I think this is what you are looking for https://github.com/HerculesWS/Hercules/blob/master/src/map/skill.c#L361 hp = ( status->get_lv(src) + status_get_int(src) ) / 8 * (4 + ( skill_id == AB_HIGHNESSHEAL ? ( sd ? pc->checkskill(sd,AL_HEAL) : 10 ) : skill_lv ) * 8); try to change it to: hp = ( status->get_lv(src) + status_get_int(src) ) / 4 * (4 + ( skill_id == AB_HIGHNESSHEAL ? ( sd ? pc->checkskill(sd,AL_HEAL) : 10 ) : skill_lv ) * 8); to make it x2.
  10. quesoph

    pin code

    //==================================================================// Pincode system//==================================================================// A window is opened before you can select your character and you will have to enter a pincode by using only your mouse// NOTE: Requires client 2011-03-09aragexeRE or newer.// 0: disabled// 1: enabledpincode_enabled: 1// Request Pincode only on login or on everytime char select is accessed?// 0: only on login (default)// 1: everytime the char select window is accessedpincode_charselect: 0// How often does a user have to change his pincode?// Default: 0// 0: never// X: every X minutespincode_changetime: 0// How often can a user enter the wrong password?// Default: 3// NOTE: The maximum on clientside is 3pincode_maxtry: 3 this?
  11. nvm solved. *I merged the two images.
  12. The 13th image is the one in the left side. In-game SS only image 7 is shown in-game.. image 13 is not shown..
  13. Anyone knows how to make this sprite(red box) appear in-game?
  14. - script check_ip -1,{OnPCLoginEvent: if (strcharinfo(3) == "prontera") end; query_sql "SELECT `last_ip` FROM `login` WHERE `account_id` = " + getcharid(3), .@last_ip$; set .@size, query_sql("SELECT `account_id` FROM `login` WHERE `last_ip` = '"+ .@last_ip$ +"'",.@aid); if (.@size < 4) end; set .@self, getcharid(3); for(.@i = 0; .@i < .@size; .@i++) { if (.@aid[.@i] == .@self) continue; if (attachrid(.@aid[.@i])) { set .@name$, strcharinfo(0); attachrid(.@self); message strcharinfo(0), "Too many accounts."; sleep2 5000; atcommand "@kick "+strcharinfo(0); end; } } end;}
  15. quesoph

    [login-server]

    main.sql login `group_id` tinyint(3) NOT NULL default '0', char `class` smallint(6) unsigned NOT NULL default '0',
  16. I think this is the label for treasure box OnTreasureDied0 to OnTreasureDied23.
  17. https://github.com/HerculesWS/Hercules/blob/master/src/map/skill.c#L11601 Add: + case UNT_SPIDERWEB: case UNT_ANKLESNARE: case UNT_MANHOLE: Pre-Renewal: https://github.com/HerculesWS/Hercules/blob/master/db/pre-re/skill_unit_db.txt#L85 Renewal: https://github.com/HerculesWS/Hercules/blob/master/db/re/skill_unit_db.txt#L85 Replace with: 405,0xb7, , 0, 1,1000,enemy, 0x002 //PF_SPIDERWEB Pre-Renewal:https://github.com/HerculesWS/Hercules/blob/master/db/pre-re/skill_db.txt#L451 Renewal: https://github.com/HerculesWS/Hercules/blob/master/db/re/skill_db.txt#L451 Replace with: 405,7,6,2,0,0x1,0,1,1,no,0,0,3,magic,0, PF_SPIDERWEB,Fiber Lock tested.
  18. have you tried skill_cast_db.txt? //-- KG_KAGEHUMI3023,0,0,0,5000,0,0
  19. atcommand.c pet.h clif.c
  20. OnPCLoginEvent:+ if (#CASHPOINTS >= 800) end;
×
×
  • Create New...

Important Information

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