Jump to content

max65

Members
  • Posts

    120
  • Joined

  • Last visited

Everything posted by max65

  1. Hi , can you tell me how solved that plz? thx for your repply
  2. nobody can solved this npc and post here? i think many people wants that ^^ Lucky spin.rar
  3. i will try thx for you repply ^^ i have remplace close2 ==> close3 but have a same problem's =s
  4. hi all ^^, I have a small problem, this NPC works, but when the event is over, it does not close ". Bmp" and the window of the npc. can you help me plz. //===== Hercules Script ====================================== //= Wheel of Fortune //===== By =================================================== //= Habilis //= Edited by Myriad //===== Version ============================================== //= 1.02 - June 15, 2018 // - Made the script work with zeny, to be more accesibly to everyone. //= 1.01 - June 14, 2018 // - Added @wheel_of_fortune GM command (level 98+). // - Merged S_Pay and S_Loop subs into main line of text. // - S_Gamble is now S_Spin and it will 'return' instead of // calling back to the initial sub. //= 1.00 - June 13, 2018 // - Initial script edit for Habilis. //===== Description ========================================== //= Wheel of fortune something. //============================================================ - script Wheel_of_Fortune FAKE_NPC ,{ OnInit: disablenpc("Wheel of Fortune#Main"); .EventName$ = "[Wheel Of Fortune]"; end; OnClock0900: OnClock1600: OnClock2200: OnStart: .Start = true; announce(sprintf("%s : The event will begin in 1 minute, near the center of Prontera.", .EventName$), bc_blue | bc_all); initnpctimer(); end; OnTimer60000: // 1 min enablenpc("Wheel of Fortune#Main"); announce(sprintf("%s : Come to Prontera and test your luck", .EventName$), bc_yellow | bc_all); end; OnTimer60500: // 1 mins announce(sprintf("%s : One minute, do your last spin!", .EventName$), bc_yellow | bc_all); end; OnTimer120000: // 2 mins OnStop: .Start = false; stopnpctimer(); disablenpc("Wheel of Fortune#Main"); 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::OnEnd", 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; } prontera,164,169,1 script Wheel of Fortune#Main 2_SLOT_MACHINE,{ OnTalk: if (Zeny < .Zeny_Cost && #freewheelfortunespin < 0) { mes("[^0055FFLucky Spin^000000]", .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") : "."; addtimer(1, sprintf("%s::OnEnd", strnpcinfo(NPC_NAME))); mes("[^0055FFLucky Spin^000000]", .EventName$); mes("Do you want to spin the wheel?"); mes("It costs ^FF000050.000 Zeny^000000 to play", .@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("[^0055FFLucky Spin^000000]", .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("[^0055FFLucky Spin^000000]", .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(); OnEnd: cutin("", 255); end; OnInit: .EventName$ = "Wheel Of Fortune"; bindatcmd("wheel_of_fortune", "Wheel_of_Fortune::OnCommand", 98,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 = 50000; // 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, 7539, 14345, 7539, 617, 607, 7539, 604, 0, 12214); setarray(.Prize_Qty[1], 2, 3, 1, 1, 3, 3, 1, 3, 0, 1); // Don't touch below .Cutin$ = "WheelOfFortune_"; setarray(.Sector_Range, 1, 10); // Sector range setarray(.Cutin_Range, 0, 19); // Cutin range end; } thx for your reply
  5. thx ? i will try not working =s have a same problem
  6. hi, have a problems with this script have a problem with this function , she doesn't works can you help plz? Thx for your repply ^^
  7. hi, hhmm hmmm im noob with scripting npc and english =o! XD Can you give me a npc script "Kafra" With: Restock system, Storage, GuildStorage with password, Save and Rent peco,falcon,cart . Thx for your repply. and good night =p 4:55 in france =D
  8. Hi, can you tell me how solved that plz? thx for your repply ^^
  9. Hi, i need your help for, this script: my mapserv.bat tell me ( How i can solved that plz? ^^
  10. Hi, can you help me for that ? How can increase date? for choise 1987,1986,1985, ect... thx for your reply ^^
  11. max65

    Url FluxCp help

    i have try with your link but it doesn't work =s Thx for your reply bump plz =s 2 day on that and ..... that doesn't work i need really your help
  12. can you show me how point plz? maybe with screnn ?

    1. Show previous comments  2 more
    2. max65

      max65

      wait 2 sec i screnn for show you

    3. Chaos92

      Chaos92

      no, its on the link.

    4. max65

      max65

      ok ok thx for link ^^ byby

  13. max65

    Url FluxCp help

    How point that? i have buy on GOdaddy my Domaine Name but after i dont know how point on Vultr...
  14. max65

    Url FluxCp help

    Hi Rathena =p, Maybe its a nobrain question but , i don't have find my answer in forum =s how change Url for other people can look my Site? i Used VPs with Windows Serveur 2012 and Openserver. Ty for your reply ^^
  15. max65

    help flux cp

    Solved.... have no brain ^^ , have just changer Ip for database and i dont see that... sorry for this post
  16. max65

    help flux cp

    hi, have change ServerAddress on 'application.php'' after my cpflux works perfectly but now have that have try to réinstall folder doesn't work, have try to réinstall database on phpmyadmin not works to...and have try to réinstall OpenServer not works.. and when i go on logs=>error have that I do not know what to do, help me please.
  17. So with other fluxcp it works
  18. Thx for your repply he tell me because he search on rathena_renewal_db , who lines i need to change for change db=>log
  19. Hi , it's been about 5 hours that I'm looking for where my mistake can come from, I see many people have the same problem but no answer in the topic... =s maybe you can help me ? my MD5 password are disable on Flux and Svn Thx for reply =D
  20. Hi =p, I have try to Instal But have never install FluxCp Theme its my first time =p .... i have try and...... can you explain me exactly how to do on openserver? Thx for your reply =D
  21. Hi, How we can change that(screen)? Thx for your repply =p.
×
×
  • Create New...