Emistry

source release > Lilith vending source mod

Name: @ToastOfDoom , @AnnieRuru Badge: Scripting , Helper , Support Badge Reason: They are legendary and great tutor all the time. Status: ToastOfDoom Scripting Lv 1 approved, Helper/Support rejected (not much activity on rAthena); AnnieRuru Scripting/Support already approved, Helper rejected (incorrect usage). [Euphy] Name: @KeyWorld Badge: Helper , Support Badge Reason: He's great scripter + tutor all the time. Status: Rejected (incorrect usage for Helper, and only staff members qualify for Support Expert). [Euphy] Name: @Z3R0 Badge: Support , Wiki Badge Reason: He's great scripter + tutor all the time. Status: Support Expert approved, Wiki Lv 1 rejected (not much activity on rAthena). [Euphy]

something like this ? OnPCLoginEvent: // Obtain account data set .@getAccountType$,query_sql("SELECT `account_type` FROM login WHERE `account_id` = "+getcharid(3)+";",.@accountType$); if( !newbie_vip_account && .@getAccountType$ == "" ){ .@accountId = getcharid(3); query_sql("INSERT INTO vip_platinum (`account_id`,`account_name`,`start_date`,`end_date`,`status`) VALUES ("+.@accountId+",'"+.@accountName$+"','"+gettimestr("%Y-%m-%d",21)+"','"+gettimestr("%Y-%m-%d",21)+"','ACTIVE');"); query_sql("UPDATE vip_platinum SET end_date = DATE_ADD(start_date, INTERVAL "+.@platinumDays+" DAY) WHERE account_id = "+.@accountId+";"); query_sql("UPDATE `login` SET `level` = 3 WHERE `account_id` = "+.@accountId+";"); query_sql("UPDATE login SET `account_type` = 'PLATINUM' WHERE account_id = "+.@accountId+";"); newbie_vip_account = 1; }

trunk/src/map/itemdb.h //The max. item group count (increase this when needed). #define MAX_ITEMGROUP 70 defined inside trunk/db/const.txt IG_BlueBox 1 IG_VioletBox 2 IG_CardAlbum 3 IG_GiftBox 4 IG_ScrollBox 5 IG_FingingOre 6 IG_CookieBag 7 IG_FirstAid 8 IG_Herb 9 IG_Fruit 10 IG_Meat 11 IG_Candy 12 IG_Juice 13 IG_Fish 14 IG_Box 15 IG_Gemstone 16 IG_Resist 17 IG_Ore 18 IG_Food 19 IG_Recovery 20 IG_Mineral 21 IG_Taming 22 IG_Scroll 23 IG_Quiver 24 IG_Mask 25 IG_Accesory 26 IG_Jewel 27 IG_GiftBox_1 28 IG_GiftBox_2 29 IG_GiftBox_3 30 IG_GiftBox_4 31 IG_EggBoy 32 IG_EggGirl 33 IG_GiftBoxChina 34 IG_LottoBox 35 IG_FoodBag 36 IG_Potion 37 IG_RedBox_2 38 IG_BleuBox 39 IG_RedBox 40 IG_GreenBox 41 IG_YellowBox 42 IG_OldGiftBox 43 IG_MagicCardAlbum 44 IG_HometownGift 45 IG_Masquerade 46 IG_Tresure_Box_WoE 47 IG_Masquerade_2 48 IG_Easter_Scroll 49 IG_Pierre_Treasurebox 50 IG_Cherish_Box 51 IG_Cherish_Box_Ori 52 IG_Louise_Costume_Box 53 IG_Xmas_Gift 54 IG_Fruit_Basket 55 IG_Improved_Coin_Bag 56 IG_Intermediate_Coin_Bag 57 IG_Minor_Coin_Bag 58 IG_S_Grade_Coin_Bag 59 IG_A_Grade_Coin_Bag 60 IG_Advanced_Weapons_Box 61 IG_Splendid_Box 62 make sure you have added the item in one of these files...or a new file.. trunk/db/re/item_group_db.txt

OnPCBaseLvUpEvent: if( BaseLevel >= 160 ) atcommand "@auraset 160"; end;

script release > Emistry Script > Refiner Function

try set .@i, select(" ~ ^0055FFRebirth^000000:"+((.ThirdClass)?" ~ ^FF0000Third Class^000000":"")+": ~ ^777777Cancel^000000"); if (.@i==3) close; change to set .@i, select(" ~ ^0055FFRebirth^000000: ~ ^777777Cancel^000000"); if (.@i==2) close;

since no member started yet ~ i will take my first step ... or ... i have to start all over again before i am qualified to these badges ?? beside...i can nominate any members too ? does their recent forum activity / online time take into count too ?? Status: Approved. [Euphy]

@suyothegreat read sleep and sleep2 basically...sleep2 need to attach to a players .... while sleep doesnt..

Uhmm Emistry, what is the use of "sleep2" ?

itemID................{ },{ while( isequipped( <itemid> ) ){ specialeffect2 417; sleep2 3000; } },{ }

itemID................{ },{ while( isequipped( <itemid> ){ specialeffect2 417; sleep2 3000; } },{ }

you need that "invisible npc" ... otherwise i have no idea where the rainbow will be shown ... to display any effects from trunk/doc/effect_list.txt , you need to attach the script to a npc or player...

prontera,155,181,5 script Sample #rainbow 111,{ end; OnPCLoadMapEvent: if( strcharinfo(3) == .map$ ) specialeffect EF_RAINBOW; end; OnInit: set .map$,strnpcinfo(4); setmapflag .map$,mf_loadevent; end; }

remove set .@failchance,rand(100); if (.faildestroy==1) { if(.@failchance < 2) { next; failedremovecards .@part,0; mes "[Wise Old Woman]"; mes "The process was a total failure. I am afraid the item and the cards were destroyed."; close; } if(.@failchance < 8) { if (.@failtype == 1) { next; failedremovecards .@part,1; mes "[Wise Old Woman]"; mes "While I have managed to remove the cards from the item, they were destroyed in the process. The item, however, is okay."; close; } if (.@failtype == 2) { next; failedremovecards .@part,2; mes "[Wise Old Woman]"; mes "Most unfortunate. I succeeded at removing the cards, but the item itself was destroyed in the process."; close; } } } if(.@failchance < 10) { next; failedremovecards .@part,3; mes "[Wise Old Woman]"; mes "I have failed to remove the cards. Luckily, however, both the item and the cards are still okay."; close; }

this has been discussed long time ago ... and it's imposible to have it in rathena .. these features only shown in other RO like mRO / eRO / pRO / iRO .. but not the main KRO ...

show your script .... emblem that display on flag will only clear after server reboot / reloaded ...depend on what type of variable you used to store the char id ...

the pin code in rathena ... isnt a npc script ... you cant run that pincode system in-game and enable players to turn it on/off ...

1229,Mama's_Knife............,{.... },{ if( isequipped(1230) ) nude; },{} 1230,House_Auger............,{.... },{ if( isequipped(1229) ) nude; },{}

show ur accname.lua .... most probably caused by semicolon or comma inside it...

#novice ---> novice

announce "Great googly-moogly! "+strcharinfo(0)+" has just Broken the Seal!! and will Start the Quest of Valkyrie",0x33FF66;

something like this ? prontera,155,161,5 script Sample 757,{ query_sql( "SELECT `name` FROM `char` WHERE `online` = 1 LIMIT 128",.@name$ ); .@size = getarraysize( .@name$ ); while( .@i < .@size ){ if( !checkvending( .@name$[.@i ) ) .@count++; .@i++; } mes "Total "+.@count+" Player online without Vending."; mes "Total "+( .@size - .@count )+" Player online with Vending."; close; } my current script only limited to max 128 players...if you want to extend this.... you can try make use of OFFSET in the SQL statement ...

it wont work ...it you didnt specify the delimiter...it will not break the string .. but you can do like this ... using the charat

OnMinute00: if( gettime(3) % 2 == 0 ) end; OnClock0000: OnClock0200: OnClock0400: etc..