Jump to content

BFPkiller

Members
  • Posts

    111
  • Joined

  • Last visited

Everything posted by BFPkiller

  1. What Sirique says is true, might have not explained it properly. Hope anyone can help us with this. Thanks in advance.
  2. BFPkiller

    Master login

    Hello all I have searched for this here but havent found a solution to it. And i hope im on the right forum as well. Is it possible to have more accounts with 1 email adress ? Thanks in advance.
  3. Hi all I have managed what i wanted to do. Also i'll share what i have done. The hats i wanted, i created seperately Then i made a box for each hat, wich would use the "rentitem" instead of the "getitem". This would give the hats with its effects and a expiration time. Thanks for all the help!
  4. We dont have a npc that gives the item. Its a item we give as reward. Anything possible on that ?
  5. Thanks for your reply. Do i add that in the item script ?
  6. Hi all ! Im trying to make a item wich has effect, that expire after 5 days ( the effect need to expire after 5 days ) this is my item code { bonus bAllStats, 3; bonus bHPGainValue,100; bonus bSPGainValue,100; },{},{} (All Stats +3, HP/SP +100, effects expire 5 days after opening the package) Can anyone help me out on this ? Thanks in advance
  7. Many thanks on this ! Is it possible to add a checkweight as well ? Thanks again!
  8. Hi there! I'd like to ask some help regarding a script that i use. It's the Wheel of Fortune script and i'd like to add a limit per use per ip, once a day. Can someone help me out on that ? Much appreciated! - script Wheel_of_Fortune FAKE_NPC ,{ OnInit: disablenpc("Wheel of Fortune#Main"); // disablenpc("Hussein#WOF"); .Eventname$ = "[Wheel Of Fortune]"; end; OnClock1500: OnClock1630: OnClock1900: OnClock2200: OnStart: .Start = true; announce(sprintf("%s : The event will begin in 1 minute, in the Secret Gambling Room.", .Eventname$), bc_blue | bc_all); initnpctimer(); end; OnTimer60000: // 1 min enablenpc("Wheel of Fortune#Main"); // enablenpc("Hussein#WOF"); announce(sprintf("%s : Come to Secret Gambling Room and test your luck", .Eventname$), bc_blue | bc_all); end; OnTimer1800000: // 30 mins announce(sprintf("%s : One more minute, do your last spin!", .Eventname$), bc_blue | bc_all); end; OnTimer1860000: // 31 mins OnEndEvent: .Start = false; announce(sprintf("%s : The event is now over.", .Eventname$), bc_blue | bc_all); stopnpctimer(); disablenpc("Wheel of Fortune#Main"); // disablenpc("Hussein#WOF"); end; OnCommand: if (.@atcmd_numparameters != 1) { dispbottom(sprintf("Usage: %s <start/end>", .@atcmd_command$), 0x00FF00); dispbottom(sprintf("%s failed.", .@atcmd_command$), 0x00FF00); end; } if (.@atcmd_parameters$[0] == "start") { if (!.Start) donpcevent(sprintf("%s::OnStart", strnpcinfo(NPC_NAME))); else { dispbottom("The Wheel of Fortune has already started.", 0x00FF00); dispbottom(sprintf("%s failed.", .@atcmd_command$), 0x00FF00); } } else if (.@atcmd_parameters$[0] == "end") { if (.Start) donpcevent(sprintf("%s::OnEndEvent", strnpcinfo(NPC_NAME))); else { dispbottom("The Wheel of Fortune is not active.", 0x00FF00); dispbottom(sprintf("%s failed.", .@atcmd_command$), 0x00FF00); } } else { dispbottom(sprintf("Usage: %s <start/end>", .@atcmd_command$), 0x00FF00); dispbottom(sprintf("%s failed.", .@atcmd_command$), 0x00FF00); } end; } vip_lounge,145,60,3 script Wheel of Fortune#Main 2_SLOT_MACHINE,{ OnTalk: if (Zeny < .Zeny_Cost && #freewheelfortunespin < 0) { mes(.Eventname$); mes("You are out of Zeny"); mes("and have no more"); mes("free spins. Come back"); mes("next time for more!"); close(); } .@mes$ = (#freewheelfortunespin > 0) ? sprintf(", but you, my friend, have %d free spin%s!", #freewheelfortunespin, (#freewheelfortunespin == 1) ? "" : "s") : "."; cutin("aca_salim02", 2); addtimer(1, sprintf("%s::OnEndEvent", strnpcinfo(NPC_NAME))); mes(.Eventname$); mes("Do you want to spin the wheel?"); mes(sprintf("It costs ^FF0000%d Zeny^000000 to play%s", .Zeny_Cost, .@mes$)); next(); while (true) { if (Zeny < .Zeny_Cost && #freewheelfortunespin < 0) callsub(S_End); switch (select( (#freewheelfortunespin > 0) ? sprintf("Yes! Use free spin! (%d left)", #freewheelfortunespin) : "", (Zeny >= .Zeny_Cost ) ? sprintf("Yes! Use Zeny. (costs %dz)", .Zeny_Cost) : "", "No (Leave)" )) { // pay with free spin case 1: if (#freewheelfortunespin > 0) { if ((#freewheelfortunespin -= 1) < 0) #freewheelfortunespin = 0; callsub(S_Spin); } else callsub(S_End); break; // Pay with zeny case 2: if (Zeny >= .Zeny_Cost) { Zeny -= .Zeny_Cost; callsub(S_Spin); } else { cutin("aca_salim02", 2); mes(.Eventname$); mes("Awww, you don't have enough to gamble..."); mes(" "); mes("Have you ever heard?"); mes("'Money isn't all that matters' Got it?"); mes("Byeeeeeeeeeeeeee ;)"); callsub(S_End); } break; default: callsub(S_End); } } // Wheel spin animation S_Spin: .@Sector = rand(.Sector_Range[0], .Sector_Range[1]); .@Display = .@Sector * 2 - 1; .@Speed = .Spin_Speed; for (.@i = 0; .@i < .nbTurns; .@i++) { .@b = .Cutin_Range[0]; while (.@b <= .Cutin_Range[1]) { cutin(sprintf("%s%d", .Cutin$, .@b), 4); sleep2(.@Speed); .@b++; .@Speed += 1; // not ++, because you may want to adjust the stopping +1 +2 +3 } } .@b = .Cutin_Range[0]; while (.@b < .@Display) { cutin(sprintf("%s%d", .Cutin$, .@b), 4); sleep2(.@Speed); .@b++; } cutin(sprintf("%s%d", .Cutin$, .@b), 4); if (.Prize_ID[.@Sector] == -1) { // Free spin if (.Sound_Effects) soundeffect("wheel_jackpot.wav", 0); announce(sprintf("[%s] : Wow, %dx more Free spins!!!", .Eventname$, .Prize_Qty[.@Sector]), bc_blue | bc_self); #freewheelfortunespin = #freewheelfortunespin == 0 ? .Prize_Qty[.@Sector] : #freewheelfortunespin + .Prize_Qty[.@Sector]; } else if (.Prize_ID[.@Sector] == 0) { // Nothing if (.Sound_Effects) soundeffect("wheel_lost.wav", 0); announce(sprintf("[%s] : Awwww, no luck in your gamble, more luck in love...", .Eventname$), bc_blue | bc_self); } else { // Item if (.Sound_Effects) soundeffect("wheel_won.wav", 0); announce(sprintf("[%s] : %dx %s - enjoy your prize!", .Eventname$, .Prize_Qty[.@Sector], getitemname(.Prize_ID[.@Sector])), bc_blue | bc_self); getitem(.Prize_ID[.@Sector], .Prize_Qty[.@Sector]); } sleep2(1000); if (Zeny < .Zeny_Cost && #freewheelfortunespin < 0) { mes(.Eventname$); mes("You are out of Zeny"); mes("and have no more"); mes("free spins. Come back"); mes("next time for more!"); close(); } return; S_End: close2(); OnEndEvent: cutin("", 255); end; OnInit: .Eventname$ = "Wheel Of Fortune"; bindatcmd("wof", "Wheel_of_Fortune::OnCommand", 99, false); .Spin_Speed = 50; // What is the base spin speed? (ms) .nbTurns = 2; // How many times the arrow makes a complete turn, before entering the stopping routine .Zeny_Cost = 100000; // How much zeny does it cost for a spin? .Sound_Effects = true; // Enable sound effects? (true/false) // You must have a total of 10 prizes. DO NOT remove 0 or -1 from the array and do not // change their order. setarray(.Prize_ID[1], -1, 6046, 13277, 12187, 617, 607, 603, 604, 0, 23093); setarray(.Prize_Qty[1], 2, 1, 1, 1, 3, 3, 3, 3, 0, 1); // Don't touch below .Cutin$ = "WheelOfFortune_"; setarray(.Sector_Range, 1, 10); // Sector range setarray(.Cutin_Range, 0, 19); // Cutin range end; }
  9. Wow Thanks !! Works like a charm!! Thank you very much !
  10. Thanks for your reply ! I tested it... after : mes "Can you give me one " + getitemname(12128) +"?"; and you click next, it goes right to the shop , and i dont have the cooking set ... hope you can fix this
  11. Hello everyone! i would like to request a npc if i may. the npc sells the following food and will only do so once you brought him the required item. Hope you guys can help me out. Thanks in advance ! *Street Food Vendor (All Food Is 20k Each): *He will only sell to you once you bring him 1x Royal Cooking Set (ID: 12128) Bomber Steak (ID: 12043) Tentacle Cheese Gratin (ID: 12058) Clam Soup (ID: 12053) Honey Herbal Tea (ID: 12048) Fruit Mix (ID: 12063) Fried Sweet Potato (ID: 12068) ( Only have to bring him the cooking set 1x then you can always buy from him )
  12. Thanks for your reply ! and how would i do that ? EDIT I got it { if( strcharinfo(3) != "darkmall" ) { mes "This item can only be used in the Black Market."; close; } else { buyingstore 2; delitem 12548,1; } }
  13. Thanks !! this works flawless , can it also be scripted it doesnt consume the item when used on other maps then darkmall ?? Thanks in advance !
  14. Hello everyone. I have a question for you. Is it posible to make a item displaying a message when it's not used on it's pre-defined map ? I use this item and it may only be used on a specific map only like the code below. So what i mean is, it should display a message like "This item can only be used in DarkMall." , when people use it in prontera for example. Thanks in advance ! { if( strcharinfo(3) != "darkmall" ) buyingstore 2; },{},{}
  15. You saved me !! thank you allot !!
  16. Can you tell us how to make it work ? we got this error to begin with
  17. hello all i just download this and tried it, but it gave me some errors. i did my best but somewhere im failing. I hope someone can help me out [Error]: Loading NPC file: npc/afriel/black_market/vendingMachine.txt script error on npc/afriel/black_market/vendingMachine.txt line 32 parse_line: expected ';' 27 : { 28 : .@coin = getarg(0); 29 : if(.@coin==673) .@tmp$ = "BROWN"; 30 : else if(.@coin==677) .@tmp$ = "SILVER"; 31 : else if(.@coin==674) .@tmp$ = "MITHRIL"; * 32 : return CStr'('getitemname(.@coin)+" ["+CZeny(getiteminfo(.@coin,0))+"]",.@tmp$); 33 : } 34 : 35 : Function script EjectCoin { // EjectCoin({<coin left>,<coin type>}) 36 : .@coinleft = getarg(0,@coinamt); 37 : .@var$ = getarg(1,".coin"); [Error]: script error on npc/afriel/black_market/vendingMachine.txt line 55 parse_line: expected ';' 50 : soundeffect "slot_jackpot.wav",1; 51 : } 52 : } 53 : .@coinleft = .@coinleft-(.@bal*.@price); 54 : getitem .@coin,.@bal; * 55 : mes .@bal+" x "+CCoin'('.@coin); 56 : } 57 : } 58 : @coinamt = 0; 59 : next; 60 : return; [Error]: script error on npc/afriel/black_market/vendingMachine.txt line 69 parse_line: expected ';' 64 : .@var$ = getarg(0,".coin"); 65 : .@size = getarraysize(getvariableofnpc(getd(.@var$),strnpcinfo(3))); 66 : mes "Usable Coin:"; 67 : for(.@i=0;.@i<.@size;.@i++){ 68 : // show usable coin * 69 : mes " ~ "+CCoin'('getvariableofnpc(getd(.@var$+"["+.@i+"]"),strnpcinfo(3))); 70 : } 71 : return; 72 : } 73 : 74 : Function script HaveCoin { [Error]: script error on npc/afriel/black_market/vendingMachine.txt line 82 parse_subexpr: expected ':' 77 : .@max = getarg(2,0); 78 : .@str$ = getarg(3,"Insert"); 79 : .@size = getarraysize(getvariableofnpc(getd(.@var$),strnpcinfo(3))); 80 : for(.@i=0;.@i<.@size;.@i++){ 81 : .@coin = getvariableofnpc(getd(.@var$+"["+.@i+"]"),strnpcinfo(3)); * 82 : set .@menustr$,.@menustr$ + (countitem(.@coin) && (.@max?(.@max-@coinamt)/getiteminfo(.@coin,0):1)?" >> "+.@str$+" "+CCoin'('.@coin)+" << ("+CStr(countitem(.@coin),"RED")+"):":":"); 83 : } 84 : if(.@eject) set .@menustr$,.@menustr$+(@coinamt?CStr(" << Eject Coin >>","RED")+":":":"); 85 : return .@menustr$; 86 : } 87 : [Error]: script error on npc/afriel/black_market/vendingMachine.txt line 97 parse_line: expect command, missing function name or calling undeclared function 92 : unitwalk getcharid(3),.@x_n-2,.@y_n; 93 : end; 94 : OnTouch: 95 : @coinamt = 0; 96 : mes "Play Coin Roulette?"; * 97 : 'U'sableCoin(); 98 : next; 99 : select("Play","No"); 100 : while( @menu == 1 ){ 101 : do{ 102 : mes "Bet: << "+CStr(CZeny(@coinamt),"RED")+" >>","Max Bet << "+CZeny(.max_bet)+" >>","=========================", [Error]: script error on npc/afriel/black_market/vendingMachine.txt line 244 parse_line: expect command, missing function name or calling undeclared function 239 : end; 240 : OnTouch: 241 : function PriceList;function CMenu;function choose;function RES_TYPE; 242 : if(!getcharid(0)) end; 243 : mes "A "+.npcname$; * 244 : 'U'sableCoin(); 245 : next; 246 : do{ 247 : PriceList(); 248 : next; 249 : select(CMenu()); [Error]: npc_parsesrcfile: Unknown syntax in file 'npc/afriel/black_market/slotmachine.txt', line '3'. Stopping... * w1=} * w2= * w3= * w4=
  18. Hello I would like to request a script that limits the cards used in WoE. E.g Per char limit the active mvp cards to 1, but let it be 1 mvp card of choice. Is this possible ? Thanks
  19. Sorry to bump this, but is it possible to limit the cards used to 1 during WoE , GVG etc ??? Or maybe per castle limit it to 1 active card per char ? Greets Can i request this , that a player can only have one card active in woe , gvg etc ?
  20. Hello , sorry to bumb this , but is it possible to get the Hats based on chance ? lets say a group of 1% chance, a group of 10% and a group of 15% chance ? Thanks in advance
  21. Thanks for your help ! Do you have an example script , where all players combined (server wide ) can all turn in items at the same npc for 1 reward ,wich would be for example set double xp , like a joined quest
  22. Hello I was looking for an npc like described below or did something similar, but coulnd find any, and correct me if im wrong. This is what the npc supposed to do NPC requires Pineapples to turn into points ( need npc to spend the points on, i can add items in it myself ) Pineapples can be turned in all week. Top 3 collectors receive a bonus reward of (Zeny, Poring Coins, Bubble Gum, Field Manual, or??) Pineapple (6265) can someone help me with this ? Big thanks in advance !
  23. hello , i might be late on this but i added the script , works fine and all but does it remove the flags when the time is over ?
  24. Thanks Both of you ! Little stupid i didnt see it myself :S Again Big Thanks !! HI i found a bug still it gives the reward also when lvl 87/50 , supposed to be 99/50. payo2,65,154,5 script Race to 99 Reward NPC 99,{ .@MaxBLevel = 99; //Set your servers max base level here. .@MaxJLevel = 50; //Set your servers max job level here. setarray .@item, // set rewards 6046, 3, // <ID>, <AMT> 7539, 25, 23025, 1, 23034, 1; if ( LReward ) { // checks if you already get the reward. mes "No more rewards."; close; } if(BaseLevel < .@MaxBLevel && JobLevel < .@MaxJLevel ) { mes "You don't have the required level yet."; mes "Come back when you reached it - Base Level "+.@MaxBLevel+" - Job Level "+.@MaxJLevel+"!"; close; } mes "Congratulations, you've reached the maximum level in the server!!, here's your reward!"; close2; LReward = true; // sets LReward to true which means you already get your item. for(.@i=0;.@i<getarraysize(.@item);.@i+=2) getitem .@item[.@i], .@item[.@i+1]; end; } hope you can help
  25. Thanks for the help, but the script gives it to players below 99/50 as well.
×
×
  • Create New...