Jump to content

Patskie

Members
  • Posts

    1702
  • Joined

  • Last visited

  • Days Won

    19

Everything posted by Patskie

  1. Wala sa haba ng scripts yan
  2. Patskie

    OnTouch

    Yea right hahaha
  3. Patskie

    OnTouch

    Hello, how do i make this free below Lv 99, when Lv 100 there should be pay if possible please add variable for the payments^^ Thank you. http://pastebin.com/raw.php?i=H55QtB20 try
  4. Pods -> Cashpoints = prontera,150,150,0 script Test 100,{ OnInit: // NPC Name .NPC$ = strnpcinfo(1); // Cashpoints amount to be received .Amount = 5; // Tickt for transaction (PODS TCG etc) .Ticket = 7227; end; mes .NPC$; mes "Hello " +strcharinfo(0)+ ". What can i do for you?"; next; if (select("Exchange my " +getitemname(.Ticket)+ " to cashpoints:Nothing" - 1) close; mes .NPC$: mes "How many " +getitemname(.Ticket)+ " would you like to exchange? 1 " +getitemname(.Ticket)+ " = " +.Amount+ " cash points"; next; input @amount; if (@amount == 0 ){ mes .NPC$; mes "Invalid amount"; close; } mes .NPC$; mes "So you want to exchange " +@amount+ " " +getitemname(.Ticket)+ "?"; next; if (select("Yes:No") - 1)close; mes .NPC$; mes "Let me check if you have the following requirements."; next; if (countitem(.Ticket) < @amount) { mes .NPC$; mes "Hello " +strcharinfo(0)+ " you do not have enough " +getitemname(.Ticket); close; } mes .NPC$; mes "Orayt here you go!"; delitem .Ticket,@amount; set #CASHPOINTS, #CASHPOINTS + (@amount * .Amount); dispbottom "Currently you have " +#CASHPOINTS+ " cash points. Thank you for the transaction"; end; }
  5. Tell whether what monster kill you?
  6. After ages of waiting! ~ Welcome back!
  7. No need to restart. I guess it will update once you log out then log in.
  8. how to script these
  9. https://rathena.svn.sourceforge.net/svnroot/rathena/trunk/db/re/item_db.txt // Items Database // // 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 }
  10. Hmm didn't work when I just try adding it, I will try restarting server. Post error if any occur. Well tried this and it works. Also want to add a check on the script. If amount is greater than pods then terminate. Forgot to add. if (countitem(.ID) > .@amount) close;
  11. Try: prontera,150,150,0 script Sample 100,{ mes .NPC$; mes "Can exchange your " +getitemname(.ID)+ " for kafra points. Want to exchange?"; next; if (select("Yes:No") - 1) close; mes .NPC$; mes "Okay how many " +getitemname(.ID)+ " will you exchange?"; next; input .@amount; if (.@amount == 0) { mes .NPC$; mes "Cannot trade 0 amount"; close; } mes .NPC$; mes "So you want to exchange " +.@amount+ "x " +getitemname(.ID); next; if (select("Yes:No") - 1) close; mes .NPC$; mes "Let me check if you have that amount of requirements"; next; if (countitem(.ID) < .@amount) { mes .NPC$; mes "Seems like you put an invalid amount"; close; } mes .NPC$; mes "Ohh that's nice here you go!"; delitem .ID,.@amount; set #KAFRAPOINTS,#KAFRAPOINTS+1; dispbottom "You now have " +#KAFRAPOINTS+ " kafra credit points"; next; mes .NPC$; mes "Success trading"; close; OnInit: set .NPC$,"[ " +strnpcinfo(1)+ " ]"; // NPC Name set .ID,7179; // Requirement end; }
  12. Kahit sino namang server owner isa sa mga goals nila is kumita via donate di na matatanggi yun. ) Goodluck
  13. Try this one http://rathena.org/board/files/file/2859-advanced-stylist/
  14. Patskie

    Who can

    Off topic.
  15. Try this, this script will warp you on prontera 150 150 when you bring an item id 14232 on map prontera : - script Checker -1,{ OnPCLoadMapEvent: if ( strcharinfo(3) == "prontera" && countitem(14232) ) { warp "prontera",150,150; } end; } prontera mapflag loadevent
  16. Patskie

    Who can

    Ya forgot to say you need to log out before this it took effect
  17. Explain what you are in need of
  18. Patskie

    Who can

    Check if there's an error. eAthena? Any error?
  19. Patskie

    Who can

    Yes
  20. http://www.eathena.ws/board/index.php?showtopic=264098&st=15&p=1496777entry1496777
  21. Patskie

    Who can

    Yeap tried and working.
  22. Patskie

    Who can

    Show your error Edited the previous post.
  23. Patskie

    Who can

    Try : prontera,150,150,0 script Delete 100,{ set .@GMLevel,99; set .@npc$,strnpcinfo(1); if (getgmlevel() < .@GMLevel) close; mes .@npc$; mes "Input the item id"; next; input .@id; next; if (getitemname(.@id) == "") { mes .@npc$; mes "Invalid id number"; close; } mes .@npc$; mes "So, you want to delete " +getitemname(.@id)+ "?"; next; if (select("- Yes:- No") - 1) close; mes .@npc$; mes "Processssinnggg..."; next; query_sql("DELETE FROM `auction` WHERE `nameid` = '" +.@id+ "'"); query_sql("DELETE FROM `cart_inventory` WHERE `nameid` = '" +.@id+ "'"); query_sql("DELETE FROM `guild_storage` WHERE `nameid` = '" +.@id+ "'"); query_sql("DELETE FROM `inventory` WHERE `nameid` = '" +.@id+ "'"); query_sql("DELETE FROM `mail` WHERE `nameid` = '" +.@id+ "'"); query_sql("DELETE FROM `storage` WHERE `nameid` = '" +.@id+ "'"); mes .@npc$; mes "Done!"; close; }
×
×
  • Create New...