Jump to content

luizinhomt

Members
  • Posts

    111
  • Joined

  • Last visited

Profile Information

  • Gender
    Male

Recent Profile Visitors

2601 profile views

luizinhomt's Achievements

Magmaring

Magmaring (7/15)

  • Collaborator
  • First Post
  • Reacting Well
  • Dedicated
  • Conversation Starter

Recent Badges

1

Reputation

  1. //===== 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> 4001,1,4004,1,4033,1,4196,1,4197,25,4054,50,4174,75,4047,100; 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 I get debug in this script when buying or selling can anyone help me [Debug]: npc_scriptcont: Card Trade (sd->npc_id=110012695) is not 'Unknown NPC' (id=0).
  2. when does this happen? Did you add a mod and then it started to appear?
  3. Could someone help me with the basis of a script where when a player is arrested the npc will open asking a question if he answers correctly he will get out of prison, if he doesn't answer within 1 minute the player will remain arrested and a log is sent to an administrator and whether it is possible to tell by the account ID whether he was arrested more than once thank you everyone
  4. Good afternoon everyone, could someone give me an example of a script where an NPC asks a guild for money to give access to other NPCs. Any member of the same clan can donate zeny to the NPC to increase the guild's investment level. example level 1 will ask the guild for 50kk after the donation reaches 50kk it will enable access to another npc that will appear on the map when you click on the npc again it will check that you have already passed level 1 and will enable investment in the level 2 who will ask for 100kk to release another npc, level 3 150kk. the npc resets every 30 days and the guild will have to reinvest to have access to the npcs again.
  5. Good morning everyone, could someone show an example of how to create a system to configure items to be used at once, setting another item to call the function. I configure which items can be used in the system, e.g.: concentration potion, wild fury, among others. When the player uses the @allitem command, I open a menu for him to choose which items he wants to activate and check his last configuration. Once configured, when he uses the item to call the function, he will use all the items he activated at once. remembering that to use, for example, the concentration potion, he will have to have the concentration potion in his inventory, it would be a shortcut system so as not to have to use one by one, he just configures what he wants to activate as long as it is available in the system and only uses 1 item to use them all at once. thanks in advance
  6. Good evening, when I try to run this script I get player error [Error]: buildin_strcharinfo: fatal error ! player not attached! [Debug]: Function: strcharinfo (1 parameter):
  7. Thank you very much I will test
  8. Good evening everyone, could someone show me an example of how to create two scripts where it will show the two players who died the most on the server, when clicking on the script, show the number of times they died and a menu to reset the NPC, thank you very much everyone
  9. giving more details about my problem even after updating with the commit I understood how the error was generated. the error is only generated when the character is within a guild and with the newest client above 032022 with client 2021 the error is not displayed I will try a way or if anyone knows a way to not activate the guild packet in client 2022 I I thank
  10. thank you all very much for the answers
×
×
  • Create New...