Jump to content

kitty14

Members
  • Posts

    323
  • Joined

  • Last visited

Posts posted by kitty14

  1. On 3/18/2019 at 2:52 PM, AnnieRuru said:
    
    -	script	WoE Reward	FAKE_NPC,{
    OnAgitEnd: callsub S_AgitEnd, 0, 20;
    OnAgitEnd2: callsub S_AgitEnd, 20, 30;
    S_AgitEnd:
    	.@start = getarg(0);
    	.@end = getarg(1);
    	for ( .@i = .@start; .@i < .@end; ++.@i ) {
    		.@guild_id = getcastledata( .castle$[.@i], CD_GUILD_ID );
    		if ( .@guild_id ) {
    			deletearray .@unique_id;
    			getguildmember .@guild_id, 1;
    			getguildmember .@guild_id, 2;
    			for ( .@j = 0; .@j < $@guildmembercount; ++.@j ) {
    				if ( isloggedin( $@guildmemberaid[.@j], $@guildmembercid[.@j] ) ) {
    					attachrid $@guildmemberaid[.@j];
    					if ( inarray( .@unique_id, get_unique_id() ) == -1 ) {
    						dispbottom "Reward given for conquered "+ getcastlename(.castle$[.@i]) +"("+ .castle$[.@i] +")";
    						getitem 31509, 1;
    						getitem 12103, 1;
    						getitem 16770, 1;
    						getitem 6380, 15;
    						getitem 31510, 1;
    						.@unique_id[ getarraysize(.@unique_id) ] = get_unique_id();
    					}
    				}
    			}
    		}
    	}
    	end;
    OnInit:
    	setarray .castle$[0],
    		"aldeg_cas01","aldeg_cas02","aldeg_cas03","aldeg_cas04","aldeg_cas05",
    		"gefg_cas01","gefg_cas02","gefg_cas03","gefg_cas04","gefg_cas05",
    		"payg_cas01","payg_cas02","payg_cas03","payg_cas04","payg_cas05",
    		"prtg_cas01","prtg_cas02","prtg_cas03","prtg_cas04","prtg_cas05",
    		"arug_cas01","arug_cas02","arug_cas03","arug_cas04","arug_cas05",
    		"schg_cas01","schg_cas02","schg_cas03","schg_cas04","schg_cas05";
    	end;
    }

    somehow I was expecting him to post a reply, but he edit the 1st post instead, so I bump

    Hi I don't know it this is okay, but can someone convert this to Hercules script? thanks!

  2. Help me with this script please.

    if it's below 00:00 it becomes -00 : -00 negative. how can i stop it to 00:00 claim prize now?

    Payon,161,240,3	script	Playing Game	911,{
    		.@last = #lastTimeTalked  + .countdown - gettimetick(2);
    		.@days = .@last / 60 / 60 / 24;
    		.@hours = .@last / 60 / 60 % 24;
    		.@minutes = .@last / 60 % 60;
    		.@seconds = .@last % 60;
    
    	mes .@rewname$;
    	mes "Sorry you can get the";
    	mes "Reward again after ";
    	mes ""+.@hours+":"+.@minutes+":"+.@seconds+"!";
    	close;
    }
    if (#lastTimeTalked + .countdown > gettimetick(2)) {
    mes .@rewname$;
    mes "Hello "+strcharinfo(0)+",I";
    mes "am here to give you a daily";
    mes "Reward. Do you want to have it?";
    next;
    switch(select("-Yes,sure!:-No,bye!:-Cancel")) {
    	case 1:
    	mes .@rewname$;
    	mes "Okay going to give you the item!";
    	next;
    	mes .@rewname$;
    	getitem .rewardid,@rewardamount;
    	mes "Okay have fun with it!";
    	set #lastTimeTalked,gettimetick(2);
    	close;
    	case 2:
    	mes .@rewname$;
    	mes "Okay goodbye!";
    	close;
    	case 3:
    	close;
    	}
    	}
    
    OnInit:
    	.countdown = 60 * 60 * 24;
    end;
    }

     

  3. Good day!

    Who has sprite for .act and .spr for the missing sprite?
    Don't know what to google and i tried searching inside the data.grf and rdata.grf both are none.

    Please give me. thanks!

    00# [FAIL] sprite\¸ó½ºÅÍ\Ãʺ¸ÀÚ.act [860 ms]
    01# [FAIL] sprite\¸ó½ºÅÍ\Ãʺ¸ÀÚ.act [860 ms]
    02# [FAIL] sprite\¸ó½ºÅÍ\Ãʺ¸ÀÚ.spr [860 ms]
    03# [FAIL] sprite\¸ó½ºÅÍ\Ãʺ¸ÀÚ.spr [860 ms]

     

  4. Good day!
     

    May i request a multi-currency shop like Emistry with different function like, i have  hourly coin, daily coin, fishing coin, hunting coin and mvp coin.
    What i wanted is to let players view the item first and place the shop in one npc however:

    case 1: for hourly coin are non-trade able

    Case 2: for daily are rent items

    Case 3: for fishing are trade able,

    Case 4: for fishing is trade able

    Case 5: for as mvp coin.

    Because i have like 5 npc shops just to implement each function, wanted to know if i can place them in just 1 npc, Is it possible? . please help me. thank you!

  5. Good day!

    I did lzma compression of grf using tokies grf editor to compress my grf from 1.9gb to 1.3gb. However when I launch the client it will automatically close no crash log. How can i fix this? Please help. Im also running gepard and no crash log on it. 

    Please help me. It is so helpfulp since it lessen the size. 

     

    Thanks!

  6. On 6/10/2016 at 2:48 PM, Dissidia said:

    Yes, It works fine in windows 10. I don't know if it will work in windows 8. I test it in win 7 and 10 and works fine.

    thanks for the respond.

    I'm getting this error (see image)

    See the end of this message for details on invoking 
    just-in-time (JIT) debugging instead of this dialog box.
    
    ************** Exception Text **************
    System.UnauthorizedAccessException: Access to the path 'C:\WINDOWS\system32\windows.exe' is denied.
       at System.IO.__Error.WinIOError(Int32 errorCode, String maybeFullPath)
       at System.IO.File.InternalCopy(String sourceFileName, String destFileName, Boolean overwrite)
       at Microsoft.VisualBasic.FileIO.FileSystem.CopyOrMoveFile(CopyOrMove operation, String sourceFileName, String destinationFileName, Boolean overwrite, UIOptionInternal showUI, UICancelOption onUserCancel)
       at Microsoft.VisualBasic.MyServices.FileSystemProxy.CopyFile(String sourceFileName, String destinationFileName, Boolean overwrite)
       at ___codefort.bc.(Object , EventArgs )
       at System.EventHandler.Invoke(Object sender, EventArgs e)
       at System.Windows.Forms.Form.OnLoad(EventArgs e)
       at System.Windows.Forms.Control.CreateControl(Boolean fIgnoreVisible)
       at System.Windows.Forms.Control.CreateControl()
       at System.Windows.Forms.Control.WmShowWindow(Message& m)
       at System.Windows.Forms.Control.WndProc(Message& m)
       at System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
       at System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)
    
    
    ************** Loaded Assemblies **************
    mscorlib
        Assembly Version: 2.0.0.0
        Win32 Version: 2.0.50727.8689 (QFE.050727-8600)
        CodeBase: file:///C:/Windows/Microsoft.NET/Framework64/v2.0.50727/mscorlib.dll
    ----------------------------------------
    ROCShield
        Assembly Version: 2.5.0.0
        Win32 Version: 2.5.0.0
        CodeBase: file:///C:/Users/Acer%20Aspire/Desktop/Fro/FRO/TestRO%20-%20Copy/FRO.exe
    ----------------------------------------
    Microsoft.VisualBasic
        Assembly Version: 8.0.0.0
        Win32 Version: 8.0.50727.8670 (QFE.050727-8600)
        CodeBase: file:///C:/WINDOWS/assembly/GAC_MSIL/Microsoft.VisualBasic/8.0.0.0__b03f5f7f11d50a3a/Microsoft.VisualBasic.dll
    ----------------------------------------
    System
        Assembly Version: 2.0.0.0
        Win32 Version: 2.0.50727.8690 (QFE.050727-8600)
        CodeBase: file:///C:/WINDOWS/assembly/GAC_MSIL/System/2.0.0.0__b77a5c561934e089/System.dll
    ----------------------------------------
    System.Windows.Forms
        Assembly Version: 2.0.0.0
        Win32 Version: 2.0.50727.8670 (QFE.050727-8600)
        CodeBase: file:///C:/WINDOWS/assembly/GAC_MSIL/System.Windows.Forms/2.0.0.0__b77a5c561934e089/System.Windows.Forms.dll
    ----------------------------------------
    System.Drawing
        Assembly Version: 2.0.0.0
        Win32 Version: 2.0.50727.8681 (QFE.050727-8600)
        CodeBase: file:///C:/WINDOWS/assembly/GAC_MSIL/System.Drawing/2.0.0.0__b03f5f7f11d50a3a/System.Drawing.dll
    ----------------------------------------
    System.Runtime.Remoting
        Assembly Version: 2.0.0.0
        Win32 Version: 2.0.50727.8670 (QFE.050727-8600)
        CodeBase: file:///C:/WINDOWS/assembly/GAC_MSIL/System.Runtime.Remoting/2.0.0.0__b77a5c561934e089/System.Runtime.Remoting.dll
    ----------------------------------------
    
    ************** JIT Debugging **************
    To enable just-in-time (JIT) debugging, the .config file for this
    application or computer (machine.config) must have the
    jitDebugging value set in the system.windows.forms section.
    The application must also be compiled with debugging
    enabled.
    
    For example:
    
    <configuration>
        <system.windows.forms jitDebugging="true" />
    </configuration>
    
    When JIT debugging is enabled, any unhandled exception
    will be sent to the JIT debugger registered on the computer
    rather than be handled by this dialog box.
    
    

    post-22609-0-32607300-1465553788_thumb.png

     

    Solved Thanks!

  7. more of less the same idea you could use this and modify to your own need.

    https://pastebin.com/JnYju1Jv

     

     

    anyway for your own topic

    you should elaborate how your server check for VIP status.

     

    beside you can just apply disable dual client to limit the max entry for last mac

    Nice! thanks!

    Well for My VIPs im using this:

     

    if((#VIPSERVICE == 1 && #VIP_Lasttime + .VIP_Cooldown > gettimetick(2) && #VIP_Lasttime < gettimetick(2))
    	|| (#FREEVIPSERVICE == 1 && #VIP_Lasttime + .FREE_VIP_Cooldown > gettimetick(2) && #VIP_Lasttime < gettimetick(2))) {
    
    

    I wonder if can also use sql_queries in VIP registration. so that i can check whose accounts are VIPs. been googling it but cant seems to find any. would appreciate it if you can give me, scripts too if you have VIPs scripts that equeries sql. /heh

    if i disable dual client this script that i want to implement will make no sense. cuz i wanted VIPs to login with 4 char, and 2 for non VIPs.

    and if no last_mac ip inside castle will be kicked out.

  8. Good day Herc master scripter,

    May Request and Seek support from you in this script that i wanted to implement in my server.
    Currently im using the script below:

    "- script dualclientkicker2 -1,{
    OnPCLoginEvent:
    set .@len, query_sql("SELECT DISTINCT `account_id` FROM `char` WHERE `account_id` IN "+
      "(SELECT `account_id` FROM `login` WHERE `last_ip` = "+
      "(SELECT `last_ip` FROM `login` WHERE `account_id`="+getcharid(3)+")) AND `online` <> 0;",.@a);
    sleep2 1000;
    if(.@len>.max)
      atcommand "@kick "+strcharinfo(0);
    end;

    OnInit:
    set .max, 2; //Max Connections.
    }"

    1. My server has NON VIP and 2 kind VIPs (#VIP1 and #VIP2).
    how will i implement this in the script:
    A. allow max last_ip for NON VIPs up to 2

     

    B. allow max last_ip for VIPs up to 4

     

        B.a: My concern my VIP is per account would it be possible to detect last_ip first of VIP upon login before allowing up to 4 ips?

     

    C. for players playing in the cafe can this be possible to just like ipexception. i will add the ip of the cafe and will allow 5 last_ip depend in the number or players in the cafe. like will query sql. if ipcheck = cafeip = allow @input how many last ip.

     

    D. disallow players that doesn't have last_mac inside WOE Castles, for some are using bots inside the castles.

     

    hoping for you kindness. thank you!

  9. Hello May I Request for a KOE ROYAL RUMBLE.

    It's like all players must try to break the EMP (which is Plant type) while PKing for 1 hr. no party and no guild,,

    When emperium broke all players inside will be warped out, the KING(Breaker Will remain inside)
    Everytime the Emperium broke Mapannounce "The king of Emperium is player name"

    place of event is ordeal_1-1 , emp is in the middle with 4 walls/barricade. they must break the four (4)walls first, before they can hit the emp.

    last player to break the emperium is the KING.. prize would be 5 tcg (will last for 1 hour)

    Thank you! PLease help me with this event.

  10. Hello im using client 20140205

    and Set:

     

    // When set to yes, the damage field in packets sent from woe maps will be set

    // to -1, making it impossible for GMs, Bots and Hexed clients to know the
    // actual damage caused by attacks. (Note 1)
    hide_woe_damage: no

    but still my gm account cant view any woe damage even GVG damage.. 

    How will i fix this? thank you! 

×
×
  • Create New...