Jump to content

Poring King

Members
  • Posts

    911
  • Joined

  • Last visited

  • Days Won

    18

Everything posted by Poring King

  1. use set Once,1; if (once == 1 ) L_Sorry L_sorry: mes " Test" end;
  2. Look for any hosting that provide "Singapore" since you are in asia . PH here bro i use singapore in gomanilahost.net
  3. there is another way . You can use your main item_db , but dont skip your problem fix your import file
  4. You can also change it from here trunk/conf/battle/player.conf
  5. You can use my script , im using this on my live server now and its work fine for me .. Creadit to the owner of this script forgot the name .. prontera,135,171,3 script Item Pending Reward 836,{ // --------------------- Config --------------------- // Package format is "ID1,Count1,ID2,Count2,..." // GM Access: Level required to open the GM menu. // GM Delete: Level required to erase entries. // GM Logging: Level required to manage logs. set .GMAccess,60; set .GMDelete,99; set .GMLogging,99; set .PackageCount,6; setarray .Package1[0],7608,10; setarray .Package2[0],7539,1; setarray .Package3[0],7227,1; setarray .Package4[0],7608,10; setarray .Package5[0],7539,1; setarray .Package6[0],7227,1; // -------------------------------------------------- if (getgmlevel() >= .GMAccess) goto GM_Menu; mes "[Item Rewards]"; set .@i,0; while (.@i < getarraysize($itemreward$)) { if (strcharinfo(0) == $itemreward$[.@i]) goto GetReward; set .@i, .@i+2; } mes "You have no rewards pending."; close; GetReward: if (((Weight*100)/MaxWeight) > 49) { mes "You are over the weight limit."; close; } if (!checkweight(5055,getarraysize(getd(".Package"+$itemreward$[.@i+1])))) { mes "Clear space in your inventory."; close; } set .@j,0; while (.@j < getarraysize(getd(".Package"+$itemreward$[.@i+1]))) { getitem getd(".Package"+$itemreward$[.@i+1]+"["+.@j+"]"),getd(".Package"+$itemreward$[.@i+1]+"["+(.@j+1)+"]"); set .@j, .@j+2; } specialeffect2 248; deletearray $itemreward$[.@i],2; mes "Here you go!"; announce "Event Winner is "+strcharinfo(0)+" he will recieve item for winning in event!",bc_blue|bc_all; close; OnMinute00: OnMinute30: if (!getarraysize($itemreward$)) end; set .@i,0; while (.@i < getarraysize($itemreward$)) { message $itemreward$[.@i],"[You have a reward pending. Get the Item in Rewards NPC.]"; sleep 10; set .@i, .@i+2; } end; GM_Menu: mes "[Item Rewards]"; mes "What would you like to do?"; next; switch(select(" ~ ^FF55FFPackage information^000000: ~ ^FF55FFList unclaimed rewards^000000: ~ ^00D900Give a reward^000000: ~ "+((getgmlevel()<.GMDelete)?"^777777":"^DE0000")+"Delete a reward^000000: ~ "+((getgmlevel()<.GMDelete)?"^777777":"^DE0000")+"Delete all unclaimed rewards^000000: ~ "+((getgmlevel()<.GMLogging)?"^777777":"^55AAFF")+"Manage logs^000000: ~ [Close]")) { case 1: mes "[Item Rewards]"; set .@j,1; while (getd(".Package"+.@j)) { mes "^660099Package " + .@j + ":^000000"; set .@i,0; while (.@i < getarraysize(getd(".Package"+.@j))) { mes " ~ " + getd(".Package"+.@j+"["+(.@i+1)+"]") + "x " + getitemname(getd(".Package"+.@j+"["+(.@i)+"]")); set .@i, .@i+2; } set .@j, .@j+1; } next; goto GM_Menu; case 2: mes "[Item Rewards]"; mes "Used space: ^F52887" + (getarraysize($itemreward$)/2) + "^000000/10000"; mes "--------------------------------"; set .@i,0; while (.@i < getarraysize($itemreward$)) { mes "^B041FF" + $itemreward$[.@i] + "^000000: package #" + $itemreward$[.@i+1]; set .@i, .@i+2; } next; goto GM_Menu; case 3: mes "[Item Rewards]"; if (getarraysize($itemreward$) > 127) { mes "No more names can be stored."; mes "Delete some values and try again."; next; goto GM_Menu; } mes "Input a name, then a package number."; input .@name$; query_sql "SELECT `char_id` FROM `char` WHERE `name` = '"+.@name$+"'",.@charid; if (!.@charid) { mes "The name is invalid."; next; goto GM_Menu; } else set .@charid,0; input .@package,1,.PackageCount; next; mes "[Item Rewards]"; mes "Player: ^B041FF" + .@name$ + "^000000"; mes "Package: ^B041FF#" + .@package + "^000000"; mes " "; mes "Are you sure?"; if (select("Yes:No") == 2) { mes "Request cancelled."; next; goto GM_Menu; } setarray $itemreward$[getarraysize($itemreward$)],.@name$,.@package; announce "Player "+.@name$+" Please proceed to prontera to claim your reward!",0; message .@name$,"[You have a reward pending. See the Item Rewards NPC.]"; if ($itemlog) { if (getarraysize($itemlog1$) > 127) { deletearray $itemlog1$[0],1; deletearray $itemlog2$[0],1; } setarray $itemlog1$[getarraysize($itemlog1$)],strcharinfo(0); setarray $itemlog2$[getarraysize($itemlog2$)],.@name$; } mes "Reward added."; next; goto GM_Menu; case 4: mes "[Item Rewards]"; if (getgmlevel() < .GMDelete) { mes "You are not permitted to delete entries."; next; goto GM_Menu; } mes "Input a name to cancel a reward."; input .@name$; set .@i,0; while (.@i < getarraysize($itemreward$)) { if ($itemreward$[.@i] == .@name$) { deletearray $itemreward$[.@i],2; mes "Name cleared."; next; goto GM_Menu; } set .@i, .@i+2; } mes "The name is invalid."; next; goto GM_Menu; case 5: mes "[Item Rewards]"; if (getgmlevel() < .GMDelete) { mes "You are not permitted to delete entries."; next; goto GM_Menu; } mes "^FF0000This action cannot be undone.^000000"; mes "Are you sure?"; mes " "; if (select("Yes:No") == 2) { mes "Request cancelled."; next; goto GM_Menu; } deletearray $itemreward$[0],getarraysize($itemreward$); mes "All entries cleared."; next; goto GM_Menu; case 6: Log_Menu: mes "[Item Rewards]"; if (getgmlevel() < .GMLogging) { mes "You are not permitted to manage logs."; next; goto GM_Menu; } mes "Logs are currently "+(($itemlog)?"^00D900enabled^000000":"^FF0000disabled^000000")+"."; next; switch(select(" ~ ^55AAFFView Logs^000000: ~ "+((!$itemlog)?"^00D900Enable":"^777777Disable")+" logging^000000: ~ ^DE0000Delete all logs^000000: ~ [Go back]")) { case 1: mes "[Item Rewards]"; mes "Used space: ^F52887" + (getarraysize($itemlog1$)) + "^000000/10000"; mes "--------------------------------"; set .@i,0; while (.@i < getarraysize($itemlog1$)) { mes "^B041FF" + $itemlog1$[.@i] + "^000000: sent to ^55AAFF" + $itemlog2$[.@i] + "^000000"; set .@i, .@i+1; } next; goto Log_Menu; case 2: set $itemlog, ((!$itemlog)?1:0); goto Log_Menu; case 3: mes "[Item Rewards]"; mes "^FF0000This action cannot be undone.^000000"; mes "Are you sure?"; mes " "; if (select("Yes:No") == 2) { mes "Request cancelled."; next; goto Log_Menu; } deletearray $itemlog1$[0],getarraysize($itemlog1$); deletearray $itemlog2$[0],getarraysize($itemlog2$); mes "Logs cleared."; next; goto Log_Menu; case 4: next; goto GM_Menu; } case 7: close; } } inform me if it works fine from your server
  6. i already saw this in my data folder :3 but i dont know how to use it ..
  7. +1 for this , i think because of the clouds the airship become more animated
  8. OnNPCKillEvent: if (killedrid == 1296) { getmapxy(.@mapa$,.@x,.@y,0); if (.@mapa$ == "pvp_n_1-3") { enablenpc "PoringWarp1"; sleep 120000; disablenpc "PoringWarp1"; end; } } I think because of this
  9. Try to use atcommand and @storeall
  10. Its Because you are using GM Sprite . Default GM Sprite is only a Sword and a Guard
  11. thats why dokebi drop all items because of no event added . Please refer to this: https://rathena.org/wiki/Permanent_Monster_Spawn
  12. maybe wrong declaration of word ? hmmm image 1 and 2 are working but 3 not ? hmm i think 100% wrong declaration .
  13. Lol Sorry . i see ! haha my mistake do this one , but your script can't make 2 town even you do duplicate . better to create 2 same script but different map location . https://rathena.org/wiki/Basic_Scripting Sample : prontera,156,145,4 script Test NPC::test 589,{ mes "Hello, how are you?"; mes "I am fine, how are you?"; menu "I am doing okay!",-,"Not doing too good",bad; mes "That's good, I'm glad to hear that"; close; bad: mes "Awww, that makes me a bit ^FF0000sad^000000. Sorry to hear that."; next; mes "Would you like some zeny to help yourself feel better?"; next; menu "Sure, give it to me!",L_zeny,"Naw, No zeny for me",-; close; L_Zeny: mes "I can only give you zeny if you have 10,000 or less."; if (Zeny > 10000) goto toomuch; mes "You have 10,000 zeny or less, I see."; set Zeny,Zeny+10000; next; mes "Hope you feel better!"; close; toomuch: mes "You have over 10,000 zeny, you must feel really good about yourself!"; close; } lhz_dun01,157,285,4 duplicate(test) Test NPC 859 hu_fild05,186,210,4 duplicate(test) Test NPC 859 yuno_fild07,221,179,4 duplicate(test) Test NPC 859 tha_scene01,139,194,1 duplicate(test) Test NPC 859
  14. There you go ! you already tell what does files location you need to save your loading image data/texture/À¯ÀúÀÎÅÍÆäÀ̽º Save here
  15. Add your Loading screen inside the folder where contains the [ Item ] [ Collection ] [ illust ] sry i forgot the name of that folder . add Here the name of your loading screen
  16. Add Event on the last part of permanent monster spawn OnMyMobDead: getitem 969,1; //Gold <-----------------------------------------------------------| end; | | ordeal_3-2,0,0,0,0 monster Dokebi 1110,50,1000,0,"Control::OnMyMobDead" <--|
  17. Config the script Look for Set .Maps , Set , X and Y Coordinate . to enable add your script in your desire location and dont forget to add the path of script inside scripts_custom.conf
  18. Hello Mam, Sir im newbie in rAthena Im requesting for an idea or if you can provided the item script it help's me alot for my unique script planning to made .Lets change the Intense WOE of Ragnarok to a different one . 1st - The item will automatically drop on the area of emperium and it will happend only in WOE time . 2nd - The item Have a big Size when drop on the floor . 3rd - The Item will drop on the floor if the user die . 4th - The item will not eaten by the floor . 5th - The item give you a All stats "amount" and skill like enchant deadly poison ( i think i can do this one lol ) 6th - if player pick up the "This Item" he will get this following .. and he will become the Guild Guardian Player for his guild . 7th - The item picker will announce ( i can do this lol ) If job is swordsman = switch(select("Dagger,Axe,Sword,Spear etc "))item script ("enchant deadly poison") if job is archer = switch(select("Bow,Dagger")) item script("Add range , Add Bow Damage + 40% or desire amount. if job is paladin = switch(select("Shield ,Armor,")) item script ("can devo non party member") lol if job is mage = switch(select("Hat,Weapon,")) item script (" Let me think for this one ") etc . Let me think for the other job can do I hope some one could make this one and have a creadit for me hahah .
  19. Specific question please so we can help you
  20. Heart breaking reply came from you </3 bro
  21. // [4] Only reward Guild Masters. // - If not set, all guild members are rewarded. // - If mailing is enabled (option 2), offline Guild Masters WILL receive rewards. This one
  22. // Reward options. // ----------------------------------------------------------- // [1] Enable rewards. // [2] Mail all rewards. // - If not set, players receive items in their inventory. // - Only ONE item can be sent via mail, plus Zeny. // - Note that offline players do NOT receive rewards. // [4] Only reward Guild Masters. // - If not set, all guild members are rewarded. // - If mailing is enabled (option 2), offline Guild Masters WILL receive rewards. // [8] Duplicate IP check. // - Members in a guild with the same IP address are not rewarded. // - If Guild Masters is enabled (option 4), this feature is not used. // ----------------------------------------------------------- Check this one for combine value
×
×
  • Create New...