Jump to content

Takuyakii

Members
  • Posts

    206
  • Joined

  • Last visited

Everything posted by Takuyakii

  1. can someone help me to show how this work? how to compile this item.
  2. can someone help me with this? thanks!
  3. mind to share your script so we can check?
  4. if(Zeny>Your max zeny{ mes "too much zeny"; } i guess
  5. Can someone help me to make this script have Jackpot prize? or chance to get the rare item? Thank you. - 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: break; } 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; }
  6. what are you using? pre-re or RE? also check your map_cache.dat if that file exist.
  7. use WeemapCache and open your map_cache.dat, after that click FILE on weemapcache then select your izlude.gat, then save, after saving put your map_cache.dat to your trunk, then restart your server PS. DOn't forget to put the izlude file also in your grf.
  8. instead of @changesex use @changecharsex command, to fix this error go to your database and change the Gender of that character manually.
  9. // Copyright (c) rAthena Dev Teams - Licensed under GNU GPL // For more information, see LICENCE in the main folder #ifndef CONFIG_CUSTOM_DEFINES_PRE_HPP #define CONFIG_CUSTOM_DEFINES_PRE_HPP /** * rAthena configuration file (http://rathena.org) * For detailed guidance on these check http://rathena.org/wiki/SRC/config/ **/ #define PACKETVER 20151104 #endif /* CONFIG_CUSTOM_DEFINES_PRE_HPP */ i already did, then recompile but still failed to connect and im using the whole data of 20151104 the item , info etc i used this in my last server and it working but now it's not working
  10. Hello im using 2018 client now and i want it to downgrade for some reason i read some topic here about this and what i did is i changed packet.h into my 20151104 in defines_pre.hpp #define PACKETVER 20151104 when i'm trying to login there's no error on the server i can login but can't proceed to character. please help me
  11. can someone help me , im requesting for this script 1. NPC that will give item 2. the npc will only give to the selected account id. example 200004,20006,200030 and so on 3. and can only obtained once Thank you.
  12. Takuyakii

    Atcommand

    just replace the OnQuest: warp "your quest map",155,180; and so on
  13. Pabaliktad po kas ung script nyo po about dun sa % at dun sa pag ka sunod sunod po ng item dpat ung mga rare item is ung nandun sa setarray .@P1
  14. Can i request for this script NPC Registration 1. You have to be level 20 for you to allowed to register on that npc. 2. That npc have list of all registered. 3. i want it to be permanent, what i mean is i found a script like this but everytime i use @reloadscript the list will be deleted 4. Thanks in advance btw here's the script set .end,0; while(.end!=1){ mes "[Sign up NPC]"; mes "Want to sign up ?!"; mes "^6666ff^000000"; for(set .@arrayvalue,getarraysize($@messageleft$); .@arrayvalue != -1;){ mes $@messageleft$[.@arrayvalue]; set .@arrayvalue, .@arrayvalue -1; } next; set .signmenu$,"Yes, Sign my name:Leave it alone"; if(getgmlevel()>=99){set .signmenu$, .signmenu$ + ":^ff0000Wipe the list^000000"; } switch(select(.signmenu$)){ case 1: mes "[Sign up NPC]"; mes "You have signed up."; if($@counter % 2 == 1) { set $@messageleft$[$@counter], "^6666ff["+gettimestr("%H:%M",21)+"]^000000 ^ff0000"+ strcharinfo(0) + " Signed Up"; mes "^ff0000" + @var$ + "^000000"; } else { set $@messageleft$[$@counter], "^6666ff["+gettimestr("%H:%M",21)+"]^000000 "+strcharinfo(0) + " Signed Up"; } set $@counter, $@counter + 1; close; case 2: close; case 3: set $@counter,0; deletearray $@messageleft$[0],getarraysize($@messageleft$); set $@messageleft$[0],""; mes "They have been erased."; break; } } close; OnInit: waitingroom "Sign up NPC",0; set $@counter,0; set $@messageleft$[0],""; end;
  15. thanks, but i think it's not working because i waited for the hours and nothing announced that the event has started or the exprate, checked the @rates is still on the same rate. btw no error on server EDITED: i added OnInit: and now it's working ?
  16. Can i request for this scrip Current rate 15x15x5 Automatic Happy Hour Everyday Rate will be 18x18x5 8:00AM - 11:00AM 1:00PM - 400PM 9:00PM - 11PM 1:00AM - 4:00AM try to search some happy hour script and it works but i can't make it work for this set of time. and days Thanks
  17. how to contact the owner of andro? i mean other way because he's not replying on email. sir @Meow please check my email thanks
  18. Good day, can i request for a latest english translation with a working client 20151009 Client? Thanks i tried to download some latest file but it seems not translated in english . PS: i don't know if this is the right section to post this, please transfer my post to the right section, ? THANKS !
  19. can someone help me? thanks ?
  20. Hello can i request for an npc the gives Guild Package Mechanics: 1. Must be in guild 2. Must Have 20 Online Players to get the reward. ( if not 20 Online in guild, reward will not be given ) 3. 1 per Account Only 4. Account bounded Only. Thanks guys, and more power.
×
×
  • Create New...