Jump to content

Radian

Members
  • Posts

    1546
  • Joined

  • Last visited

  • Days Won

    19

Everything posted by Radian

  1. Radian

    Perfect Dodge

    @bump for this please
  2. How about making Rental / Bound Cards can only be apply on Rental or Bound items too?
  3. I support this
  4. try to use 127.0.0.1 if you are running on your pc/localhost on this lines char_athena.conf login_ip: 127.0.0.1 char_ip: 127.0.0.1 map_athena.conf char_ip: 127.0.0.1 map_ip: 127.0.0.1
  5. Nice Released. How can i make the duplicate NPC's to be random on a specifc map? Is it possible to do that?
  6. Radian

    KOE Help!

    Thank you so much for your help.. and sorry for the trouble..
  7. How can i modify the perfect dodge? for example every 10 Agi = 1 Perfect Dodge? @bump
  8. Radian

    KOE Help!

    I'm sorry i thought your asking on that since that's what im using.. How can i fixed this one? what should i do?
  9. Radian

    KOE Help!

    Here's the source code im using + struct map_session_data *sd = BL_CAST(BL_PC, s_bl); + if ( ( ((TBL_MOB*)target)->class_ == 1288 && !strcmp( mapindex_id2name(sd->mapindex), "guild_vs1" ) ) && + ( sd->status.guild_id == mapreg_readreg( add_str("$koegid") ) || battle_getcurrentskill(src) > 0 ) ) + return 0; + } +
  10. Like this? set #WOEPOINTS++;
  11. This is about bounded items, can i make a suggestion? how about Normal Players can trade it on a Level 99 GM ? for emergency purpose only..
  12. nice and simple 10/10 !
  13. Is it possible to make it all etc items only?
  14. Anyone got a working @away command on the latest revision of rAthena? i attempt to test this source code by Cydh, and i cant able to work it well on the latest revision here's the code ( Credits goes to Cydh for releasing this code ) i appreciate any help with this.. Index: conf/msg_athena.conf =================================================================== --- conf/msg_athena.conf (revision 17128) +++ conf/msg_athena.conf (working copy) @@ -1406,5 +1406,11 @@ 1396: You do not have a cart to be cleaned. 1397: Your cart was cleaned. +// @away +1398: Your away message has been removed. +1399: Please, enter at least an option (usage: @away <away message>). +1400: Your away message is active, use @away to disable it. +1401: (away) \"%s\" + //Custom translations import: conf/import/msg_conf.txt Index: src/map/atcommand.c =================================================================== --- src/map/atcommand.c (revision 17128) +++ src/map/atcommand.c (working copy) @@ -8818,6 +8818,39 @@ #undef MC_CART_MDFY } +/*========================================== +* Original code by [Cydh] +* [email protected] +* @away (away massage) +*------------------------------------------*/ +ACMD_FUNC(away) +{ + + char temp_msg[CHAT_SIZE_MAX]; + nullpo_retr(-1, sd); + memset(temp_msg, '\0', sizeof(temp_msg)); + + if (sd->state.away) { + sd->state.away = 0; + sscanf(message, "%0s", sd->state.away_msg); + sprintf(atcmd_output, msg_txt(1398)); // Your away message has been removed. + clif_displaymessage(sd->fd, atcmd_output); + } + else if (!message || !*message || sscanf(message, "%255[^\n]", temp_msg) < 1) { + sprintf(atcmd_output, msg_txt(1399)); // Please, enter at least an option (usage: @away <away message>). + clif_displaymessage(sd->fd, atcmd_output); + return -1; + } + else { + sd->state.away = 1; + sscanf(message, "%255[^\n]", sd->state.away_msg); + sprintf(atcmd_output, msg_txt(1400)); // Your away message is active, use @away to disable it. + clif_displaymessage(sd->fd, atcmd_output); + } + + return 0; +} + /** * Fills the reference of available commands in atcommand DBMap **/ @@ -9078,7 +9111,8 @@ ACMD_DEF2("rmvperm", addperm), ACMD_DEF(unloadnpcfile), ACMD_DEF(cart), - ACMD_DEF(mount2) + ACMD_DEF(mount2), + ACMD_DEF(away) }; AtCommandInfo* atcommand; int i; Index: src/map/clif.c =================================================================== --- src/map/clif.c (revision 17128) +++ src/map/clif.c (working copy) @@ -10062,6 +10062,19 @@ return; } + // if player is @away. [Cydh] + if( dstsd->state.away == 1 ) + { + char output_away[CHAT_SIZE_MAX]; + + clif_wis_end(fd, 0); // 0: success to send wisper + sprintf(output_away, msg_txt(1401), dstsd->state.away_msg); // (away) \"%s\" + clif_wis_message(fd, dstsd->status.name, output_away, strlen(output_away) + 1); // send @away message to sender + clif_wis_message(dstsd->fd, sd->status.name, message, messagelen); // show meesage from sender + return; + } + + // if player is autotrading if( dstsd->state.autotrade == 1 ) { char output[256]; Index: src/map/pc.h =================================================================== --- src/map/pc.h (revision 17128) +++ src/map/pc.h (working copy) @@ -144,6 +144,8 @@ struct guild *gmaster_flag; unsigned int prevend : 1;//used to flag wheather you've spent 40sp to open the vending or not. unsigned int warping : 1;//states whether you're in the middle of a warp processing + unsigned short away : 1; //@away auto message. [Cydh] + char away_msg[CHAT_SIZE_MAX]; //@away auto message. [Cydh] } state; struct { unsigned char no_weapon_damage, no_magic_damage, no_misc_damage;
  15. Radian

    KOE Help!

    @bump
  16. Im sorry didn't read it correctly..
  17. Hi, im currently testing some daily quest and i found this one.. //Made by: Katazui //5/21/2011 //Version 2.50 mellina,92,83,3 script Daily Quest 112,{ if (getgmlevel() >= 80) goto GM_Menu; L_START: if (getgmlevel() >= 80) next; mes "[Daily Quest]"; mes "Hello "+strcharinfo(0)+"!"; mes "Do you want to start today's Quest?"; mes " "; mes "Total Daily Quests Finished: ^008800"+$DailyQuestTotal+"^000000."; mes "Today Daily Quests Finished: ^0000FF"+$DailyQuestToday+"^000000."; menu "Yes!",-,"Nahh",L_Close; next; mes "[Daily Quest]"; mes "You'll need these item for Today's Quest:"; mes "^FF0000"+getitemname($QuestItem1)+"^000000 x "+$QuestItem1HM+""; mes "^FF0000"+getitemname($QuestItem2)+"^000000 x "+$QuestItem2HM+""; mes "^FF0000"+getitemname($QuestItem3)+"^000000 x "+$QuestItem3HM+""; mes "In exchange you will get ^0000FF"+getitemname($DailyQuestPrize)+"^000000 x "+$DailyQuestPrizeHM+""; next; mes "[Daily Quest]"; mes "Do you have the items?"; menu "Yes! I do.",-,"Gimme some time.",L_Close; if(countitem($QuestItem1) >= $QuestItem1HM) && (countitem($QuestItem2) >= $QuestItem2HM) && (countitem($QuestItem3) >= $QuestItem3HM) goto FinishQuest; next; mes "[Daily Quest]"; mes "You only have "+countitem($QuestItem1HM)+" of ^FF0000"+getitemname($QuestItem1)+"^000000, "+countitem($QuestItem2HM)+" of ^FF0000"+getitemname($QuestItem2)+"^000000, "+countitem($QuestItem3HM)+" of ^FF0000"+getitemname($QuestItem3)+"^000000."; mes "Come back when you have it! Better get the items quickly. It's gonna change in a Day!"; close; L_Close: next; mes "[Daily Quest]"; mes "Come back again! Get the Items!"; mes "Goodbye!"; close; GM_Menu: mes "[Daily Quest]"; mes "Hello GM "+strcharinfo(0)+"!"; mes "What can I do for you today?"; menu "Player Menu",L_START,"Change Today's Quest/Prize",L_ChangeQuest,"Close",L_Close; L_ChangeQuest: next; mes "[Daily Quest]"; mes "What will you like to change?"; next; menu "Go back.",GM_Menu,"Prize [^0000FF"+getitemname($DailyQuestPrize)+"^000000 x "+$DailyQuestPrizeHM+"]",L_ChangePrize,"Change Quest Randomly",L_ChangeQuestRandom,"Change Quest by Myself",L_ChangeQuestMyself; L_ChangeQuestMyself: next; mes "[Daily Quest]"; mes "Which item would you like to change first?"; menu "Go Back.",L_ChangeQuest,"Item 1 [^FF0000"+getitemname($QuestItem1)+"^000000 x "+$QuestItem1HM+"]",L_ChangeItem1,"Item 2 [^FF0000"+getitemname($QuestItem2)+"^000000 x "+$QuestItem2HM+"]",L_ChangeItem2,"Item 3 [^FF0000"+getitemname($QuestItem3)+"^000000 x "+$QuestItem3HM+"]",L_ChangeItem3; L_ChangeItem1: next; mes "[Daily Quest]"; mes "Alright. What will be the item?"; next; input $QuestItem1; next; L_ChangeItem12: mes "[Daily Quest]"; mes "How much of ^ff0000"+getitemname($QuestItem1)+"^000000 do you want?"; mes "It must be in the range of ^0088001 ~ 200^000000."; next; input $QuestItem1HM; next; if ($QuestItem1HM > 200) goto L_HMItem1Denied; mes "[Daily Quest]"; mes "Item 1 Set."; set $DailyQuestToday,0; mes "^FF0000"+getitemname($QuestItem1)+"^000000 x "+$QuestItem1HM+"."; next; goto L_ChangeQuest; L_HMItem1Denied: mes "[Daily Quest]"; mes "This item (^ff0000"+getitemname($QuestItem1)+"^000000) must be in a range of ^0088001 ~ 200^000000."; next; goto L_ChangeItem12; L_ChangeItem2: next; mes "[Daily Quest]"; mes "Alright. What will be the item?"; next; input $QuestItem2; next; L_ChangeItem22: mes "[Daily Quest]"; mes "How much of ^ff0000"+getitemname($QuestItem2)+"^000000 do you want?"; mes "It must be in the range of ^0088001 ~ 150^000000."; next; input $QuestItem2HM; next; if ($QuestItem2HM > 150) goto L_HMItem2Denied; mes "[Daily Quest]"; mes "Item 2 Set."; set $DailyQuestToday,0; mes "^FF0000"+getitemname($QuestItem2)+"^000000 x "+$QuestItem2HM+"."; next; goto L_ChangeQuest; L_HMItem2Denied: mes "[Daily Quest]"; mes "This item (^ff0000"+getitemname($QuestItem2)+"^000000) must be in a range of ^0088001 ~ 150^000000."; next; goto L_ChangeItem22; L_ChangeItem3: next; mes "[Daily Quest]"; mes "Alright. What will be the item?"; next; input $QuestItem3; next; L_ChangeItem32: mes "[Daily Quest]"; mes "How much of ^ff0000"+getitemname($QuestItem3)+"^000000 do you want?"; mes "It must be in the range of ^0088001 ~ 50^000000."; next; input $QuestItem3HM; next; if ($QuestItem3HM > 50) goto L_HMItem3Denied; mes "[Daily Quest]"; mes "Item 3 Set."; set $DailyQuestToday,0; mes "^FF0000"+getitemname($QuestItem3)+"^000000 x "+$QuestItem3HM+"."; next; goto L_ChangeQuest; L_HMItem3Denied: mes "[Daily Quest]"; mes "This item (^ff0000"+getitemname($QuestItem3)+"^000000) must be in a range of ^0088001 ~ 50^000000."; next; goto L_ChangeItem32; L_ChangeQuestRandom: set $QuestItem1, rand(701,1065); set $QuestItem1HM, rand(1,200); set $QuestItem2, rand(701,1065); set $QuestItem2HM, rand(1,150); set $QuestItem3, rand(701,1065); set $QuestItem3HM, rand(1,50); set $DailyQuestToday,0; mes "[Daily Quest]"; mes "This is the Daily Quest:"; mes "^FF0000"+getitemname($QuestItem1)+"^000000 x "+$QuestItem1HM+""; mes "^FF0000"+getitemname($QuestItem2)+"^000000 x "+$QuestItem2HM+""; mes "^FF0000"+getitemname($QuestItem3)+"^000000 x "+$QuestItem3HM+""; next; goto GM_Menu; L_ChangePrize: next; mes "[Daily Quest]"; mes "Input the Prize"; next; input $DailyQuestPrize; next; mes "[Daily Quest]"; mes "The Prize: "+getitemname($DailyQuestPrize)+" x How many?"; next; input $DailyQuestPrizeHM; next; mes "[Daily Quest]"; mes "This is what you like?"; mes "^0000ff"+getitemname($DailyQuestPrize)+"^000000 x "+$DailyQuestPrizeHM+"."; menu "Yup, Thanks.",GM_Menu,"Noo! I made a mistake!",L_ChangePrize; FinishQuest: next; mes "[Daily Quest]"; mes "You got ^0000FF"+getitemname($DailyQuestPrize)+"^000000 x "+$DailyQuestPrizeHM+"."; delitem $QuestItem1,$QuestItem1HM; delitem $QuestItem2,$QuestItem2HM; delitem $QuestItem3,$QuestItem3HM; getitem $DailyQuestPrize,$DailyQuestPrizeHM; set $DailyQuestTotal,$DailyQuestTotal +1; set $DailyQuestToday,$DailyQuestToday +1; close; } - script DailyQuestItemChanger -1,{ OnInit: OnClock0000: while ( getitemname( set( $QuestItem1, rand(701,1065) ) ) == "null" ); set $QuestItem1HM, rand(1,200); while ( getitemname( set( $QuestItem2, rand(701,1065) ) ) == "null" ); set $QuestItem2HM, rand(1,150); while ( getitemname( set( $QuestItem3, rand(701,1065) ) ) == "null" ); set $QuestItem3HM, rand(1,50); set $DailyQuestToday,0; end; } but there's an error everytime i talked to the npc ( can someone tell me whats the problem? ) [Error]: buildin_countitem: Invalid item '19'. [Debug]: Source (NPC): Daily Quest at mellina (92,83) [Error]: buildin_countitem: Invalid item '103'. [Debug]: Source (NPC): Daily Quest at mellina (92,83) [Error]: buildin_countitem: Invalid item '8'. [Debug]: Source (NPC): Daily Quest at mellina (92,83) [Error]: buildin_countitem: Invalid item '19'. [Debug]: Source (NPC): Daily Quest at mellina (92,83) [Error]: buildin_countitem: Invalid item '103'. [Debug]: Source (NPC): Daily Quest at mellina (92,83) [Error]: buildin_countitem: Invalid item '8'. [Debug]: Source (NPC): Daily Quest at mellina (92,83)
  18. Those can only be found in the iteminfo.lua/lub because that's when the Costume System came out. There's a application that convert lub to lua right? i can get this costume items in the latest kRO? Yeah, but if you use the iteminfo.lub from the Translation Project located in System/ It's actually a .lua renamed to .lub bro is it possible that i can convert this iteminfo files ? into idnum2itemdesctable , idnum2itemdisplaynametable and idnum2itemresnametable
  19. Those can only be found in the iteminfo.lua/lub because that's when the Costume System came out. There's a application that convert lub to lua right? i can get this costume items in the latest kRO?
  20. Im using 2012-04-10RE Client & Basic Data Folder v4.0 and where can i see the ( idnum2itemdesctable , idnum2itemdisplaynametable and idnum2itemresnametable ) of these items 19903,C_Witchs_Hat,Costume Witch's Hat,4,0,,0,,0,,0,0xFFFFFFFF,63,2,1024,,1,0,717,{ bonus bVariableCastrate,-10; },{},{} 19914,C_Tarlock's_Hat,Costume Tarlock's Hat,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,1101,{},{},{} 19917,C_Gloomy_Pumpkin_Hat,Costume Pumpkin Hat,4,0,,0,,0,,0,0xFFFFFFFF,63,2,1024,,1,0,691,{ bonus bSpeedRate,25; },{},{} 19918,C_Lude_Mask,Costume Lude Mask,4,0,,0,,0,,0,0xFFFFFFFF,63,2,6144,,1,0,802,{ bonus bAddItemHealRate,20; },{},{} 19919,C_Cube_Mask_,Costume Quve Mask,4,0,,0,,0,,0,0xFFFFFFFF,63,2,6144,,1,0,472,{ bonus bAspdRate,10; },{},{} 19920,C_Adv_Whisper_Mask,Costume Evolved Whisper Mask,4,0,,0,,0,,0,0xFFFFFFFF,63,2,7168,,1,0,458,{ bonus bFlee,20; },{},{} 19922,Costume_Noahs_Hat,Costume Noahs Hat,4,0,,0,,0,,0,0xFFFFFFFF,63,2,7168,,1,0,636,{ /* TODO */ },{},{} 19929,C_Classical_Ribbon,Costume Classical Ribbon,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,,1,,{ /*TODO: View ID*/ },{},{} 19934,C_Lolita_Ten_Gallon_Hat,Costume Alive Ten Gallon Hat Of Flame,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,1048,{},{},{} 19935,C_Hunting_Cap_Of_Gust,Costume Hunting Cap Of Gust,12,0,,0,,,,,0xFFFFFFFF,63,2,1024,,1,,1076,{},{},{} 19938,Costume_Love_Rabbit_Hood,Costume Love Rabbit Hood,4,0,,0,,0,,0,0xFFFFFFFF,63,2,7168,,1,0,549,{},{},{} 19961,C_Rune_Circlet,Costume Rune Circlet,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,623,{},{},{} 19962,C_Mitra,Costume Mitra,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,624,{},{},{} 19963,C_Driver_Band(Red),Costume Driver Band(Red),4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,626,{},{},{} 19964,C_Driver_Band(Yellow),Costume Driver Band(Yellow),4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,637,{},{},{} 19965,C_Shadow_Handicraft,Costume Shadow Handicraft,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,627,{},{},{} 19966,C_Minstrel_Song's_Hat,Costume Minstrel Song's Hat,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,628,{},{},{} 19967,C_Midas_Whisper,Costume Midas Whisper,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,629,{},{},{} 19968,C_Magic_Stone_Hat,Costume Magic Stone Hat,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,630,{},{},{} 19969,C_Blazing_Soul,Costume Blazing Soul,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,631,{},{},{} 19970,C_Wind_Whisper,Costume Wind Whisper,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,633,{},{},{} 19971,C_Dying_Swan,Costume Dying Swan,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,635,{},{},{} 19972,C_Protect_Of_Crown,Costume Protect Of Crown,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,1140,{},{},{} 19973,C_Circlet_Of_Bones,Costume Circlet Of Bones,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,1141,{},{},{} 19974,C_Camouflage_Rabbit_Hood,Costume Camouflage Rabbit Hood,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,1142,{},{},{} 19977,C_Golden_Exclamation_Mark,Costume Golden Exclamation Mark,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,1145,{},{},{} 19978,C_Silver_Exclamation_Mark,Costume Silver Exclamation Mark,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,1146,{},{},{} 19979,C_Golden_Question_Mark,Costume Golden Question Mark,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,1147,{},{},{} 19980,C_Silver_Question_Mark,Costume Silver Question Mark,4,10,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,1148,{},{},{} 19976,C_Cat_Santa_Hat,Cat Santa Hat,4,20,,0,,0,,0,0xFFFFFFFF,63,2,1024,,1,0,1144,{ bonus bAspdRate,10; bonus bSpeedRate,25; },{},{} 19984,C_Fashion_Winter_Hat,Costume Fashion Winter Hat,4,0,,0,,,,0,0xFFFFFFFF,63,2,1024,,1,1,196,{},{},{} If anyone can tell where and give me the link..
  21. Did you modified some things on src ? and the errors are shown..
  22. Do you mean you want to make a custom sprite like that? or just change the look of a job? if yes follow this steps.. First, you need the file of the picture you shown here Second, look for the sprite name of what you want to change into your desired sprite looks Third, Rename the custom sprite you into the sprite name of what you like..
  23. I suggest you must provide a screen shot of the errors and the changes.. so that they will understand it easily..
  24. I think that's the purpose why they put that feature in rAthena, so you can manage to balanced a specific skill on your own risk, and i cant answer that question for " the default damage for asura " . im sorry
  25. Yes, the same thing you did on your test server, you need the script.txt , the directory for it you need to access the server side on that.. but.. if youre willing to know about adding script here's a link http://rathena.org/wiki/Adding_a_Script
×
×
  • Create New...