Jump to content

AHMADSHIDQI

Members
  • Posts

    64
  • Joined

  • Last visited

1 Follower

Profile Information

  • Gender
    Not Telling
  • Location
    Jakarta

Recent Profile Visitors

3375 profile views

AHMADSHIDQI's Achievements

Poring

Poring (1/15)

1

Reputation

  1. there are monsters that spawn with wrong monster mode i have done some reseach that it's a problem with the setunitdata but i dont really get it. so, for example. ifrit that spawns in thor volc 3.. is not setted to Boss monster when it spawns. as the impact, abysmal knight card will not add extra damage to the Ifrit. what should i do to fix this problem?
  2. //===== Hercules Script =========================================== //= King of Emperium Hill //===== By: ======================================================= //= AnnieRuru //===== Current Version: ========================================== //= 1.2 //===== Compatible With: ========================================== //= hercules & rathena 2018-04-08 //===== Description: ============================================== //= defends the emperium in the middle of the map until times up //===== Topic ===================================================== //= http://hercules.ws/board/topic/4495-gvg-king-of-emperium-hill/ //===== Additional Comments: ====================================== //= Finally there is a topic for this ! //================================================================= - script KoE FAKE_NPC,{ OnInit: disablenpc "The King#KoE"; disablenpc "Exit#KoE"; bindatcmd "koe", strnpcinfo(0)+"::OnCommand", 99,100; end; OnCommand: if ( compare( .@atcmd_parameters$, "on" ) ) goto L_start; else if ( compare( .@atcmd_parameters$, "off" ) ) goto L_end; else { dispbottom "type - '@koe on' to start the event"; dispbottom "type - '@koe off' to end the event"; } end; L_start: OnClock2000: // everyday 8pm starts if ( .start ) end; gvgon "guild_vs1"; announce "The King of Emperium Hill has begun!", bc_all; .start = true; enablenpc "The King#KoE"; disablenpc "Exit#KoE"; $koegid = 0; donpcevent "::OnRevKoE"; maprespawnguildid "guild_vs1", $koegid, 3; killmonster "guild_vs1", "KoE::OnEmpDead"; monster "guild_vs1",49,49, "EMPERIUM", 1288, 1, "KoE::OnEmpDead"; end; L_end: OnClock2030: // everyday 8:30pm ends gvgoff "guild_vs1"; announce "The King of Emperium Hill is over!", bc_all; .start = 0; enablenpc "Exit#KoE"; disablenpc "The King#KoE"; killmonster "guild_vs1", "KoE::OnEmpDead"; // maprespawnguildid "guild_vs1", $koegid, 2; // uncomment this line to kick non-owner off the map when event ends end; OnEmpDead: $koegid = getcharid(2); announce "The current King of Emperium Hill is the ["+ strcharinfo(2) +"] guild.", bc_all; donpcevent "::OnRevKoE"; maprespawnguildid "guild_vs1", $koegid, 2; killmonster "guild_vs1", "KoE::OnEmpDead"; sleep 500; if ( .start ) monster "guild_vs1",49,49, "EMPERIUM", 1288, 1, "KoE::OnEmpDead"; end; } // KoE Entrance prontera,155,196,4 script The King#KoE 1_M_MERCHANT,{ mes "[The King]"; if ( !getcharid(2) ) { mes "You must have a guild to participate in the ^FF0000King of Emperium Hill Tournament^000000."; close; } mes "Hello."; mes "Would you like to participate in the ^FF0000King of Emperium Hill Tournament^000000?"; if ( select ( "Yes", "No" ) == 2 ) close; if ( !getvariableofnpc( .start, "KoE" ) ) close; switch( rand(1,4) ){ case 1: warp "guild_vs1", 50, 88; end; case 2: warp "guild_vs1", 88, 50; end; case 3: warp "guild_vs1", 50, 11; end; case 4: warp "guild_vs1", 11, 50; end; } } // KoE Exit guild_vs1,49,56,5 script Exit#KoE 1_M_BARD,{ mes "[Exit]"; mes "See ya."; close2; warp "Save",0,0; if ( getcharid(2) == $koegid ) getitem 11705, 1; // configure prize here - Poring Coin end; } // Flags guild_vs1,49,38,4 script King of Emperium Hill#1::koe_flag GUILD_FLAG,{ if ( !$koegid ) end; mes "[King of Emperium Hill]"; mes "The Current King of Emperium Hill is the ["+ getguildname($koegid) +"] guild."; close; //OnInit: // Uncomment this line to make the emblem stay after @reloadscript OnRevKoE: flagemblem $koegid; end; } guild_vs1,61,49,6 duplicate(koe_flag) King of Emperium Hill#2 GUILD_FLAG guild_vs1,38,49,2 duplicate(koe_flag) King of Emperium Hill#3 GUILD_FLAG guild_vs1,49,61,0 duplicate(koe_flag) King of Emperium Hill#4 GUILD_FLAG prontera,166,195,4 duplicate(koe_flag) King of Emperium Hill#5 GUILD_FLAG guild_vs1 mapflag nobranch guild_vs1 mapflag nomemo guild_vs1 mapflag nopenalty guild_vs1 mapflag noreturn guild_vs1 mapflag nosave SavePoint guild_vs1 mapflag noteleport guild_vs1 mapflag gvg_noparty guild_vs1 mapflag nowarp guild_vs1 mapflag nowarpto guild_vs1 mapflag guildlock guild_vs1 mapflag noicewall HELLO! My currrent KoE Script starts everyday Could anyone please help me set this KoE Script to be active on TUESDAY FRIDAY and SUNDAY. at 20:00 until 20:30 Thanks alot!!
  3. // Dummy shop data -- copy as needed. //============================================================ - shop qshop1 -1,909:-1 - shop qshop2 -1,909:-1 - shop qshop3 -1,909:-1 - shop qshop4 -1,909:-1 - shop qshop5 -1,909:-1 - shop qshop6 -1,909:-1 - shop qshop7 -1,909:-1 - shop qshop8 -1,909:-1 - shop qshop9 -1,909:-1 - shop qshop10 -1,909:-1 - shop qshop11 -1,909:-1 - shop qshop12 -1,909:-1 - shop qshop13 -1,909:-1 - shop qshop14 -1,909:-1 - shop qshop15 -1,909:-1 - shop qshop16 -1,909:-1 - shop qshop17 -1,909:-1 - shop qshop18 -1,909:-1 - shop qshop19 -1,909:-1 - shop qshop20 -1,909:-1 - shop qshop21 -1,909:-1 - shop qshop22 -1,909:-1 - shop qshop23 -1,909:-1 - shop qshop24 -1,909:-1 - shop qshop25 -1,909:-1 - shop qshop26 -1,909:-1 - shop qshop27 -1,909:-1 - shop qshop28 -1,909:-1 - shop qshop29 -1,909:-1 //===== rAthena Script ======================================= //= Euphy's Quest Shop //===== By: ================================================== //= Euphy //===== Current Version: ===================================== //= 1.6c //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= A dynamic quest shop based on Lunar's, with easier config. //= Includes support for multiple shops & cashpoints. //= Item Preview script by ToastOfDoom. //===== Additional Comments: ================================= //= 1.0 Initial script. //= 1.2 Added category support. //= 1.3 More options and fixes. //= 1.4 Added debug settings. //= 1.5 Replaced categories with shop IDs. //= 1.6 Added support for purchasing stackables. //= 1.6a Added support for previewing costumes and robes. //= 1.6b Added 'disable_items' command. //= 1.6c Replaced function 'A_An' with "F_InsertArticle". //============================================================ // Shop NPCs -- supplying no argument displays entire menu. // callfunc "qshop"{,<shop ID>{,<shop ID>{,...}}}; // ADD YOUR NPC HERE //============================================================ prontera,180,213,4 script Quest Worker 556,{ callfunc "qshop",1; } prontera,184,209,4 script Event Ticket Shop 112,{ callfunc "qshop",2; } new_1-1,155,111,5 script Costume Shop 555,{ callfunc "qshop",3; } // prontera,165,203,6 script Quest Shop#2 998,{ callfunc "qshop",1,2; } // call the shop 1 and 2 defined below // etc.. Add your Shop NPCs 'Quest Shop#XXX' here //============================================================ // Script Core - DO NOT DUPLICATE THIS NPC !!!!!!!!!!!!! //============================================================ - script quest_shop -1,{ function Add; function Chk; function Slot; OnInit: freeloop(1); // ----------------------------------------------------------- // Basic shop settings. // ----------------------------------------------------------- set .Announce,1; // Announce quest completion? (1: yes / 0: no) set .ShowSlot,1; // Show item slots? (2: all equipment / 1: if slots > 0 / 0: never) set .ShowID,0; // Show item IDs? (1: yes / 0: no) set .ShowZeny,0; // Show Zeny cost, if any? (1: yes / 0: no) set .MaxStack,100; // Max number of quest items purchased at one time. // ----------------------------------------------------------- // Points variable -- optional quest requirement. // setarray .Points$[0],"<variable name>","<display name>"; // ----------------------------------------------------------- setarray .Points$[0], "#CASHPOINTS", "Cash Points"; //===================================================================================== // ------------------- ADD YOUR SHOPS NAME AND ITEMS SHOPS STARTING HERE -------------- //===================================================================================== // ----------------------------------------------------------- // Shop IDs -- to add shops, copy dummy data at bottom of file. // setarray .Shops$[1],"<Shop 1>","<Shop 2>"{,...}; // ----------------------------------------------------------- setarray .Shops$[1], "Hat Maker", // Shop Named 1 "Weapons", // Shop Named 2 "Other"; // Shop Named 3 // ----------------------------------------------------------- // Quest items -- do NOT use a reward item more than once! // Add(<shop ID>,<reward ID>,<reward amount>, // <Zeny cost>,<point cost>, // <required item ID>,<required item amount>{,...}); // ----------------------------------------------------------- // Shop 1 Add(1,2790,1,0,0,2625,15,7539,50); Add(1,2788,1,0,0,2622,15,7539,50); Add(1,2789,1,0,0,2621,15,7539,50); Add(1,5086,1,0,0,5024,1,539,30,660,3); Add(1,5137,1,0,0,5141,5,7047,100,661,1,7539,30); Add(1,5324,1,0,0,5137,1,7063,20,1034,20,7539,50); Add(1,5372,1,0,0,2747,5,982,15,7206,100,7539,35); Add(1,5359,1,0,0,2284,1,5019,1,975,1,7539,30); Add(1,5373,1,0,0,2255,1,7566,3,7511,60,5104,1,7799,4,7023,20,7539,20); Add(1,5376,1,0,0,641,1,2210,1,7063,60,983,4,7539,35); // Shop 2 Add(2,12314,1,0,0,7711,250); Add(2,7539,1,0,0,7711,25); Add(2,12210,1,0,0,7711,25); Add(2,14545,1,0,0,7711,25); Add(2,12202,1,0,0,7711,25); Add(2,12203,1,0,0,7711,25); Add(2,12204,1,0,0,7711,25); Add(2,12205,1,0,0,7711,25); Add(2,12206,1,0,0,7711,25); Add(2,12207,1,0,0,7711,25); // Shop 3 Add(3,19524,1,0,0,677,1); Add(3,19998,1,0,0,677,1); Add(3,20056,1,0,0,677,1); Add(3,20058,1,0,0,677,1); Add(3,20092,1,0,0,677,1); Add(3,19989,1,0,0,677,1); Add(3,19954,1,0,0,677,1); Add(3,19912,1,0,0,677,1); Add(3,19783,1,0,0,677,1); Add(3,20022,1,0,0,677,1); // ----------------------------------------------------------- //===================================================================================== // ------------------- YOUR SHOPS AND ITEMS SHOPS HAVE BEEN ADDED --------------------- //===================================================================================== freeloop(0); set .menu$,""; for(set .@i,1; .@i<=getarraysize(.Shops$); set .@i,.@i+1) { set .menu$, .menu$+.Shops$[.@i]+":"; npcshopdelitem "qshop"+.@i,909; } end; OnMenu: set .@size, getarraysize(@i); if (!.@size) set @shop_index, select(.menu$); else if (.@size == 1) set @shop_index, @i[0]; else { for(set .@j,0; .@j<.@size; set .@j,.@j+1) set .@menu$, .@menu$+.Shops$[@i[.@j]]+":"; set @shop_index, @i[select(.@menu$)-1]; } deletearray @i[0],getarraysize(@i); if (.Shops$[@shop_index] == "") { message strcharinfo(0),"An error has occurred."; end; } dispbottom "Select one item at a time."; callshop "qshop"+@shop_index,1; npcshopattach "qshop"+@shop_index; end; OnBuyItem: // .@q[] : RewardID, BoughtAmt, RewardAmt, BaseAmt, ReqZeny, ReqPts, { ReqItem, ReqAmt, ... } setarray .@q[0],@bought_nameid[0],((@bought_quantity[0] > .MaxStack)?.MaxStack:@bought_quantity[0]); copyarray .@q[3],getd(".q_"+@shop_index+"_"+.@q[0]+"[0]"),getarraysize(getd(".q_"+@shop_index+"_"+.@q[0])); set .@q[2],.@q[1]*.@q[3]; if (!.@q[2] || .@q[2] > 30000) { message strcharinfo(0),"You can't purchase that many "+getitemname(.@q[0])+"."; end; } mes "[Quest Shop]"; mes "Reward: ^0055FF"+((.@q[2] > 1)?.@q[2]+"x ":"")+Slot(.@q[0])+"^000000"; mes "Requirements:"; disable_items; if (.@q[4]) mes " > "+Chk(Zeny,.@q[4]*.@q[1])+(.@q[4]*.@q[1])+" Zeny^000000"; if (.@q[5]) mes " > "+Chk(getd(.Points$[0]),.@q[5]*.@q[1])+(.@q[5]*.@q[1])+" "+.Points$[1]+" ("+getd(.Points$[0])+"/"+(.@q[5]*.@q[1])+")^000000"; if (.@q[6]) for(set .@i,6; .@i<getarraysize(.@q); set .@i,.@i+2) mes " > "+Chk(countitem(.@q[.@i]),.@q[.@i+1]*.@q[1])+((.ShowID)?"{"+.@q[.@i]+"} ":"")+Slot(.@q[.@i])+" ("+countitem(.@q[.@i])+"/"+(.@q[.@i+1]*.@q[1])+")^000000"; next; setarray @qe[1], getiteminfo(.@q[0],5), getiteminfo(.@q[0],11); if (@qe[2] > 0 && ((@qe[1] & EQP_HEAD_LOW) || (@qe[1] & EQP_HEAD_TOP) || (@qe[1] & EQP_HEAD_MID) || (@qe[1] & EQP_COSTUME_HEAD_TOP) || (@qe[1] & EQP_COSTUME_HEAD_MID) || (@qe[1] & EQP_COSTUME_HEAD_LOW) || (@qe[1] & EQP_GARMENT) || (@qe[1] & EQP_COSTUME_GARMENT))) set .@preview,1; addtimer 1000, strnpcinfo(0)+"::OnEnd"; while(1) { switch(select(" ~ Purchase ^0055FF"+getitemname(.@q[0])+"^000000:"+((.@preview && !@qe[7])?" ~ Preview...":"")+": ~ ^777777Cancel^000000")) { case 1: if (@qe[0]) { mes "[Quest Shop]"; mes "You're missing one or more quest requirements."; close; } if (!checkweight(.@q[0],.@q[2])) { mes "[Quest Shop]"; mes "^FF0000You need "+(((.@q[2]*getiteminfo(.@q[0],6))+Weight-MaxWeight)/10)+" additional weight capacity to complete this trade.^000000"; close; } if (.@q[4]) set Zeny, Zeny-(.@q[4]*.@q[1]); if (.@q[5]) setd .Points$[0], getd(.Points$[0])-(.@q[5]*.@q[1]); if (.@q[6]) for(set .@i,6; .@i<getarraysize(.@q); set .@i,.@i+2) delitem .@q[.@i],.@q[.@i+1]*.@q[1]; getitem .@q[0],.@q[2]; if (.Announce) announce strcharinfo(0)+" has created "+((.@q[2] > 1)?.@q[2]+"x "+getitemname(.@q[0]):callfunc("F_InsertArticle",getitemname(.@q[0])))+"!",0; specialeffect2 EF_FLOWERLEAF; close; case 2: setarray @qe[3], getlook(LOOK_HEAD_BOTTOM), getlook(LOOK_HEAD_TOP), getlook(LOOK_HEAD_MID), getlook(LOOK_ROBE), 1; if ((@qe[1] & 1) || (@qe[1] & 4096)) changelook LOOK_HEAD_BOTTOM, @qe[2]; else if ((@qe[1] & 256) || (@qe[1] & 1024)) changelook LOOK_HEAD_TOP, @qe[2]; else if ((@qe[1] & 512) || (@qe[1] & 2048)) changelook LOOK_HEAD_MID, @qe[2]; else if ((@qe[1] & 4) || (@qe[1] & 8192)) changelook LOOK_ROBE, @qe[2]; break; case 3: close; } } OnEnd: if (@qe[7]) { changelook LOOK_HEAD_BOTTOM, @qe[3]; changelook LOOK_HEAD_TOP, @qe[4]; changelook LOOK_HEAD_MID, @qe[5]; changelook LOOK_ROBE, @qe[6]; } deletearray @qe[0],8; end; function Add { if (getitemname(getarg(1)) == "null") { debugmes "Quest reward #"+getarg(1)+" invalid (skipped)."; return; } setarray .@j[0],getarg(2),getarg(3),getarg(4); for(set .@i,5; .@i<getargcount(); set .@i,.@i+2) { if (getitemname(getarg(.@i)) == "null") { debugmes "Quest requirement #"+getarg(.@i)+" invalid (skipped)."; return; } else setarray .@j[.@i-2],getarg(.@i),getarg(.@i+1); } copyarray getd(".q_"+getarg(0)+"_"+getarg(1)+"[0]"),.@j[0],getarraysize(.@j); npcshopadditem "qshop"+getarg(0),getarg(1),((.ShowZeny)?getarg(3):0); return; } function Chk { if (getarg(0) < getarg(1)) { set @qe[0],1; return "^FF0000"; } else return "^00FF00"; } function Slot { set .@s$,getitemname(getarg(0)); switch(.ShowSlot) { case 1: if (!getitemslots(getarg(0))) return .@s$; case 2: if (getiteminfo(getarg(0),2) == 4 || getiteminfo(getarg(0),2) == 5) return .@s$+" ["+getitemslots(getarg(0))+"]"; default: return .@s$; } } } function script qshop { deletearray @i[0],getarraysize(@i); for(set .@i,0; .@i<getargcount(); set .@i,.@i+1) set @i[.@i],getarg(.@i); doevent "quest_shop::OnMenu"; end; } how to put shop number 4 properly in this script? i tried a lot but it wouldn't work pls help thanks!
  4. hello sir, thanks for replying actually i wanted to make the rewards only for account number 2000001 to 2000275 not simply 275 people how can i fix that? thanks
  5. prontera,166,190,4 script Pre-Register Rewards 510,{ if( !Freebiesa313 && getcharid(3) < 2000275 ){ set #Freebiesa313,1; mes "Welcome to Arrival RO. Please Take your rewards."; getitembound 12411,2,Bound_Account; getitembound 12264,2,Bound_Account; getitembound 50002,1,Bound_Account; } else { mes "You either have claimed your reward or didn't participate in Pre register Event"; } close; } that's my current script and it still gives rewards to every characters in 1 account. ?
  6. hello haruka, thanks for replying actually that's not what i mean. I want to make those rewards can only be claimed once for every account for example account 2000011 has 5 chars. 1 already claimed the rewards, the rest cannot claim it again.|| how to do it?
  7. prontera,166,190,4 script Pre-Register Rewards 510,{ if( !Freebiesa1 && getcharid(3) < 2000275 ){ set Freebiesa1,1; mes "Welcome to Arrival RO. Please Take your rewards."; getitem 12411,2; getitem 12264,2; getitem 50002,1; } else { mes "You either have claimed your reward or didn't participate in Pre register Event"; } close; } This is my current script I want to give rewards to the first 275 Account Registered But unfortunately it's not account based and gives every characters in the accounts rewards. how can i make it only gives rewards to 1 character only for first 275 accounts? Please Help, Thanks
  8. function script gacha1 { setarray .i1[1],909,908,521,575,512,531,558,533,514; // Common Items set .i1rand,rand(1,9); // Randomize Common Items; just change max amount if you add items setarray .i2[1],40740,40929,40777,40786,40776,40785,40517,40590; // Rare Items set .i2rand,rand(1,8); // Randomize Rare Items; just change max amount if you add items setarray .i3[1],41161,41156,20500,20727,40591; // Super Rare Items set .i3rand,rand(1,5); //Randomize Super Rare Items; just change max amount if you add items setarray .i4[1],24004,24010; // Hyper Rare Items set .i4rand,rand(1,2); //Randomize Super Rare Items; just change max amount if you add items set .chance, rand(100); // Hyper Rare Item if (.chance < 1){ getitem .i4[.i4rand],1; announce "["+strcharinfo(0)+"] won a ["+getitemname(.i4[.i4rand])+"] super rare.",0; end; } // Super Rare Item else if (.chance < 4){ getitem .i3[.i3rand],1; announce "["+strcharinfo(0)+"] won a ["+getitemname(.i3[.i3rand])+"] rare.",0; end; } // Rare Item else if (.chance < 15){ getitem .i2[.i2rand],1; announce "["+strcharinfo(0)+"] won a ["+getitemname(.i2[.i2rand])+"] ga begitu rare.",0; end; } // Common Items else { getitem .i1[.i1rand],1; end; } } I want to make the "Hyper Rare Item" become 0,5% chance. how can i make it like that? please help, thanks a lot
  9. My Cash Shop Doesn't Show any item but it only happens to 1 of my characters, the rest of my characters on the same ID can see the items. anyone knows what possibly makes this happen? Thanks.
  10. thanks alot that solved my problem. problem is number 2!! thanks everyone
  11. yes sir, i mean i installed it from the creator. but after i add the files to my server side and client side, this thing happens have u ever experienced something like this? pls help thanks
  12. i installed gepard on my ragnarok server after i replace the src folder with src from gepard i recompiled my server but after that i tried to login, the account suddenly became unregistered on putty it says unknown account what should I do? PLS HELP ME T_T! thanks
  13. Hi, im using latest FluxCP... and im using custom theme, but i got problem on CMS, the tittle always say "Current Server Status", when i tried to create pages, its works... and manages pages working well... but when i go to path files, or edit, tittle always "Current Server Status" maybe someone can help me?. sory for my bad english sir...
×
×
  • Create New...