Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 04/24/23 in all areas

  1. you should check sql-files. there are web.sql for this https://github.com/rathena/rathena/blob/master/sql-files/web.sql
    1 point
  2. Try this : prontera,164,203,6 script Hourly Shop#1 758,{ callfunc "qshop",3,4,5; end; OnInit: while(1){ showscript "Hourly Shop NPC"; sleep 3000; } }
    1 point
  3. Version 1.0.0

    186 downloads

    A fully edited Halloween themed map. I hope you enjoy it.
    Free
    1 point
  4. I have been ripping sprites from other games and transforming into ragnarok items. What you guys think? OBS¹: My sprites/effects/images will never have the same style because i get it from a lot of sources. OBS²: Please don't ask for raw images/sprites, and i'll not teach how to get it.
    1 point
  5. prontera,165,99,4 script Rentals Shop 582,{ callshop "rental_shop", 1; npcshopattach "rental_shop"; end; OnBuyItem: dispbottom "Rentals Shop: You can only buy one item at once."; setarray .@q[0], @bought_nameid[0], @bought_quantity[0]; for (.@i = 0; .@i < getarraysize(.items_list); .@i++) { if (.@q[0] == .items_list[.@i]) { .@q[2] = .price_list[.@i]; } } mes .@npc_name$ = "[Rentals Shop]"; mes "Rental Item: "+getitemname(.@q[0]); mes "Rental Cost: "+.@q[2]+"x "+getitemname(.currency)+" for one day."; mes " "; mes "How many days do you want to rent it ?"; next; if (input(.@day, 1, 365)) { mes .@npc_name$; mes "Invalid input days.."; callsub ClearBought; close; } .@q[3] = .@day * .@q[2]; mes .@npc_name$; mes "Rental Item: "+getitemname(.@q[0]); mes "Rental Cost: "+.@q[3]+"x "+getitemname(.currency)+" for "+.@day+" day"+((.@day > 1) ? "s" : "")+"."; mes " "; mes "Still want to make the rent ?"; next; if (select("Yes:No") == 2) { mes .@npc_name$; mes "All right, "+callfunc("F_Bye"); callsub ClearBought; close; } if (countitem(.currency) < .@q[3]) { mes .@npc_name$; mes "I'm sorry, you haven't enought "+getitemname(.currency)+" to pay the rental"; callsub ClearBought; close; } if (!checkweight(.@q[0], .@q[1])) { mes .@npc_name$; mes "You need more space in your inventory."; callsub ClearBought; close; } delitem .currency, .@q[3]; // delete items rentitem .@q[0], .@day * 86400; // rent an items. 86400 = 1 day in seconds callsub ClearBought; end; ClearBought: deletearray @bought_quantity, getarraysize(@bought_quantity); deletearray @bought_nameid, getarraysize(@bought_nameid); return; OnInit: // Configuration setarray .items_list, 1201, 1201, 1201; // items list that you want to sell. setarray .price_list, 100, 200, 300; // itens price that item you sell in the shop. .currency = 7179; // items that will be used as exchange currency // do not touch from here!! npcshopdelitem "rental_shop", 501; for (.@i = 0; .@i < getarraysize(.items_list); .@i++) npcshopadditem "rental_shop", .items_list[.@i], .price_list[.@i]; end; } Saw the code here: https://board.herc.ws/topic/2277-rental-npc-with-payment/ But I format it, so you can just copy and paste it.
    1 point
  6. I use this, it is much simpler. prontera,190,213,3 script Plagearism Master 4_M_TWMASKMAN,{ mes "[ ^FF0000Fu^000000 ]"; mes "I have the ability of many Jobs, I am a Master!"; mes "What Skill do you need to copy?"; set .@SkillID,select( implode( .SkillName$,":" ) ) - 1; mes "Selected "+.Skillname$[.@SkillID]; close2; unitskilluseid getnpcid(0),.SkillID[.@SkillID],10,getcharid(3); end; OnInit: setarray .SkillID[0],14,19,20,90,84,89,535,537,540,62,379; setarray .SkillName$[0],"Cold Bolt","Fire Bolt","Lightning Bolt","Earth Spike","Jupitel Thunder","Storm Gust","Crimson Fire Formation","Lightning Spear of Ice","Wind Blade","Bowling Bash","Soul Breaker"; end; }
    1 point
  7. Not sure if it's the most recent version. ROMAPCONV.part1.rar ROMAPCONV.part2.rar
    1 point
×
×
  • Create New...