Jump to content

Snaehild

Members
  • Content Count

    59
  • Joined

  • Last visited

Everything posted by Snaehild

  1. I'm not a good scripter but you may want to play with OnPCLoginEvent
  2. I'm not sure if there's one out here but you could start with these: http://herc.ws/board/files/category/11-pre-compiled-server/
  3. Have you tried this? //===== Additional Comments: =================================//= Be sure to disable the default agit controllers!//== npcguildagit_controller.txt//== npcguild2agit_start_se.txt//============================================================
  4. I tried this VIP system from Diconfrost VaNz. Is it possible to make it stack with the default item modifiers like bubble gum and field manuals? function script getPremium { set .@ticks, getarg(0); if (.@ticks <= 0) { debugmes "getPremium - tried to set a timer in the past"; end; } set prmm, ((prmm > gettimetick(2)) ? prmm : gettimetick(2)) + .@ticks; doevent "login::OnPCLoginEvent"; return;}- script login -1,{OnPCLoginEvent: if (prmm > gettimetick(2)) { dispbottom "Your Premium Service will expire after " + callfunc("Time2Str",premium); sc_start SC_CASH_PLUSEXP,(( prmm - gettimetick(2) ) * 1000 ),150; sc_start SC_CASH_PLUSONLYJOBEXP,(( prmm - gettimetick(2) ) * 1000 ),150; sc_start SC_CASH_RECEIVEITEM,(( prmm - gettimetick(2) ) * 1000 ),150; atcommand "@adjgroup 1 "+strcharinfo(0); deltimer strnpcinfo(3)+"::OnPCLoginEvent"; if ((prmm - gettimetick(2)) < 2147483) { addtimer (prmm - gettimetick(2)) *1000, strnpcinfo(3)+"::OnPCLoginEvent"; } else { addtimer 2147483000, strnpcinfo(3)+"::OnPCLoginEvent"; } } else if (prmm) { atcommand "@adjgroup 0 "+strcharinfo(0); sc_end SC_CASH_PLUSEXP; sc_end SC_CASH_PLUSONLYJOBEXP; sc_end SC_CASH_RECEIVEITEM; set prmm, 0; dispbottom "Premium Services has ended."; }end;
  5. I'm having this error on JayPee's Vote For Points Notice: Undefined offset: 0 in /addons/voteforpoints/modules/voteforpoints/index.php on line 44 Notice: Trying to get property of non-object in /addons/voteforpoints/modules/voteforpoints/index.php on line 44 My index.php http://upaste.me/bc0b137729fecd962
  6. Hi, I have this NPC walking around the center of Prontera but I often have this error and will end up crashing. [Warning]: npc_scriptcont: failed npc->checknear test. prontera,156,225,5 script NPCWalking 811,{ mes "GM list : "+( .admincount + .gmcount ); mes "-----------------------------"; for ( .@i = 0; .@i < .admincount; .@i++ ) { mes "^ff0000GM "+ .admin$[.@i]+ "^000000 ["+( ( isloggedin( getcharid( 3, .admin$[.@i] ) ) )? ( ( checkidle( .admin$[.@i] ) > .idletime )? "^eb43edIdle^000000" : "^2dd50cOnline^000000" ) : "^b5b5b5Offline^000000" )+ "]"; mes "-----------------------------"; } for ( .@i = 0; .@i < .gmcount; .@i++ ) { mes "^ff8c00GM "+ .gm$[.@i]+ "^000000 ["+( ( isloggedin( getcharid( 3, .gm$[.@i] ) ) )? ( ( checkidle( .gm$[.@i] ) > .idletime )? "^eb43edIdle^000000" : "^2dd50cOnline^000000" ) : "^b5b5b5Offline^000000" )+ "]"; mes "-----------------------------"; } mes gettimestr("%I:%M%p ",10) + gettime(5) + gettimestr(" %B ",15) + gettime(7); close;OnInit: setarray .Message$," <3 ", "Msg1", "Msg2", "Msg4", " . . . "; .idletime = 120; // idle for 60 seconds = idle status setarray .admin$, "Snaehild"; setarray .gm$, "Boom", "Panes"; .admincount = getarraysize( .admin$ ); .gmcount = getarraysize( .gm$ ); startnpctimer; npcspeed 200; end; OnTimer15000: npcwalkto 138+rand(5),208; npctalk .Message$[ rand( getarraysize( .Message$ ) ) ]; end; OnTimer30000: npcwalkto 127+rand(5),199; end; OnTimer45000: npcwalkto 150,185+rand(5); end; OnTimer60000: npcwalkto 156+rand(5),176; end; OnTimer75000: npcwalkto 175,201+rand(5); npctalk .Message$[ rand( getarraysize( .Message$ ) ) ]; end; OnTimer90000: npcwalkto 156+rand(5),225; end; OnTimer105000: stopnpctimer; initnpctimer; end;}
  7. Hi, for someone who's not that familiar w/poring invasion. How is this supposed to work? I activated the event and cleared the invasion but nothing is happening.
  8. I'm having this error [Error]: run_script: infinity loop ! - script Sample -1,{ OnInit: set .amount, 10; // amount of item to shower set .item_id, 7227; // item id to shower setarray .Maps$[0],"izlude","geffen","morocc","prontera"; // Possible maps end; OnMinute31: set .map$,.Maps$[rand(getarraysize(.Maps$))]; announce ""+.amount+" [" +getitemname(.item_id)+ "] has been dropped from the sky in [" +.map$+ "]. Lets get it before it's gone!",0; while ( .count < .amount ) { do { .@x = rand(1,500); .@y = rand(1,500); } while (!checkcell(.map$,.@x,.@y,cell_chkpass)); makeitem .item_id,1,.map$,.@x,.@y; set .count, 0; } set .count, 0; end;}
  9. Hi, can anyone enlighten me on how battlegrounds que really works? I tried to change all the minimum players to start to 1 & 2, tried to enter with 2 players on each side but can't make it start //====================================================//= _ _ _ //= | | | | | | //= | |_| | ___ _ __ ___ _ _| | ___ ___ //= | _ |/ _ '__/ __| | | | |/ _ / __|//= | | | | __/ | | (__| |_| | | __/__ //= _| |_/___|_| ___|__,_|_|___||___///= //= http://herc.ws/board/ //====================================================//= Link~u! <description> <link to wiki/topic>//= http://herc.ws/board/topic/928-memory-slasher-may-30-patch///====================================================//= Fields (TODO/INCOMPLETE)//= arenas: ({//= //- allowedTypes defines what kind of applications the arena will accept, setting is not case-sensitive and is ok with whitespaces//= allowedTypes: "Solo | Party" //Arena Accepts solo and party-type joins//= allowedTypes: "guild|party" //Arena Accepts solo and guild-type joins//= allowedTypes: "All" //Arena Accepts solo, party and guild-type joins//= //- fillAnnounce (optional arena param)//= })battlegrounds: ({ /* feature is not complete */ feature_off:false /* character variable for global bg delay */ global_delay_var: "BG_Delay_Tick" /* how many seconds to consider a player "afk" and kick him out? */ maximum_afk_seconds: 30 /* one can add as many as he wishes */ /* for custom ones, need to edit "lua files/entryqueue/entryqueuelist.lua" [Ind/Hercules] */ arenas: ({ name: "Tierra Gorge" //must match the name in client files event: "Tierra_BG2::OnPlayerListReady" allowedTypes: "All" /* Solo, Party and Guild */ minLevel: 80 maxLevel: 99 reward: {/* amount of badges awarded on each case */ win: 3 loss: 1 draw: 1 } minPlayers: 1 /* minimum amount of players to start */ maxPlayers: 60 /* maximum amount of players */ minTeamPlayers: 2 /* minimum amount of team members required for a team (party or guild) to join */ delay_var: "Tierra_BG_Tick" /* char variable name that will store the delay for this match */ maxDuration: 30 /* maximum duration in minutes, if reached game ends and highest score wins (or calls a draw if scores are equal) */ fillDuration: 20 /* time in seconds to wait for more applications when minimum has been reached */ pGameDuration: 20 /* time to wait for players to confirm their attendence after queueing process has finished */ },{ name: "Flavius" //must match the name in client files event: "start#bat_b01::OnPlayerListReady" allowedTypes: "All" /* Solo, Party and Guild */ minLevel: 80 maxLevel: 99 reward: {/* amount of badges awarded on each case */ win: 9 loss: 3 draw: 3 } minPlayers: 1 /* minimum amount of players to start (DEBUG VALUE, CHANGE BACK) */ maxPlayers: 60 /* maximum amount of players */ minTeamPlayers: 2 /* minimum amount of team members required for a team (party or guild) to join */ delay_var: "Flavius_BG_Tick" /* char variable name that will store the delay for this match */ maxDuration: 30 /* maximum duration in minutes, if reached game ends and highest score wins (or calls a draw if scores are equal) */ fillDuration: 20 /* time in seconds to wait for more applications when minimum has been reached */ pGameDuration: 20 /* time to wait for players to confirm their attendence after queueing process has finished */ },{ name: "KVM (Level 80 and up)" //must match the name in client files event: "KvM03_BG::OnPlayerListReady" allowedTypes: "All" /* Solo, Party and Guild */ minLevel: 80 maxLevel: 99 reward: {/* amount of badges awarded on each case */ win: 5 loss: 1 draw: 1 } minPlayers: 1 /* minimum amount of players to start */ maxPlayers: 60 /* maximum amount of players */ minTeamPlayers: 2 /* minimum amount of team members required for a team (party or guild) to join */ delay_var: "KVM_BG_Tick" /* char variable name that will store the delay for this match */ maxDuration: 30 /* maximum duration in minutes, if reached game ends and highest score wins (or calls a draw if scores are equal) */ fillDuration: 20 /* time in seconds to wait for more applications when minimum has been reached */ pGameDuration: 20 /* time to wait for players to confirm their attendence after queueing process has finished */ },{ name: "KVM (Level 60~79)" //must match the name in client files event: "KvM03_BG::OnPlayerListReady" allowedTypes: "All" /* Solo, Party and Guild */ minLevel: 60 maxLevel: 79 reward: {/* amount of badges awarded on each case */ win: 2 loss: 0 draw: 1 } minPlayers: 1 /* minimum amount of players to start */ maxPlayers: 60 /* maximum amount of players */ minTeamPlayers: 2 /* minimum amount of team members required for a team (party or guild) to join */ delay_var: "KVM_BG_Tick" /* char variable name that will store the delay for this match */ maxDuration: 30 /* maximum duration in minutes, if reached game ends and highest score wins (or calls a draw if scores are equal) */ fillDuration: 20 /* time in seconds to wait for more applications when minimum has been reached */ pGameDuration: 20 /* time to wait for players to confirm their attendence after queueing process has finished */ },{ name: "KVM (Level 59 and below)" //must match the name in client files event: "KvM03_BG::OnPlayerListReady" allowedTypes: "All" /* Solo, Party and Guild */ minLevel: 1 maxLevel: 59 reward: {/* amount of badges awarded on each case */ win: 1 loss: 0 draw: 0 } minPlayers: 1 /* minimum amount of players to start */ maxPlayers: 60 /* maximum amount of players */ minTeamPlayers: 2 /* minimum amount of team members required for a team (party or guild) to join */ delay_var: "KVM_BG_Tick" /* char variable name that will store the delay for this match */ maxDuration: 30 /* maximum duration in minutes, if reached game ends and highest score wins (or calls a draw if scores are equal) */ fillDuration: 20 /* time in seconds to wait for more applications when minimum has been reached */ pGameDuration: 20 /* time to wait for players to confirm their attendence after queueing process has finished */ } )})
  10. http://upaste.me/8fe413504ecc6afed can't remember touching anything aside from packetver
  11. I am receiving this error after closing the Buying Store. Client 20140115. [Warning]: clif_parse: Received unsupported packet (packet 0x4cf0 (0x0000), 4 bytes received), disconnecting session #3.
  12. Hi, I would just like to consult my revised script from JayPee Mateo from his Vote For Points NPC Script. Though this is tested working, I just wanna check if i'm doing it right and if there are further optimizations that can be done. Thanks! prontera,108,183,3 script Donation Test 564,{//Function Prototypesfunction garbagecol;//Garbage collection for the Character variablesgarbagecol();function getPoints;//This will return the points of the player stored in the databasefunction updatePoints;//This will updates the points of the player stored in the database//NPC Nameset .npcname$,"[ Donation Test ]"; //Script Start mes .npcname$; mes "Hi! Do you want to exchange your vote points?:"; switch(select("Yes, I want to exchange my points:See my points")) { case 1: next; mes .npcname$; set .@ritemid,7179; set .@rquantity,1; set .@rpoints,1; mes "Item ID:"+.@ritemid; mes "Item Name: "+getitemname(.@ritemid); mes "Item Quantity: "+.@rquantity+" pc(s)."; mes "Required Points: "+.@rpoints+" pt(s)."; mes "n"; mes "Do you want to this item?"; if(select("Yes:No")==1) { set .@points,getPoints(getcharid(3)); if(.@points>=.@rpoints) { next; mes .npcname$; updatePoints(getcharid(3),.@rpoints); getitem .@ritemid,.@rquantity; mes "Here you go!. Thank you for voting. Don't forget to vote again. :D"; } else mes "Sorry, you do not have enough points for this item."; } else { next; mes .npcname$; mes "Okay bye!"; } garbagecol(); close; case 2: next; mes .npcname$; set .@points,getPoints(getcharid(3)); mes "You currently have "+.@points+" pt(s)."; garbagecol(); close; }end;//Functions Bodies function updatePoints { set .@account_id,getarg(0); set .@usedPoints,getarg(1); query_sql("UPDATE `cp_credits` SET balance=(balance-"+.@usedPoints+") WHERE account_id='"+.@account_id+"'"); return; } function getPoints { set .@account_id,getarg(0); query_sql("SELECT `balance` FROM `cp_credits` WHERE account_id="+.@account_id+" LIMIT 1",.@points); if(getarraysize(.@points)==0) return 0; return .@points[0]; } function garbagecol{ deletearray @itemID[0],128; deletearray @itemQ[0],128; deletearray @points[0],128; return; }}
  13. Hello, are you familiar with this error? Encountered when launching the patched exe. Trying to diff 2014-04-16aRagexe with just recommended patches.
  14. Way to go Hercules team
  15. I am using ossi0110's as my base client and grf. Also tried Fluffle Puff's but no luck. Has something to do with item id 7916.
  16. I've been trying to look for this file in several data files already but to no avail. ResourceError : Can't find file À¯ÀúÀÎÅÍÆäÀ̽ºitem½Ç¹öÄÚÀÎ.bmp
  17. Tried cleaning solution and rebuilding?
  18. Got this error using the included costume.txt [Error]: script error in file 'npc/custom/costume.txt' line 96 column 4 parse_line: expect command, missing function name or calling undeclared function 93: emotion e_wah; 94: close; 95: }* 96: costume .@Part; // Convert the Headgear ~~~~~~~~~~~~~~~~~~~~~~~~^ 97: mes "[Clown]"; 98: mes "Done, enjoy your costume headgear."; 99: close; Plugins.conf already updated and recompiled. */plugins_list: [ /* Enable HPMHooking when plugins in use rely on Hooking */ "HPMHooking", "costumeitem", //"sample", //"other",]
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.