Jump to content

EL Dragon

Members
  • Posts

    591
  • Joined

  • Last visited

  • Days Won

    19

Everything posted by EL Dragon

  1. liegt vermutlich daran das du einen neuen gm sprite verwendest, bei den Neuren svn's ist das ein Featur das verhindert das player z.b ihre grf manipulieren z.b 0 Deadly Sprites funktionieren dann nicht versuch halt eine andere grf, oder verzichte auf den gm style, wen es nur local server ist ist es doch egal
  2. run in mysql update login set birthdate = '0000-00-00'
  3. pls move this topic to ,Scripting Support or Database Support
  4. use @reloadatcommand and relog, If it does not work? post youre grops.cof here
  5. use @reloadscript or @loadnpc npc/custom/kairo/statsseller.txt
  6. haste auch die ports geändert bzw. 80 zu 3306?
  7. mir fehlt auch nur das mit den Ports auf und das s1/p1, ps in Skype kann man den Port ändern
  8. here's the step open ra/db/item_db2.txt make a new item - 25500,Custom_Box,Custom Box,2,10000,,200,,,,,0xFFFFFFFF,7,2,,,,,,{ getitem groupranditem(IG_whatever),1; },{},{} next step is open ra/db/const.txt Find IG_Advanced_Weapons_Box 61 below add this IG_whatever 63 //IG_whatever must be same in the item_db2.txt script command next step open ra/db/item_group_db.txt import: db/item_whatever.txt - put this next step make a new script named item_whatever.txt - place this in ra/db/ next step open item_whatever.txt - in ra/db/item_whatever.txt //Explanation 63 - is the number you input in const.txt // - 1111 - this is the itemID // - 9 - this is the rate 63,1111,9 63,<Item ID>,<Rate> next step open ra/src/map/itemdb.h find this part #define MAX_ITEMGROUP #62 the number is 62 where in const.txt the max group number is 62 - but you add another item group.. - just add + 1 in 62 so make it #define MAX_ITEMGROUP #63 and recompile youre server or usse a script add new item 501,Red_Potion,Red Potion,0,50,,70,,,,,0xFFFFFFFF,7,2,,,,,,{ callfunc "CustomBox"; },{},{} npc script function script CustomBox { setarray .BoxItems[0],501,502,503; set .Random, getarraysize( .BoxItems ); getitem .BoxItems[ rand( .Random ) ], 1; end; }
  9. Version v.1.0

    494 downloads

    VOTE for the Sprite's or Post your comment in the Support Topic ---- File Info ---- This File Includes: Flam Lord Spr and Act File ---- Rules ---- 1. Do not claim my work as yours. 2. Do not remove or alter my signatures/watermarks within the sprites and all associated files. 3. Credit me if you use my work as a base. 4. Do not edit or alter my sprites in any way without permission from me. 5. Do not distribute my sprites on any file hosting sites.
    Free
  10. the script ,change card to Points and 4 Points to 1 Card album
  11. here card trader //===== rAthena Script ======================================= //= Card Trader //===== By: ================================================== //= Euphy //===== Current Version: ===================================== //= 1.1 //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= //= Exchange cards for points. //============================================================ prontera,165,196,6 script Card Trader 90,{ mes "[Card Trader]"; mes "Hi, "+strcharinfo(0)+"!"; mes "What can I do for you?"; next; switch(select(" > Information: > Trade in cards: > Point shop (^0055FF"+getd(.Points$)+"^000000): > Leave")) { case 1: mes "[Card Trader]"; mes "Do you find that you've got"; mes "useless cards lying around?"; mes "I'll be glad to take them off"; mes "your hands!"; next; mes "[Card Trader]"; mes "I'll give you ^0055FF"+.Points[0]+" Point"+((.Points[0] == 1)?"":"s")+"^000000 for each"; mes "card you give me, and"; mes "^0055FF"+.Points[1]+" Points^000000 for MVP cards."; mes "You can trade those points"; mes "for items later on."; mes "How does that sound?"; emotion e_cash; close; case 2: mes "[Card Trader]"; mes "Select the cards you"; mes "want to trade in."; if (.Level) { mes " "; mes "They must be dropped"; mes "by monsters of level"; mes .Level+" and above."; } deletearray @sold_nameid[0],getarraysize(@sold_nameid); callshop "card_shop",2; npcshopattach "card_shop"; end; case 3: mes "[Card Trader]"; mes "You have ^0055FF"+getd(.Points$)+"^000000 Point"+((getd(.Points$) == 1)?".":"s."); callshop "card_shop",1; npcshopattach "card_shop"; end; case 4: mes "[Card Trader]"; mes "*yawn*"; mes "See you later!"; emotion e_yawn; close; } OnSellItem: mes "Cards to sell:"; mes "-----------------------------------"; for(set .@i,0; .@i<getarraysize(@sold_nameid); set .@i,.@i+1) if (@sold_nameid[.@i] > 4000 && @sold_nameid[.@i] < 4700) { if (.Level) { query_sql("SELECT `LV` FROM `mob_db` WHERE `DropCardid` = "+@sold_nameid[.@i],.@lv); if (.@lv < .Level) { dispbottom getitemname(@sold_nameid[.@i])+" is under the minimum level."; continue; } } set .@card_id[getarraysize(.@card_id)], @sold_nameid[.@i]; set .@card_amt[getarraysize(.@card_amt)], @sold_quantity[.@i]; set .@mvp, compare(.MVP$,""+@sold_nameid[.@i]); mes ((.@mvp)?" ^FF0000":" ^777777")+@sold_quantity[.@i]+"x "+getitemname(@sold_nameid[.@i])+"^000000"; set .@card_total, .@card_total+(@sold_quantity[.@i]*((.@mvp)?.Points[1]:.Points[0])); } deletearray @sold_nameid[0], getarraysize(@sold_nameid); deletearray @sold_quantity[0], getarraysize(@sold_quantity); if (!.@card_id) { mes " ^777777(none)^000000"; emotion e_swt; close; } mes " "; mes "---------- Total: ^0055FF"+.@card_total+" pt.^000000 -------"; next; if(select(" > ^0055FFComplete trade...^000000: > ^777777Cancel^000000") == 2) { mes "[Card Trader]"; mes "Oh, okay..."; emotion e_hmm; close; } for(set .@i,0; .@i<getarraysize(.@card_id); set .@i,.@i+1) delitem .@card_id[.@i],.@card_amt[.@i]; setd .Points$, getd(.Points$)+.@card_total; mes "[Card Trader]"; mes "All done!"; emotion e_ho; close; OnBuyItem: for(set .@i,0; .@i<getarraysize(@bought_nameid); set .@i,.@i+1) for(set .@j,0; .@j<getarraysize(.Shop); set .@j,.@j+2) if (@bought_nameid[.@i] == .Shop[.@j]) { set .@cost, .@cost+(.Shop[.@j+1]*@bought_quantity[.@i]); break; } if (.@cost > getd(.Points$)) { mes "[Card Trader]"; mes "You don't have enough Points."; emotion e_omg; } else { mes "Items purchased:"; mes "-----------------------------------"; for(set .@i,0; .@i<getarraysize(@bought_nameid); set .@i,.@i+1) { getitem @bought_nameid[.@i], @bought_quantity[.@i]; mes " ^777777"+@bought_quantity[.@i]+"x "+getitemname(@bought_nameid[.@i])+"^000000"; } mes " "; mes "---------- Total: ^0055FF"+.@cost+" pt.^000000 -------"; setd .Points$, getd(.Points$)-.@cost; emotion e_cash; } deletearray @bought_nameid[0], getarraysize(@bought_nameid); deletearray @bought_quantity[0], getarraysize(@bought_quantity); close; OnInit: set .Level,0; // Minimum monster level to trade corresponding cards. set .Points$,"#Card_Points"; // Variable to store points. setarray .Shop[0], // Card Shop items: <ID>,<point cost> 616,4; setarray .Points[0],1,5; // Points per <normal card>,<MVP card> set .MVP$, // List of MVP cards. "4121,4123,4128,4131,4132,4134,4135,4137,4142,4143,4144,4145,4146,4147,4148,4168,4236,"+ "4241,4263,4276,4302,4305,4318,4324,4330,4342,4357,4359,4361,4363,4365,4399,4403,4407"; npcshopdelitem "card_shop",909; for(set .@i,0; .@i<getarraysize(.Shop); set .@i,.@i+2) npcshopadditem "card_shop",.Shop[.@i],.Shop[.@i+1]; end; } - shop card_shop -1,909:-1
  12. change OnMinute00: OnMinute60: to OnClock0000: OnClock0300: OnClock0600: OnClock0900: OnClock1200: OnClock1500: OnClock1800: OnClock2100:
  13. @Anime s2 where you can download Jro? can you get my the link?
  14. here caspen,132,233,6 script Name Changer 445,{ set .@Item,6153; // 1 x Special Exchange Ticket set .@Cost,10000000; // 10 Mio Zeny mes "Hello, I can change your name in a matter of seconds!"; mes "Please remember that a minimum of 4 characters is needed"; mes "and the maximum of 23 characters may not be exceeded."; mes "All I need is your ^FF0000"+getitemname(.@item)+"^000000 and a fee of ^FF0000"+.@Cost+"^000000z."; menu "I don't like my name anymore..",one,"Who cares?!",two; one: query_sql "SELECT `name` FROM `ragnarok`.`char` WHERE `name` = '"+strcharinfo(0)+"'",.@current$; set @GID,getcharid(2); if(!@GID==0){ mes "Please leave your guild first before you change name."; close; } mes "Input name..."; input .@name$; next; if (countitem(.@Item) && Zeny <.@Cost) { mes "Not enough requirements"; close; } else { if(getstrlen(.@name$)<4| getstrlen(.@name$)>23){ mes "You cannot enter less than minimum of 4 and greater than maximum of 23 characters."; close; } if(.@name$ == strcharinfo(0)) { mes "You cannot enter same name."; close; } query_sql "SELECT `name` FROM `ragnarok`.`char` WHERE `name` = '"+.@name$+"'",.@existing$; if(.@name$ == .@existing$){ mes "Name already exists."; close; } mes "New name: "+.@name$+""; query_sql "UPDATE `char` SET `name` = '"+escape_sql(.@name$)+"' WHERE `name` = '"+strcharinfo(0)+"'"; sleep2 1000; delitem .@Item,1; set Zeny,Zeny-.@Cost; mes "Name successfully changed, please relog to see changes."; close; two: emotion e_sob; end; } } Gruß Agito, Akito , AzathoRO
  15. was für ne Fehler Meldung spuckt der map server den aus ?
  16. i search a Guide for add New Effect to the Effect List,with new .str so that I can use in-game @effect 968 etc. z.b 968. New Effect 969. New Effect2 970. New Effect3 etc. I hope someone can help me
  17. i Seeking a Guide for make .str files, I hope someone can help me
  18. set .@aid4, getcharid(3); unitwalk .@aid4, .x+4, .y; make +4 fields to the right it is possible that the script detects objects? the player should instead run up against the wall.
  19. here prontera,147,175,5 script Settings 61,{ set @n$,"[^484848Settings^000000]"; set @reset$,"^000000"; set @disabled$,"^BE1C1C"; set @enabled$,"^0DB40D"; UserMenu: mes @n$; mes "You can change the way the game works here..."; mes "Note: These are all account based, not per-character."; mes "Note 2: You must relog for them to take effect."; next; if (#set_autoloot == 0) set @st_autoloot$,@disabled$+"Off"+@reset$; if (#set_autoloot > 0) set @st_autoloot$,@enabled$+#set_autoloot+"%"+@reset$; if (#set_showdelay == 0) set @st_showdelay$,@disabled$+"Off"+@reset$; if (#set_showdelay > 0) set @st_showdelay$,@enabled$+"On"+@reset$; if (#set_showexp == 0) set @st_showexp$,@disabled$+"Off"+@reset$; if (#set_showexp > 0) set @st_showexp$,@enabled$+"On"+@reset$; if (#set_showzeny == 0) set @st_showzeny$,@disabled$+"Off"+@reset$; if (#set_showzeny > 0) set @st_showzeny$,@enabled$+"On"+@reset$; if (#set_uptime == 0) set @st_uptime$,@disabled$+"Off"+@reset$; if (#set_uptime > 0) set @st_uptime$,@enabled$+"On"+@reset$; if (#set_rates == 0) set @st_rates$,@disabled$+"Off"+@reset$; if (#set_rates > 0) set @st_rates$,@enabled$+"On"+@reset$; menu "Auto Loot ["+@st_autoloot$+"]",e_autoloot,"Show Delay ["+@st_showdelay$+"]",e_showdelay,"Show Exp ["+@st_showexp$+"]",e_showexp,"Show Zeny ["+@st_showzeny$+"]",e_showzeny,"Uptime on login ["+@st_uptime$+"]",e_uptime,"Rates on login ["+@st_rates$+"]",e_rates; close; e_autoloot: mes @n$; mes "Auto Loot is currently "+@st_autoloot$; mes "Desc: Auto loot adds items to your inventory automatically."; next; menu "Toggle",-,"Back",UserMenu; mes @n$; mes "Auto Loot is currently "+@st_autoloot$; mes "Enter the minimum rate an item must drop at before it it looted, 100 will loot all items, 99 will only loot cards, 0 disables it."; next; input @rate; if ((@rate >= 0) && (@rate <= 100)) set #set_autoloot,@rate; goto UserMenu; e_showdelay: mes @n$; mes "Show Delay is currently "+@st_showdelay$; mes "Desc: When a skill fails because of delay, it will be hidden."; next; menu "Toggle",-,"Back",UserMenu; if (#set_showdelay == 0) { set #set_showdelay,1; goto UserMenu; } if (#set_showdelay == 1) { set #set_showdelay,0; goto UserMenu; } set #set_showdelay,1; mes "unknown error"; next; goto UserMenu; e_rates: mes @n$; mes "Rates on login is currently "+@st_rates$; mes "Desc: Displays the current server rates on login."; next; menu "Toggle",-,"Back",UserMenu; if (#set_rates == 0) { set #set_rates,1; goto UserMenu; } if (#set_rates == 1) { set #set_rates,0; goto UserMenu; } set #set_rates,1; mes "unknown error"; next; goto UserMenu; e_showexp: mes @n$; mes "Show Exp is currently "+@st_showexp$; mes "Desc: When you gain exp, it will be displaied."; next; menu "Toggle",-,"Back",UserMenu; if (#set_showexp == 0) { set #set_showexp,1; goto UserMenu; } if (#set_showexp == 1) { set #set_showexp,0; goto UserMenu; } set #set_showexp,1; mes "unknown error"; next; goto UserMenu; e_showzeny: mes @n$; mes "Show Zeny is currently "+@st_showzeny$; mes "Desc: When you gain zeny, it will be displaied."; next; menu "Toggle",-,"Back",UserMenu; if (#set_showzeny == 0) { set #set_showzeny,1; goto UserMenu; } if (#set_showzeny == 1) { set #set_showzeny,0; goto UserMenu; } set #set_showzeny,1; mes "unknown error"; next; goto UserMenu; e_uptime: mes @n$; mes "Uptime on login is currently "+@st_uptime$; mes "Desc: When you log in, server uptime will be displaied."; next; menu "Toggle",-,"Back",UserMenu; if (#set_uptime == 0) { set #set_uptime,1; goto UserMenu; } if (#set_uptime == 1) { set #set_uptime,0; goto UserMenu; } set #set_uptime,1; mes "unknown error"; next; goto UserMenu; close; OnPCLoginEvent: sleep2 1000; if (#set_autoloot > 0) atcommand "@autoloot " + #set_autoloot; if (#set_showdelay == 1) atcommand "@showdelay"; if (#set_showexp == 1) atcommand "@showexp"; if (#set_showzeny == 1) atcommand "@showzeny"; if (#set_rates == 1) atcommand "@rates"; if (#set_uptime == 1) atcommand "@uptime"; atcommand "@main on"; end; }
  20. I'm search the Guild Flag Sprite, Name: GUILD_FLAG ID:722 I have not found it
  21. add //GVG 264,4 //MO_BODYRELOCATION
  22. - script storage -1,{ OnInit: bindatcmd("storage",strnpcinfo(0)+"::OnStorage"); end; OnStorage: if( !getmapflag( strcharinfo(3),mf_town ) ) { message strcharinfo(0), "not autorized"; end; } openstorage; end; }
  23. This game guard isn't the best one. You can try Harmony or Internal guard. The creator of Gepard Game Guard is Functor. https://rathena.org/board/user/20454-functor/
  24. trunk/db/re/skill_nocast_db.txt
×
×
  • Create New...