Jump to content

canditw

Members
  • Content Count

    78
  • Joined

  • Last visited

Everything posted by canditw

  1. I'm currently using this script which gives item to player per MVP Killed and i was wondering if it is possible to add a line saying that 'if player is in 06guild_01, 06guild_02, 06guild_03 it will not give item else if anywhere else it will give item' This is because I have a mvp room and I don't want players in the mvp rooms to get the rewards given by the script.
  2. As stated above, I know that hercules has yet to implement the doram class but isit possible to make a custom job sprite into a costume. While players can keep their current job skills. Thank you.
  3. @@Tokeiburu Thanks for the suggestion and it finally worked! It seems that the version of Thor Patcher was the problem, I updated it to another newer version and the issue was fixed! Thanks to all that help.
  4. @@mrlongshen They are both System, both in my folder and the thor.
  5. @@Tokeiburu added to attachment to the first post
  6. @@Lamex @@mrlongshen Hmm I've tried using grf editor to make the .thor file but it still seems to be the same. It downloads the patch but doesn't apply it.
  7. I've tried the using the setting in thor patch which says Single File and select my itemInfo.lua and then put it under Other/System. So I deleted the existing ItemInfo.lua in my Systems folder and tried patching a new one in it, but it doesn't seem to appear. However, I can see that thor is actually downloading it but doesn't patch it. this is funny because my other patches into .grf is fine. I just can't seem to get this to work Any Ideas on this. 6.rar
  8. So I've come across AnnieRuru script for King of Emperium which requires a plugin to avoid players from killing their own emperium (http://herc.ws/board/topic/4495-king-of-emperium-hill/) However I seem to come across some problem when I try to make plugins. Any ideas? PLUGIN sample PLUGIN db2sql PLUGIN HPMHooking_char PLUGIN HPMHooking_login PLUGIN HPMHooking_map CC koe.c koe.c: In function ‘battle_check_target_post’: koe.c:43: error: ‘MOBID_EMPERIUM’ undeclared (first use in this function) koe.c:43: error: (Each undeclared identifier is reported only once koe.c:43: error: for each function it appears in.) make[1]: *** [../../plugins/koe.so] Error 1
  9. Need some help with this script, credit to Peopleperson49 for the original script. I've edited abit so that it would give out coins instead of zeny. What I can't seem to get is to make the jackpot amount more than 10mil zeny. and if it gets past 10.1mil it will reset to 0 zeny. There seems to be a limit to the jackpot amount but i cant seem to find it. mall01,78,105,5 script Jackpot [1] 2_SLOT_MACHINE,{ set @mithrilcoincounter,0; set @goldcoincounter,0; set @silvercoincounter,0; set @bronzecoincounter,0; if($JackpotNumberOne<=0||!$JackpotNumberOne) { set $JackpotNumberOne,rand(1,100000); } mes "[Jackpot]"; mes "Hi there, feeling lucky ?"; goto JackpotStart; close; JackpotStart: next; mes "[Jackpot]"; mes "A random number from ^FF00001^000000 to ^FF0000100,000^000000 has been generated, and first person to guess the correct number wins the total amount in the Jackpot!"; next; mes "[Jackpot]"; mes "Each guess costs you ^FF000010,000^000000 zeny that will be put into the Jackpot."; next; mes "[Jackpot]"; mes "Total Jackpot : ^FF0000"+$JackpotAmount+"z^000000"; if(getgmlevel()>=99) { mes "I see you're a GM, the correct number is ^880000"+$JackpotNumberOne+"^000000."; switch(prompt("Set Jackpot:Ignore")) { case 1: next; mes "[Jackpot]"; mes "How much should the Jackpot be?"; input $JackpotAmount; set $JackpotAmount,$JackpotAmount; next; mes "[Jackpot]"; mes "Wanna play a game?"; goto JackpotGame; case 2: next; mes "[Jackpot]"; mes "Alright, carry on!"; next; mes "[Jackpot]"; mes "Wanna play a game?"; goto JackpotGame; case 255: mes "[Jackpot]"; mes "Alright, carry on!"; close; } } goto JackpotGame; JackpotGame: switch(prompt("Participate:Nevermind")) { case 1: next; if(Zeny<10000) { mes "[Jackpot]"; mes "You do not have 10,000z"; close; } set Zeny,Zeny-10000; set $JackpotAmount,$JackpotAmount+10000; mes "[Jackpot]"; mes "You have chipped ^00880010,000z^000000 into the Jackpot!"; mes "Total Jackpot : ^FF0000"+$JackpotAmount+"z^000000"; next; mes "[Jackpot]"; mes "If your guess is not correct, you will lose the zeny you chipped in, and will need to try again!"; mes "However, the pot will be that much bigger the next time anyone plays!"; next; mes "[Jackpot]"; mes "Please enter the number that you think will win the Jackpot!"; mes "It is between numbers ^FF00001^000000 and ^FF0000100,000^000000."; next; input .@JackpotPick; if(.@JackpotPick<1||.@JackpotPick>100000) { next; mes "[Jackpot]"; mes "You must enter a number between ^FF00001^000000 and ^FF0000100,000^000000. I do not give refunds!"; goto JackpotStart; close; } mes "["+strcharinfo(0)+"]"; mes "My number is ^880000"+.@JackpotPick+"^000000!"; next; if(.@JackpotPick!=$JackpotNumberOne) { mes "[Jackpot]"; mes "You guessed the wrong number."; mes "You can always try again!"; goto JackpotStart; close; } mes "[Jackpot]"; mes "You guessed the correct number!"; next; mes "[Jackpot]"; mes "Congratulations! You have won the Jackpot of ^008800"+$JackpotAmount+" Zeny^000000!"; set @coinamount,$JackpotAmount; next; goto JackpotGenerator; case 2: next; mes "[Jackpot]"; mes "Please come again!"; close; case 255: mes "[Jackpot]"; mes "Please come again!"; close; } JackpotGenerator: if (@coinamount>=10000000) { goto JackpotMithrilCounter; } else if (@coinamount>=1000000) { goto JackpotGoldCounter; } else if (@coinamount>=100000) { goto JackpotSilverCounter; } else if (@coinamount>=10000) { goto JackpotBronzeCounter; } getitem 674,@mithrilcoincounter; getitem 29999,@goldcoincounter; getitem 29998,@silvercoincounter; getitem 673,@bronzecoincounter; goto JackpotAnnounce; JackpotMithrilCounter: if (@coinamount>=10000000) { set @coinamount,(@coinamount)-10000000; set @mithrilcoincounter,(@mithrilcoincounter)+1; goto JackpotGenerator; } else { goto JackpotGenerator; } JackpotGoldCounter: if (@coinamount>=1000000) { set @coinamount,(@coinamount)-1000000; set @goldcoincounter,(@goldcoincounter)+1; goto JackpotGenerator; } else { goto JackpotGenerator; } JackpotSilverCounter: if (@coinamount>=100000) { set @coinamount,(@coinamount)-100000; set @silvercoincounter,(@silvercoincounter)+1; goto JackpotGenerator; } else { goto JackpotGenerator; } JackpotBronzeCounter: if (@coinamount>=10000) { set @coinamount,(@coinamount)-10000; set @bronzecoincounter,(@bronzecoincounter)+1; goto JackpotGenerator; } else { goto JackpotGenerator; } JackpotAnnounce: announce "[ Jackpot ]: "+strcharinfo(0)+" has won the Jackpot of "+$JackpotAmount+" zeny !!",0x76EE00; close2; announce "[ Jackpot ]: Wanna be a winner like "+strcharinfo(0)+"?",0x76EE00; set $JackpotNumberOne,0; sleep2 5000; announce "[ Jackpot ]: Come down to Clouds Casino at North of Ruheluft now!",0x76EE00; set $JackpotAmount,0; end; }
  10. is HPM need for this plugin to work? like do I need to activate HPM together with this plugin? Also getting this error koe.c: In function ‘battle_check_target_post’: koe.c:43: error: ‘MOBID_1288’ undeclared (first use in this function) koe.c:43: error: (Each undeclared identifier is reported only once koe.c:43: error: for each function it appears in.) make[1]: *** [../../plugins/koe.so] Error 1
  11. I came across this script and tried to used it. However I'm getting the error and not sure what to do npc_parsesrcfile: Unknown syntax in file 'npc/custom/mvpannounce.txt', line '1'. Stopping... Script - script Announce -1,{ OnNPCKillEvent: setarray .MVPID[0],1511,1647,1785,1630,1399,1039,1874,2068,1272,1719,1046,1389,1112,1115,1957, 1418,1871,1252,1768,1086,1688,1646, 1373,1147,1059,1150,1956,2022,1087,1190,1038,1157,1159,1502,1623,1650,1583, 1708,1312,1751,1685,1648,1917,1658; for (set .@c, 0; .@c < getarraysize(.MVPID); set .@c, .@c + 1) if (killedrid == .MVPID[.@c]) set .@s, 1; if (!.@s) end; announce "Player : [ " +strcharinfo(0) +" ] has killed [ " +getmonsterinfo(killedrid,0) +" ] and get [ Yggdrasilberry ].",0,0xDA70D6; getitem 607,1; end; }
  12. As stated above, besides harmony (which I heard that they've stopped their services) are there any other working hackshield? I don't mind if its paid but if its free bring it on. Thanks
  13. Yes, it worked with changing 'getvar' to 'getvariableofnpc'. Thanks for that, now its not showing that previous error but something new came up script error in file 'npc/custom/dailyquest.txt' line 321 column 11 parse_simpleexpr: unmatched ')' * 321: (checkre(0))?"mob_db_re":"mob_db"; ~~~~~~~~~~~~~~~~~~~~~~~~^ So I'm guessing checkre is at fault here?
  14. Does anyone happen to have a daily quest script which alternates between days or random items everytime and has a 24hour cooldown? Thank you in advance.
  15. Tried it and I'm getting parse_line: expect command, missing function name or calling undeclared function
  16. So I've tried using this script but I'm getting this error script error in file 'npc/custom/dailyquest.txt' line 288 column 32 parse_line: need ';' I dont see where I can put the ; into the script Thanks in advance //===== rAthena Script ======================================= //= Hunting Missions //===== By: ================================================== //= Euphy //===== Current Version: ===================================== //= 1.4 //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= Random hunting missions. //= Rewards are based on quest difficulty. //= //= NOTE: Requires SQL mob database. //===== Additional Comments: ================================= //= 1.0 Initial script. //= 1.1 Small improvements and fixes. //= 1.2 Added party support and replaced blacklists with an //= SQL query, both thanks to AnnieRuru. //= 1.3 Re-added a blacklist adapted for the SQL query. //= 1.3a Added mission reset options. //= 1.3b Function updates. //= 1.4 Check for deleted characters, thanks to AnnieRuru. //= Syntax updates and style cleaning. //============================================================ prontera,152,187,6 script Hunting Missions 951,{ function Chk; mes "[Hunting Missions]"; mes "Hello, " + strcharinfo(0) + "!"; if (!#Mission_Delay) { next; mes "[Hunting Missions]"; mes "I can't find any records..."; mes "You must be new here!"; emotion e_omg; next; callsub Mission_Info; emotion e_go; #Mission_Delay = 1; close; } mes rand(2) ? "Working hard, as always..." : "Not slacking, I hope..."; mes "Is there anything I can help"; mes "you with?"; mes " "; mes "^777777~ You've completed " + callfunc("F_InsertPlural",Mission_Total,"mission",0,"^0055FF%d^777777 %s") + ". ~^000000"; next; switch(select( ((!Mission0) ? " ~ New Mission::" : ": ~ Mission Status: ~ Abandon Mission") + ": ~ Information: ~ Mission Shop: ~ View Top Hunters: ~ ^777777Cancel^000000" )) { case 1: mes "[Hunting Missions]"; if (#Mission_Count) { mes "You've started a mission"; mes "on another character."; if (!@hm_char_del_check) { // check for deleted character query_sql("SELECT 1 FROM `char_reg_num` WHERE `key` = 'Mission0' AND `char_id` IN(SELECT `char_id` FROM `char` WHERE `account_id` = " + getcharid(3) + ")", .@i); if (!.@i) { next; mes "[Hunting Missions]"; mes "I can't seem to find any records"; mes "for that character, though..."; mes "One moment, please."; emotion e_hmm; #Mission_Count = 0; } @hm_char_del_check = 1; } close; } if (#Mission_Delay > gettimetick(2) && .Delay) { mes "I'm afraid you'll have to wait " + callfunc("Time2Str",#Mission_Delay) + " before taking another mission."; close; } mes "You must hunt:"; query_sql("SELECT ID FROM `" + .mob_db$ + "` WHERE left(Sprite, 4) != 'meta' AND left(Sprite, 2) != 'E_' AND ~Mode & 32 AND EXP > 0 AND MVP1id = 0 AND DropCardid > 4000 AND DropCardid < 5000 AND ID < 2000 AND instr('"+.Blacklist$+"',ID) = 0 ORDER BY rand() LIMIT " + .Quests, .@mob); for (.@i = 0; .@i < .Quests; .@i++) { setd "Mission" + .@i, .@mob[.@i]; setd "Mission" + .@i +"_", 0; } #Mission_Count = rand(.Count[0], .Count[1]); callsub Mission_Status; next; mes "[Hunting Missions]"; mes "Report back when"; mes "you've finished."; mes "Good luck!"; close; case 2: mes "[Hunting Missions]"; mes "Mission status:"; callsub Mission_Status; close; case 3: mes "[Hunting Missions]"; mes "Do you really want to"; mes "abandon your mission?"; if (.Reset < 0 && .Delay) mes "Your delay time will not be reset."; else if (.Reset > 0) mes "It will cost " + callfunc("F_InsertComma",.Reset) + " Zeny."; next; switch(select(" ~ Abandon...: ~ ^777777Cancel^000000")) { case 1: if (.Reset > 0) { if (Zeny < .Reset) { mes "[Hunting Missions]"; mes "You don't have enough"; mes "Zeny to drop this mission."; emotion e_sry; close; } Zeny -= .Reset; emotion e_cash; } mes "[Hunting Missions]"; mes "Alright, I've dropped"; mes "your current mission."; specialeffect2 EF_STORMKICK4; for (.@i = 0; .@i < .Quests; .@i++) { setd "Mission"+.@i, 0; setd "Mission"+.@i+"_", 0; } #Mission_Count = 0; if (.Reset < 0 && .Delay) #Mission_Delay = gettimetick(2) + (.Delay * 3600); close; case 2: mes "[Hunting Missions]"; mes "I knew you were kidding!"; mes "Keep up the good work."; emotion e_heh; close; } case 4: callsub Mission_Info; close; case 5: mes "[Hunting Missions]"; mes "You have ^0055FF" + #Mission_Points + "^000000 Mission Points."; mes "Use them well!"; callshop "mission_shop",1; npcshopattach "mission_shop"; end; case 6: mes "[Hunting Missions]"; mes "The top hunters are:"; query_sql("SELECT char_id AS id, (SELECT `name` FROM `char` WHERE char_id = id),`value` FROM `char_reg_num` WHERE `key` = 'Mission_Total' ORDER BY CAST(`value` AS SIGNED) DESC LIMIT 5", .@id, .@name$, .@val); for (.@i = 0; .@i < 5; .@i++) mes " [Rank " + (.@i+1) + "] " + ((.@name$[.@i] == "") ? "^777777none" : "^0055FF" + .@name$[.@i]+"^000000 : ^FF0000" + .@val[.@i] + " pt.") + "^000000"; close; case 7: mes "[Hunting Missions]"; mes "Nothing? Okay..."; emotion e_hmm; close; } end; Mission_Status: @f = 0; deletearray .@j[0], getarraysize(.@j); for (.@i = 0; .@i < .Quests; .@i++) { .@j[.@i] = getd("Mission" + .@i); .@j[.Quests] = .@j[.Quests] + strmobinfo(3,.@j[.@i]); .@j[.Quests+1] = .@j[.Quests+1] + (strmobinfo(6,.@j[.@i]) / (getbattleflag("base_exp_rate") / 100) * .Modifier[0]); .@j[.Quests+2] = .@j[.Quests+2] + (strmobinfo(7,.@j[.@i]) / (getbattleflag("job_exp_rate") / 100) * .Modifier[1]); mes " > "+Chk(getd("Mission"+.@i+"_"),#Mission_Count) + strmobinfo(1,.@j[.@i]) + " (" + getd("Mission"+.@i+"_") + "/" + #Mission_Count + ")^000000"; } // Reward formulas: .@Mission_Points = 3 + (.@j[.Quests] / .Quests / 6); .@Base_Exp = #Mission_Count * .@j[.Quests+1] / 5; .@Job_Exp = #Mission_Count * .@j[.Quests+2] / 5; .@Zeny = #Mission_Count * .Quests * .@j[.@i] * .Modifier[2]; next; mes "[Hunting Missions]"; mes "Mission rewards:"; mes " > Mission Points: ^0055FF" + .@Mission_Points + "^000000"; mes " > Base Experience: ^0055FF" + callfunc("F_InsertComma",.@Base_Exp) + "^000000"; mes " > Job Experience: ^0055FF" + callfunc("F_InsertComma",.@Job_Exp) + "^000000"; mes " > Zeny: ^0055FF" + callfunc("F_InsertComma",.@Zeny) + "^000000"; if (@f) { @f = 0; return; } next; mes "[Hunting Missions]"; mes "Oh, you're done!"; mes "Good work."; mes "Here's your reward."; emotion e_no1; specialeffect2 EF_ANGEL; specialeffect2 EF_TRUESIGHT; #Mission_Points += .@Mission_Points; BaseExp += .@Base_Exp; JobExp += .@Job_Exp; Zeny += .@Zeny; for (.@i = 0; .@i < .Quests; .@i++) { setd "Mission" + .@i, 0; setd "Mission" + .@i+"_", 0; } #Mission_Count = 0; if (.Delay) #Mission_Delay = gettimetick(2) + (.Delay * 3600); Mission_Total++; if (Mission_Total == 1) query_sql("INSERT INTO `char_reg_num` (`char_id`,`key`,`index`,`value`) VALUES (" + getcharid(0) + ",'Mission_Total','0',1)"); else query_sql("UPDATE `char_reg_num` SET `value` = " + Mission_Total + " WHERE `char_id` = " + getcharid(0) + " AND `key` = 'Mission_Total'"); close; Mission_Info: mes "[Hunting Missions]"; mes "If you so choose, I can assign"; mes "you a random hunting quest."; mes "Some are easier than others, but"; mes "the rewards increase with difficulty."; next; mes "[Hunting Missions]"; mes "Missions points are shared"; mes "amongst all your characters."; if (.Delay) mes "Delay time is, too."; mes "You can't take missions on"; mes "multiple characters at once."; next; mes "[Hunting Missions]"; mes "You can start a quest"; mes (.Delay ? "every " + ((.Delay == 1) ? "hour." : .Delay + " hours.") : "whenever you want."); mes "That's everything~"; return; function Chk { if (getarg(0) < getarg(1)) { @f = 1; return "^FF0000"; } else return "^00FF00"; } OnBuyItem: @cost = 0; for (.@i = 0; .@i < getarraysize(@bought_nameid); .@i++) for (.@j = 0; .@j < getarraysize(.Shop); .@j += 2) if (@bought_nameid[.@i] == .Shop[.@j]) { set @cost, @cost + (.Shop[.@j+1] * @bought_quantity[.@i]); break; } mes "[Hunting Missions]"; if (@cost > #Mission_Points) mes "You don't have enough Mission Points."; else { for (.@i = 0; .@i < getarraysize(@bought_nameid); .@i++) { getitem @bought_nameid[.@i], @bought_quantity[.@i]; dispbottom "Purchased " + @bought_quantity[.@i] + "x " + getitemname(@bought_nameid[.@i]) + "."; } #Mission_Points -= @cost; mes "Deal completed."; emotion e_cash; } @cost = 0; deletearray @bought_nameid[0], getarraysize(@bought_nameid); deletearray @bought_quantity[0], getarraysize(@bought_quantity); close; OnNPCKillEvent: if (!getcharid(1) || !.Party) { if (!#Mission_Count || !Mission0) end; for (.@i = 0; .@i < .Quests; .@i++) { if (strmobinfo(1,killedrid) == strmobinfo(1,getd("Mission" + .@i))) { if (getd("Mission" + .@i + "_") < #Mission_Count) { dispbottom "[Hunting Mission] Killed " + (set(getd("Mission" + .@i + "_"),getd("Mission" + .@i + "_") + 1)) + " of " + #Mission_Count + " " + strmobinfo(1,killedrid) + "."; end; } } } } else if (.Party) { .@mob = killedrid; getmapxy(.@map1$,.@x1,.@y1,UNITTYPE_PC); getpartymember getcharid(1),1; getpartymember getcharid(1),2; for (.@i = 0; .@i < $@partymembercount; .@i++) { if (isloggedin($@partymemberaid[.@i], $@partymembercid[.@i])) { set .@Mission_Count, getvar(#Mission_Count, $@partymembercid[.@i]); set .@Mission0, getvar(Mission0, $@partymembercid[.@i]); set .@HP, getvar(HP, $@partymembercid[.@i]); if (.@Mission_Count && .@Mission0 && .@HP > 0) { getmapxy(.@map2$,.@x2,.@y2,UNITTYPE_PC); if ((.@map1$ == .@map2$ || .Party == 1) && (distance(.@x1,.@y1,.@x2,.@y2) <= 30 || .Party < 3)) { for (.@j = 0; .@j < .Quests; .@j++) { if (strmobinfo(1,.@mob) == strmobinfo(1,getvar(getd("Mission"+.@j), $@partymembercid[.@i]))) { if (getvar(getd("Mission"+.@j+"_"), $@partymembercid[.@i]) < .@Mission_Count) { dispbottom "[Hunting Mission] Killed " + (set(getvar(getd("Mission" + .@j + "_"), $@partymembercid[.@i]), getvar(getd("Mission" + .@j + "_") + 1, $@partymembercid[.@i]))) + " of " + .@Mission_Count + " " + strmobinfo(1,.@mob) + "."; break; } } } } } } } } end; OnInit: .Delay = 12; // Quest delay, in hours (0 to disable). .Quests = 4; // Number of subquests per mission (increases rewards). .Party = 3; // Party options: 0 (exclude party kills), 1 (include party kills), 2 (same map only), 3 (screen area only) .Reset = -1; // Reset options: -1 (abandoning mission sets delay time), 0 (no delay time), [Zeny] (cost to abandon mission, no delay time) setarray .Count[0], // Min and max monsters per subquest (increases rewards). 40,70; setarray .Modifier[0], // Multipliers for Base Exp, Job Exp, and Zeny rewards. getbattleflag("base_exp_rate")/100,getbattleflag("job_exp_rate")/100,60; .mob_db$ = // Table name of SQL mob database (checkre(0))?"mob_db_re":"mob_db"; setarray .Shop[0], // Reward items: <ID>,<point cost> (about 10~20 points per hunt). 512,1,513,1,514,1,538,5,539,5,558,10,561,10; .Blacklist$ = // Blacklisted mob IDs. "1062,1088,1183,1186,1200,1212,1220,1221,1234,1235,"+ "1244,1245,1250,1268,1290,1293,1294,1296,1298,1299,"+ "1300,1301,1303,1304,1305,1306,1308,1309,1311,1313,"+ "1515,1588,1618,1676,1677,1678,1679,1796,1797,1974,"+ "1975,1976,1977,1978,1979"; npcshopdelitem "mission_shop",512; for (.@i = 0; .@i < getarraysize(.Shop); .@i += 2) npcshopadditem "mission_shop", .Shop[.@i], .Shop[.@i+1]; end; } - shop mission_shop -1,512:-1
  17. Refer to attachment I'm guessing this is a client side error so any way to fix it? FIXED- Had to turn off lightmap in the setup.exe
  18. Sorry but how do i use this patch, do i need to copy it one by one?
  19. As stated, I'm currently using 2014-02-05 ragexe diffed, when i place it in a 2014 kro client its all fine. But when I place this into a 2016 kro client, the floor on the starting map gets all black and I'm unable to move. Sorry I'm still new in this.
×
×
  • Create New...

Important Information

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