Jump to content

Emistry

Forum Moderator
  • Posts

    10013
  • Joined

  • Days Won

    396

Everything posted by Emistry

  1. Oh....much more organized..and easier to differentiate which is RE / Pre-Re
  2. perhaps something other went wrong....coz...i think he problems is from your atcommand there.... perhaps you have edited something at your atcommand file....
  3. setarray .TCG_ITEMS[0],20001; // Item IDs - 128 max setarray .ITEMPRICE[0],30; // Item prices - Should followe ID's order
  4. instead of using this it is advised to use this.... set #CASHPOINTS,#CASHPOINTS + 500; * AtCommand is Evil ! xD
  5. Find this change to this switch( rand(6) ){ Case 0: sc_start SC_STRFOOD,30000,10; disguise 1751; break; // STR Case 1: sc_start SC_AGIFOOD,30000,10; disguise 1002; break; // AGI Case 2: sc_start SC_INTFOOD,30000,10; disguise 1003; break; // INT Case 3: sc_start SC_VITFOOD,30000,10; disguise 1021; break; // VIT Case 4: sc_start SC_DEXFOOD,30000,10; disguise 1753; break; // DEX Case 5: sc_start SC_LUKFOOD,30000,10; disguise 1345; break; // LUK }
  6. try this prontera,155,181,5 script Sample 757,{ if( getgmlevel() < 80 ){ mes "I only serve GM Staffs"; }else{ mes "Input the Player Name "; mes "Player must ^FF0000ONLINE^000000"; mes "Type ^FF0000CANCEL^000000 to cancel."; input .@Name$; if( compare( .@Name$,"cancel" ) || !isloggedin( getcharid( 3,.@Name$ ) ) ) close; next; mes "What item to be Given ?"; do{ input .@ItemID,501,32767; if( getitemname( .@ItemID ) == "" ) mes "Invalid Item ID"; }while( getitemname( .@ItemID ) == "" ); mes "Input the Amount of "+getitemname( .@ItemID )+" to be given."; mes "Min. 1 ~ Max. 10"; input .@Amount,1,10; mes "If it is Equip...how much it should be Refined ?"; input .@Refine,0,10; next; mes "Receiver : ^0000FF"+.@Name$+"^000000"; mes "Item : ^FF0000"+getitemname( .@ItemID )+"^000000"; mes "Amount : ^FF0000"+.@Amount+"^000000"; mes "Refine : ^FF0000"+.@Refine+"^000000"; if( select("Confirm:Cancel") == 1 ){ announce "[ "+.@Name$+" ] gained "+.@Amount+" x "+getitemname( .@ItemID )+" from GM.",0; message .@Name$,"You have gained "+.@Amount+" x "+getitemname( .@ItemID )+" from GM."; getitem2 .@ItemID,.@Amount,1,.@Refine,0,0,0,0,0,getcharid( 3,.@Name$ ); } } close; }
  7. try this Function Script : function script Sample { if( @BuffTimer < gettimetick(2)) { set @BuffTimer,gettimetick(2) + 60; disguise 1751; switch( rand(6) ){ Case 0: sc_start SC_STRFOOD,30000,10; break; Case 1: sc_start SC_AGIFOOD,30000,10; break; Case 2: sc_start SC_INTFOOD,30000,10; break; Case 3: sc_start SC_VITFOOD,30000,10; break; Case 4: sc_start SC_DEXFOOD,30000,10; break; Case 5: sc_start SC_LUKFOOD,30000,10; break; } sleep2 30000; undisguise; dispbottom "Buff has Finished for 30 Seconds. Delay of Extra 30 Seconds will be applied."; }else{ dispbottom "Delay : "+( @BuffTimer - gettimetick(2) )+" Seconds."; } end; } Item Database Script : Add this callfunc("Sample"); Example : 501,Red_Potion,Red Potion,0,50,,70,,,,,0xFFFFFFFF,7,2,,,,,,{ callfunc("Sample"); },{},{}
  8. try this prontera,155,181,5 script Sample 757,{ mes "Which Armor you want to Enchant ?"; mes "Make sure there is no Card / Rune in it."; next; setarray .EquipID[0],2301,2302,2303,2304,2305,2306,2307,2308,2309,2310; for( set .@i,0; .@i < getarraysize( .EquipID ); set .@i,.@i + 1 ){ set .@EquipMenu$,.@EquipMenu$ + getitemname( .EquipID[.@i] )+( !getitemslots(.EquipID[.@i])?"":"["+getitemslots(.EquipID[.@i])+"]" )+":"; } set .@Equip,select( .@EquipMenu$ ) - 1; if( !countitem( .EquipID[.@Equip] ) ){ mes "You didnt have this Equipment with you."; close; } mes "Equipment : ^FF0000"+getitemname( .EquipID[.@Equip] )+"^000000"; switch( select( "Strength:Intelligent:Dexterity:Agility:Vitality:Luck" )){ Case 1: setarray .RuneID[0],4700,4701,4702,4703,4704,4705,4706,4707,4708,4709; break; Case 2: setarray .RuneID[0],4710,4711,4712,4713,4714,4715,4716,4717,4718,4719; break; Case 3: setarray .RuneID[0],4720,4721,4722,4723,4724,4725,4726,4727,4728,4729; break; Case 4: setarray .RuneID[0],4730,4731,4732,4733,4734,4735,4736,4737,4738,4739; break; Case 5: setarray .RuneID[0],4740,4741,4742,4743,4744,4745,4746,4747,4748,4749; break; Case 6: setarray .RuneID[0],4750,4751,4752,4753,4754,4755,4756,4757,4758,4759; break; } for( set .@i,0; .@i < getarraysize( .RuneID ); set .@i,.@i + 1 ){ set .@RuneMenu$,.@RuneMenu$ + getitemname( .RuneID[.@i] )+":"; } set .@Rune,select( .@RuneMenu$ ) - 1; mes "Rune : ^FF0000"+getitemname( .RuneID[.@Rune] )+"^000000"; next; if( select("Confirm:Cancel") == 1 ){ delitem .EquipID[.@Equip],1; getitem2 .EquipID[.@Equip],1,1,0,0,0,0,0,.RuneID[.@Rune]; mes "Done."; mes "^0000FF"+getitemname( .EquipID[.@Equip] )+"^000000"; mes "Enchanted with ^FF0000"+getitemname( .RuneID[.@Rune] )+"^000000"; } close; } Edit the Equipment ID here setarray .EquipID[0],2301,2302,2303,2304,2305,2306,2307,2308,2309,2310;
  9. Well...i just remember there is a Message Board NPC in the NPC Folder npc/custom/eAAC_Scripts/messageboards.txt
  10. Actually...the Image is not broken..just you need to click the image by view it in a new tab or what ~
  11. Aw....i have a better 1 here.... leave that.... Change the Function into this one... function script Sample { if( isequippedcnt( 4357,4359,4361,4363,4365,4367 ) > 2 ){ message strcharinfo(0),"Cant Wear More than 2 LHZ Card."; nude; } return; }
  12. There should be an Error Message in Map Server.....check it....and post here if you donno how solve
  13. Structure of Database: ID,AegisName,Name,Type,Buy,Sell,Weight,ATK,DEF,Range,Slots,Job,Upper,Gender,Loc,wLV,eLV,Refineable,View,{ Script },{ OnEquip_Script },{ OnUnequip_Script } 4357,B_Seyren_Card,Lord Knight Card,6,20,,10,,,,,,,,769,,,,,{ skill "LK_BERSERK",1; },{ callfunc "Sample"; },{}
  14. refer this ?? /conf/log_athena.conf
  15. this ??? Original Post : Link [ Update ] : Added a Farm Zone Script : Description : A map which allow users to hunt items inside it. But it have some restriction as well ... Time Limit Users Limit Item Hunting Limit etc.. Check out the "Function" part for items configuration. and there is 2 Type of Item Lists ( You can set how many to get randomly ) Normal Monster Drops List Boss Monster Drops List Farm Zone [ Version 2 ] Changelog : Scripts : View ♥ Download In order to make it PVP able... add this mapname mapflag pvp
  16. ? I though i already ask you to edit npc/guild/agit_template.txt
  17. not sure will this work exactly like what you want or not... function script Sample { if( isequippedcnt( 4357,4359,4361,4363,4365,4367 ) > 2 ){ message strcharinfo(0),"Cant Wear More than 2 LHZ Card."; nude; } return; } Add this in your OnEquip there.. callfunc( "Sample" ); Re-Edit : Simple and Working Function
  18. What is the error? Removing one line carelessly can completely mess up how a script works. Nevermind..it is fixed by himself... i was accidently added an extra line... you didnt found it coz i edited my posts right after he post the problems...
×
×
  • Create New...