

AHMADSHIDQI
Members-
Content Count
63 -
Avg. Content Per Day
0 -
Joined
-
Last visited
Community Reputation
1 NeutralAbout AHMADSHIDQI
-
Rank
Santa Poring
Profile Information
-
Gender
Not Telling
-
Location
Jakarta
Recent Profile Visitors
1,728 profile views
-
help The_Sign_quest from Rathena have a bug stuck
AHMADSHIDQI replied to dikapramantya's question in Scripting Support
bump!! need answer for this problem so bad!! :(( -
//===== 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( [email protected]_parameters$, "on" ) ) goto L_start; else if ( compare( [email protected]_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!!
-
// 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 [email protected],1; [email protected]<=getarraysize(.Shops$); set [email protected],[email protected]+1) { set .menu$, .menu$+.Shops$[[email protected]]+":"; npcshopdelitem "qshop"[email protected],909; } end; OnMenu: set [email protected], getarraysize(@i); if ([email protected]) set @shop_index, select(.menu$); else if ([email protected] == 1) set @shop_index, @i[0]; else { for(set [email protected],0; [email protected]<[email protected]; set [email protected],[email protected]+1) set [email protected]$, [email protected]$+.Shops$[@i[[email protected]]]+":"; set @shop_index, @i[select([email protected]$)-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"[email protected]_index,1; npcshopattach "qshop"[email protected]_index; end; OnBuyItem: // [email protected][] : RewardID, BoughtAmt, RewardAmt, BaseAmt, ReqZeny, ReqPts, { ReqItem, ReqAmt, ... } setarray [email protected][0],@bought_nameid[0],((@bought_quantity[0] > .MaxStack)?.MaxStack:@bought_quantity[0]); copyarray [email protected][3],getd(".q_"[email protected]_index+"_"[email protected][0]+"[0]"),getarraysize(getd(".q_"[email protected]_index+"_"[email protected][0])); set [email protected][2],[email protected][1]*[email protected][3]; if ([email protected][2] || [email protected][2] > 30000) { message strcharinfo(0),"You can't purchase that many "+getitemname([email protected][0])+"."; end; } mes "[Quest Shop]"; mes "Reward: ^0055FF"+(([email protected][2] > 1)[email protected][2]+"x ":"")+Slot([email protected][0])+"^000000"; mes "Requirements:"; disable_items; if ([email protected][4]) mes " > "+Chk(Zeny,[email protected][4]*[email protected][1])+([email protected][4]*[email protected][1])+" Zeny^000000"; if ([email protected][5]) mes " > "+Chk(getd(.Points$[0]),[email protected][5]*[email protected][1])+([email protected][5]*[email protected][1])+" "+.Points$[1]+" ("+getd(.Points$[0])+"/"+([email protected][5]*[email protected][1])+")^000000"; if ([email protected][6]) for(set [email protected],6; [email protected]<getarraysize([email protected]); set [email protected],[email protected]+2) mes " > "+Chk(countitem([email protected][[email protected]]),[email protected][[email protected]+1]*[email protected][1])+((.ShowID)?"{"[email protected][[email protected]]+"} ":"")+Slot([email protected][[email protected]])+" ("+countitem([email protected][[email protected]])+"/"+([email protected][[email protected]+1]*[email protected][1])+")^000000"; next; setarray @qe[1], getiteminfo([email protected][0],5), getiteminfo([email protected][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 [email protected],1; addtimer 1000, strnpcinfo(0)+"::OnEnd"; while(1) { switch(select(" ~ Purchase ^0055FF"+getitemname([email protected][0])+"^000000:"+(([email protected] && [email protected][7])?" ~ Preview...":"")+": ~ ^777777Cancel^000000")) { case 1: if (@qe[0]) { mes "[Quest Shop]"; mes "You're missing one or more quest requirements."; close; } if (!checkweight([email protected][0],[email protected][2])) { mes "[Quest Shop]"; mes "^FF0000You need "+((([email protected][2]*getiteminfo([email protected][0],6))+Weight-MaxWeight)/10)+" additional weight capacity to complete this trade.^000000"; close; } if ([email protected][4]) set Zeny, Zeny-([email protected][4]*[email protected][1]); if ([email protected][5]) setd .Points$[0], getd(.Points$[0])-([email protected][5]*[email protected][1]); if ([email protected][6]) for(set [email protected],6; [email protected]<getarraysize([email protected]); set [email protected],[email protected]+2) delitem [email protected][[email protected]],[email protected][[email protected]+1]*[email protected][1]; getitem [email protected][0],[email protected][2]; if (.Announce) announce strcharinfo(0)+" has created "+(([email protected][2] > 1)[email protected][2]+"x "+getitemname([email protected][0]):callfunc("F_InsertArticle",getitemname([email protected][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 [email protected][0],getarg(2),getarg(3),getarg(4); for(set [email protected],5; [email protected]<getargcount(); set [email protected],[email protected]+2) { if (getitemname(getarg([email protected])) == "null") { debugmes "Quest requirement #"+getarg([email protected])+" invalid (skipped)."; return; } else setarray [email protected][[email protected]],getarg([email protected]),getarg([email protected]+1); } copyarray getd(".q_"+getarg(0)+"_"+getarg(1)+"[0]"),[email protected][0],getarraysize([email protected]); 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 [email protected]$,getitemname(getarg(0)); switch(.ShowSlot) { case 1: if (!getitemslots(getarg(0))) return [email protected]$; case 2: if (getiteminfo(getarg(0),2) == 4 || getiteminfo(getarg(0),2) == 5) return [email protected]$+" ["+getitemslots(getarg(0))+"]"; default: return [email protected]$; } } } function script qshop { deletearray @i[0],getarraysize(@i); for(set [email protected],0; [email protected]<getargcount(); set [email protected],[email protected]+1) set @i[[email protected]],getarg([email protected]); 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!
-
How to make my freebies NPC account based
AHMADSHIDQI replied to AHMADSHIDQI's question in Scripting Support
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 -
How to make my freebies NPC account based
AHMADSHIDQI replied to AHMADSHIDQI's question in Scripting Support
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. -
How to make my freebies NPC account based
AHMADSHIDQI replied to AHMADSHIDQI's question in Scripting Support
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? -
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
-
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
-
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.
-
unknown account after recompiling gepard SRC
AHMADSHIDQI replied to AHMADSHIDQI's question in Source Support
thanks alot that solved my problem. problem is number 2!! thanks everyone -
unknown account after recompiling gepard SRC
AHMADSHIDQI replied to AHMADSHIDQI's question in Source Support
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 -
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
-
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...
-
whats the better client side between this two?
AHMADSHIDQI replied to AHMADSHIDQI's question in General Support
hello mael thank you for replying. i wonder whats actually the difference between the 2? do you know any? please do tell if you know. thanks a lot