Sohbet Script | SibermIRC.Org

Posts tagged ‘Sohbet Script’

Aynı IP adresinden 3. giren kullanıcıya otomatik zline

Bu edit ile sunucunuza aynı ip adresinden giren 3. kullanıcıya otomatik zline uygulatmış olursunuz. Telnet ‘e login olduktan sonra Unreal3.2.x dizinine ve oradan da src dizinen giriniz. s_conf.c dosyası içinde bulunan;

exit_client(cptr, cptr, &me,
“Too many connections from your IP”);

kod satırının yerine

place_host_ban(cptr, BAN_ACT_GZLINE, “Too many connections from your IP”, 864000);

kod satırı ile değiştiriniz.

Unrealircd.conf dosyası içinde allow satırında ki ” maxperip ” sayısını 2 yapmanız yeterli olacaktır. Dosyayı kaydedip çıkıyorsunuz. Daha sonra Unreal3.2 ana dizininde make edip sunucunuza restart uygulayın.

Ekim 2, 2008 at 7:01 pm Yorum bırakın

Fullname gösteren IRCOPS modülü

Normal ircops modülünün biraz düzenlenerek fullname gösterilen şekle sokulmuş hali. Bu haliyle benim daha çok hoşuma gidiyor. Bir benzeri tr-ircd içerisinde mevcuttu, kullanmış olanlar bilirler. Oradan esinlendim.
Örnek görüntü şu şekilde:

Janjan a Network Administrator [dark.inside] [Müsait]
kanberg an IRC Operator [s] [Müsait]
Soru an IRC Operator [çok gelişmiş soru botu] [Müsait]
Toplam: 4 IRCOPs bağlı ve bu yetkililerden 2 tanesi Admin, 2 Oper ve 0 kişi şu anda meşgul
/IRCOPS listesi sonu

Kodlar aşağıdaki gibi:

<pre class="bash bash" style="font-family:monospace;"><span style="font-weight:bold;color:#000000;">/*</span>
<span style="font-weight:bold;color:#000000;">*</span>  m_ircops - <span style="font-weight:bold;color:#000000;">/</span>IRCOPS <span style="font-weight:bold;color:#7a0874;">command</span> that lists IRC Operators
<span style="font-weight:bold;color:#000000;">*</span>  <span style="font-weight:bold;color:#7a0874;">(</span>C<span style="font-weight:bold;color:#7a0874;">)</span> Copyright <span style="color:#000000;">2004</span>-<span style="color:#000000;">2005</span> Syzop
<span style="font-weight:bold;color:#000000;">*</span>  <span style="font-weight:bold;color:#7a0874;">(</span>C<span style="font-weight:bold;color:#7a0874;">)</span> Copyright <span style="color:#000000;">2003</span>-<span style="color:#000000;">2004</span> AngryWolf
<span style="font-weight:bold;color:#000000;">*</span>
<span style="font-weight:bold;color:#000000;">*</span>  This program is <span style="font-weight:bold;color:#c20cb9;">free</span> software; you can redistribute it and<span style="font-weight:bold;color:#000000;">/</span>or modify
<span style="font-weight:bold;color:#000000;">*</span>  it under the terms of the GNU General Public License <span style="font-weight:bold;color:#c20cb9;">as</span> published by
<span style="font-weight:bold;color:#000000;">*</span>  the Free Software Foundation; either version <span style="color:#000000;">1</span>, or <span style="font-weight:bold;color:#7a0874;">(</span>at your option<span style="font-weight:bold;color:#7a0874;">)</span>
<span style="font-weight:bold;color:#000000;">*</span>  any later version.
<span style="font-weight:bold;color:#000000;">*</span>
<span style="font-weight:bold;color:#000000;">*</span>  This program is distributed <span style="font-weight:bold;color:#000000;">in</span> the hope that it will be useful,
<span style="font-weight:bold;color:#000000;">*</span>  but WITHOUT ANY WARRANTY; without even the implied warranty of
<span style="font-weight:bold;color:#000000;">*</span>  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
<span style="font-weight:bold;color:#000000;">*</span>  GNU General Public License <span style="font-weight:bold;color:#000000;">for</span> <span style="font-weight:bold;color:#c20cb9;">more</span> details.
<span style="font-weight:bold;color:#000000;">*</span>
<span style="font-weight:bold;color:#000000;">*</span>  You should have received a copy of the GNU General Public License
<span style="font-weight:bold;color:#000000;">*</span>  along with this program; <span style="font-weight:bold;color:#000000;">if</span> not, <span style="font-weight:bold;color:#c20cb9;">write</span> to the Free Software
<span style="font-weight:bold;color:#000000;">*</span>  Foundation, Inc., <span style="color:#000000;">675</span> Mass Ave, Cambridge, MA 02139, USA.
<span style="font-weight:bold;color:#000000;">*/</span>
<span style="font-weight:bold;color:#000000;">/*</span>
Düzenleme: <span style="color:#000000;">2007</span> -  Mehmet <span style="color:#ff0000;">"hitman"</span> Tahta
Mail: iletisim<span style="font-weight:bold;color:#7a0874;">[</span><span style="font-weight:bold;color:#000000;">@</span><span style="font-weight:bold;color:#7a0874;">]</span>hitman.gen.tr
Web: http:<span style="font-weight:bold;color:#000000;">//</span>www.hitman.gen.tr<span style="font-weight:bold;color:#000000;">/</span>
<span style="font-weight:bold;color:#000000;">*/</span>
<span style="color:#666666;font-style:italic;">#include "config.h" </span>
<span style="color:#666666;font-style:italic;">#include "struct.h" </span>
<span style="color:#666666;font-style:italic;">#include "common.h" </span>
<span style="color:#666666;font-style:italic;">#include "sys.h" </span>
<span style="color:#666666;font-style:italic;">#include "numeric.h" </span>
<span style="color:#666666;font-style:italic;">#include "msg.h" </span>
<span style="color:#666666;font-style:italic;">#include "proto.h" </span>
<span style="color:#666666;font-style:italic;">#include "channel.h" </span>
<span style="color:#666666;font-style:italic;">#include &lt;time.h&gt; </span>
<span style="color:#666666;font-style:italic;">#include &lt;sys/stat.h&gt; </span>
<span style="color:#666666;font-style:italic;">#include &lt;stdio.h&gt; </span>
<span style="color:#666666;font-style:italic;">#include &lt;stdlib.h&gt; </span>
<span style="color:#666666;font-style:italic;">#include &lt;string.h&gt; </span>
<span style="color:#666666;font-style:italic;">#ifdef _WIN32 </span>
<span style="color:#666666;font-style:italic;">#include &lt;io.h&gt; </span>
<span style="color:#666666;font-style:italic;">#endif </span>
<span style="color:#666666;font-style:italic;">#include &lt;fcntl.h&gt; </span>
<span style="color:#666666;font-style:italic;">#include "h.h" </span>
<span style="color:#666666;font-style:italic;">#ifdef STRIPBADWORDS </span>
<span style="color:#666666;font-style:italic;">#include "badwords.h" </span>
<span style="color:#666666;font-style:italic;">#endif </span>
<span style="color:#666666;font-style:italic;">#ifdef _WIN32 </span>
<span style="color:#666666;font-style:italic;">#include "version.h" </span>
<span style="color:#666666;font-style:italic;">#endif </span>
 
typedef struct
<span style="font-weight:bold;color:#7a0874;">{</span>
    long <span style="font-weight:bold;color:#000000;">*</span>umode;
    char <span style="font-weight:bold;color:#000000;">*</span>text;
<span style="font-weight:bold;color:#7a0874;">}</span> oflag;
 
<span style="font-weight:bold;color:#000000;">/*</span>
<span style="font-weight:bold;color:#000000;">*</span> Ultimate uses numerics <span style="color:#000000;">386</span> and <span style="color:#000000;">387</span> <span style="font-weight:bold;color:#000000;">for</span> RPL_IRCOPS and RPL_ENDOFIRCOPS,
<span style="font-weight:bold;color:#000000;">*</span> but these numerics are RPL_QLIST and RPL_ENDOFQLIST <span style="font-weight:bold;color:#000000;">in</span> UnrealIRCd
<span style="font-weight:bold;color:#000000;">*</span> <span style="font-weight:bold;color:#7a0874;">(</span>numeric conflict<span style="font-weight:bold;color:#7a0874;">)</span>. I had to choose other numerics.
<span style="font-weight:bold;color:#000000;">*/</span>
 
<span style="color:#666666;font-style:italic;">#define RPL_IRCOPS        337 </span>
<span style="color:#666666;font-style:italic;">#define RPL_ENDOFIRCOPS  338 </span>
<span style="color:#666666;font-style:italic;">#define MSG_IRCOPS        "IRCOPS" </span>
<span style="color:#666666;font-style:italic;">#define TOK_IRCOPS        NULL </span>
<span style="color:#666666;font-style:italic;">#define IsAway(x)        (x)-&gt;user-&gt;away </span>
 
<span style="color:#666666;font-style:italic;">#if !defined(IsSkoAdmin) </span>
<span style="color:#666666;font-style:italic;">#define IsSkoAdmin(sptr)  (IsAdmin(sptr) || IsNetAdmin(sptr) || IsSAdmin(sptr) || IsCoAdmin(sptr)) </span>
<span style="color:#666666;font-style:italic;">#endif </span>
 
static int m_ircops<span style="font-weight:bold;color:#7a0874;">(</span>aClient <span style="font-weight:bold;color:#000000;">*</span>cptr, aClient <span style="font-weight:bold;color:#000000;">*</span>sptr, int parc, char <span style="font-weight:bold;color:#000000;">*</span>parv<span style="font-weight:bold;color:#7a0874;">[</span><span style="font-weight:bold;color:#7a0874;">]</span><span style="font-weight:bold;color:#7a0874;">)</span>;
 
static oflag otypes<span style="font-weight:bold;color:#7a0874;">[</span><span style="color:#000000;">7</span><span style="font-weight:bold;color:#7a0874;">]</span>;
 
ModuleHeader MOD_HEADER<span style="font-weight:bold;color:#7a0874;">(</span>m_ircops<span style="font-weight:bold;color:#7a0874;">)</span>
  = <span style="font-weight:bold;color:#7a0874;">{</span>
    <span style="color:#ff0000;">"ircops"</span>,
    <span style="color:#ff0000;">"v3.6"</span>,
    <span style="color:#ff0000;">"/IRCOPS command that lists IRC Operators"</span>,
    <span style="color:#ff0000;">"3.2-b8-1"</span>,
    NULL
    <span style="font-weight:bold;color:#7a0874;">}</span>;
 
DLLFUNC int MOD_INIT<span style="font-weight:bold;color:#7a0874;">(</span>m_ircops<span style="font-weight:bold;color:#7a0874;">)</span><span style="font-weight:bold;color:#7a0874;">(</span>ModuleInfo <span style="font-weight:bold;color:#000000;">*</span>modinfo<span style="font-weight:bold;color:#7a0874;">)</span>
<span style="font-weight:bold;color:#7a0874;">{</span>
    otypes<span style="font-weight:bold;color:#7a0874;">[</span>0<span style="font-weight:bold;color:#7a0874;">]</span>.umode = <span style="font-weight:bold;color:#000000;">&amp;</span>UMODE_NETADMIN;
    otypes<span style="font-weight:bold;color:#7a0874;">[</span>0<span style="font-weight:bold;color:#7a0874;">]</span>.text = <span style="color:#ff0000;">"a Network Administrator"</span>;
    otypes<span style="font-weight:bold;color:#7a0874;">[</span><span style="color:#000000;">1</span><span style="font-weight:bold;color:#7a0874;">]</span>.umode = <span style="font-weight:bold;color:#000000;">&amp;</span>UMODE_SADMIN;
    otypes<span style="font-weight:bold;color:#7a0874;">[</span><span style="color:#000000;">1</span><span style="font-weight:bold;color:#7a0874;">]</span>.text = <span style="color:#ff0000;">"an IRC Operator"</span>;
    otypes<span style="font-weight:bold;color:#7a0874;">[</span><span style="color:#000000;">2</span><span style="font-weight:bold;color:#7a0874;">]</span>.umode = <span style="font-weight:bold;color:#000000;">&amp;</span>UMODE_ADMIN;
    otypes<span style="font-weight:bold;color:#7a0874;">[</span><span style="color:#000000;">2</span><span style="font-weight:bold;color:#7a0874;">]</span>.text = <span style="color:#ff0000;">"an IRC Operator"</span>;
    otypes<span style="font-weight:bold;color:#7a0874;">[</span><span style="color:#000000;">3</span><span style="font-weight:bold;color:#7a0874;">]</span>.umode = <span style="font-weight:bold;color:#000000;">&amp;</span>UMODE_COADMIN;
    otypes<span style="font-weight:bold;color:#7a0874;">[</span><span style="color:#000000;">3</span><span style="font-weight:bold;color:#7a0874;">]</span>.text = <span style="color:#ff0000;">"an IRC Operator"</span>;
    otypes<span style="font-weight:bold;color:#7a0874;">[</span><span style="color:#000000;">4</span><span style="font-weight:bold;color:#7a0874;">]</span>.umode = <span style="font-weight:bold;color:#000000;">&amp;</span>UMODE_OPER;
    otypes<span style="font-weight:bold;color:#7a0874;">[</span><span style="color:#000000;">4</span><span style="font-weight:bold;color:#7a0874;">]</span>.text = <span style="color:#ff0000;">"an IRC Operator"</span>;
    otypes<span style="font-weight:bold;color:#7a0874;">[</span><span style="color:#000000;">5</span><span style="font-weight:bold;color:#7a0874;">]</span>.umode = <span style="font-weight:bold;color:#000000;">&amp;</span>UMODE_LOCOP;
    otypes<span style="font-weight:bold;color:#7a0874;">[</span><span style="color:#000000;">5</span><span style="font-weight:bold;color:#7a0874;">]</span>.text = <span style="color:#ff0000;">"a Local Operator"</span>;
    otypes<span style="font-weight:bold;color:#7a0874;">[</span><span style="color:#000000;">6</span><span style="font-weight:bold;color:#7a0874;">]</span>.umode = NULL;
    otypes<span style="font-weight:bold;color:#7a0874;">[</span><span style="color:#000000;">6</span><span style="font-weight:bold;color:#7a0874;">]</span>.text = NULL;
 
    <span style="font-weight:bold;color:#000000;">if</span> <span style="font-weight:bold;color:#7a0874;">(</span>CommandExists<span style="font-weight:bold;color:#7a0874;">(</span>MSG_IRCOPS<span style="font-weight:bold;color:#7a0874;">)</span><span style="font-weight:bold;color:#7a0874;">)</span>
    <span style="font-weight:bold;color:#7a0874;">{</span>
        config_error<span style="font-weight:bold;color:#7a0874;">(</span><span style="color:#ff0000;">"Command "</span> MSG_IRCOPS <span style="color:#ff0000;">" already exists"</span><span style="font-weight:bold;color:#7a0874;">)</span>;
        <span style="font-weight:bold;color:#7a0874;">return</span> MOD_FAILED;
    <span style="font-weight:bold;color:#7a0874;">}</span>
    CommandAdd<span style="font-weight:bold;color:#7a0874;">(</span>modinfo-<span style="font-weight:bold;color:#000000;">&gt;</span>handle, MSG_IRCOPS, TOK_IRCOPS, m_ircops, MAXPARA, M_USER<span style="font-weight:bold;color:#7a0874;">)</span>;
 
    <span style="font-weight:bold;color:#000000;">if</span> <span style="font-weight:bold;color:#7a0874;">(</span>ModuleGetError<span style="font-weight:bold;color:#7a0874;">(</span>modinfo-<span style="font-weight:bold;color:#000000;">&gt;</span>handle<span style="font-weight:bold;color:#7a0874;">)</span> <span style="font-weight:bold;color:#000000;">!</span>= MODERR_NOERROR<span style="font-weight:bold;color:#7a0874;">)</span>
    <span style="font-weight:bold;color:#7a0874;">{</span>
        config_error<span style="font-weight:bold;color:#7a0874;">(</span><span style="color:#ff0000;">"Error adding command "</span> MSG_IRCOPS <span style="color:#ff0000;">": %s"</span>,
            ModuleGetErrorStr<span style="font-weight:bold;color:#7a0874;">(</span>modinfo-<span style="font-weight:bold;color:#000000;">&gt;</span>handle<span style="font-weight:bold;color:#7a0874;">)</span><span style="font-weight:bold;color:#7a0874;">)</span>;
        <span style="font-weight:bold;color:#7a0874;">return</span> MOD_FAILED;
    <span style="font-weight:bold;color:#7a0874;">}</span>
 
    <span style="font-weight:bold;color:#7a0874;">return</span> MOD_SUCCESS;
<span style="font-weight:bold;color:#7a0874;">}</span>
 
DLLFUNC int MOD_LOAD<span style="font-weight:bold;color:#7a0874;">(</span>m_ircops<span style="font-weight:bold;color:#7a0874;">)</span><span style="font-weight:bold;color:#7a0874;">(</span>int module_load<span style="font-weight:bold;color:#7a0874;">)</span>
<span style="font-weight:bold;color:#7a0874;">{</span>
    <span style="font-weight:bold;color:#7a0874;">return</span> MOD_SUCCESS;
<span style="font-weight:bold;color:#7a0874;">}</span>
 
DLLFUNC int MOD_UNLOAD<span style="font-weight:bold;color:#7a0874;">(</span>m_ircops<span style="font-weight:bold;color:#7a0874;">)</span><span style="font-weight:bold;color:#7a0874;">(</span>int module_unload<span style="font-weight:bold;color:#7a0874;">)</span>
<span style="font-weight:bold;color:#7a0874;">{</span>
    <span style="font-weight:bold;color:#7a0874;">return</span> MOD_SUCCESS;
<span style="font-weight:bold;color:#7a0874;">}</span>
 
 
static char <span style="font-weight:bold;color:#000000;">*</span>find_otype<span style="font-weight:bold;color:#7a0874;">(</span>long umodes<span style="font-weight:bold;color:#7a0874;">)</span>
<span style="font-weight:bold;color:#7a0874;">{</span>
    unsigned int i;
 
    <span style="font-weight:bold;color:#000000;">for</span> <span style="font-weight:bold;color:#7a0874;">(</span>i = 0; otypes<span style="font-weight:bold;color:#7a0874;">[</span>i<span style="font-weight:bold;color:#7a0874;">]</span>.umode; i++<span style="font-weight:bold;color:#7a0874;">)</span>
        <span style="font-weight:bold;color:#000000;">if</span> <span style="font-weight:bold;color:#7a0874;">(</span><span style="font-weight:bold;color:#000000;">*</span>otypes<span style="font-weight:bold;color:#7a0874;">[</span>i<span style="font-weight:bold;color:#7a0874;">]</span>.umode <span style="font-weight:bold;color:#000000;">&amp;</span> umodes<span style="font-weight:bold;color:#7a0874;">)</span>
            <span style="font-weight:bold;color:#7a0874;">return</span> otypes<span style="font-weight:bold;color:#7a0874;">[</span>i<span style="font-weight:bold;color:#7a0874;">]</span>.text;
 
    <span style="font-weight:bold;color:#7a0874;">return</span> <span style="color:#ff0000;">"an unknown operator"</span>;
<span style="font-weight:bold;color:#7a0874;">}</span>
 
<span style="font-weight:bold;color:#000000;">/*</span>
<span style="font-weight:bold;color:#000000;">*</span> m_ircops
<span style="font-weight:bold;color:#000000;">*</span>
<span style="font-weight:bold;color:#000000;">*</span>    parv<span style="font-weight:bold;color:#7a0874;">[</span>0<span style="font-weight:bold;color:#7a0874;">]</span>: sender prefix
<span style="font-weight:bold;color:#000000;">*</span>
<span style="font-weight:bold;color:#000000;">*</span>    Originally comes from TR-IRCD, but I changed it <span style="font-weight:bold;color:#000000;">in</span> several places.
<span style="font-weight:bold;color:#000000;">*</span>    In addition, I didn<span style="color:#ff0000;">'t like to display network name. In addition,
*    instead of realname, servername is shown. See the original
*    header below.
*/
 
/************************************************************************
* IRC - Internet Relay Chat, modules/m_ircops.c
*
*  Copyright (C) 2000-2002 TR-IRCD Development
*
*  Copyright (C) 1990 Jarkko Oikarinen and
*                      University of Oulu, Co Center
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2, or (at your option)
* any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/
 
static int m_ircops(aClient *cptr, aClient *sptr, int parc, char *parv[])
{
aClient *acptr;
char buf[BUFSIZE];
int opers = 0, admins = 0, globs = 0, aways = 0;
 
    for (acptr = client; acptr; acptr = acptr-&gt;next)
    {
        /* List only real IRC Operators */
        if (IsULine(acptr) || !IsPerson(acptr) || !IsAnOper(acptr))
            continue;
        /* Don'</span>t list +H <span style="font-weight:bold;color:#c20cb9;">users</span> <span style="font-weight:bold;color:#000000;">*/</span>
        <span style="font-weight:bold;color:#000000;">if</span> <span style="font-weight:bold;color:#7a0874;">(</span><span style="font-weight:bold;color:#000000;">!</span>IsAnOper<span style="font-weight:bold;color:#7a0874;">(</span>sptr<span style="font-weight:bold;color:#7a0874;">)</span> <span style="font-weight:bold;color:#000000;">&amp;&amp;</span> IsHideOper<span style="font-weight:bold;color:#7a0874;">(</span>acptr<span style="font-weight:bold;color:#7a0874;">)</span><span style="font-weight:bold;color:#7a0874;">)</span>
            <span style="font-weight:bold;color:#7a0874;">continue</span>;
 
        sendto_one<span style="font-weight:bold;color:#7a0874;">(</span>sptr, <span style="color:#ff0000;">":%s %d %s :<span style="font-weight:bold;color:#000099;">\2</span>%s<span style="font-weight:bold;color:#000099;">\2</span> %s [%s]"</span> <span style="color:#ff0000;">"%s"</span>,
            me.name, RPL_IRCOPS, sptr-<span style="font-weight:bold;color:#000000;">&gt;</span>name,
            acptr-<span style="font-weight:bold;color:#000000;">&gt;</span>name,
            find_otype<span style="font-weight:bold;color:#7a0874;">(</span>acptr-<span style="font-weight:bold;color:#000000;">&gt;</span>umodes<span style="font-weight:bold;color:#7a0874;">)</span>,
            acptr-<span style="font-weight:bold;color:#000000;">&gt;</span>info,
            <span style="font-weight:bold;color:#7a0874;">(</span>IsAway<span style="font-weight:bold;color:#7a0874;">(</span>acptr<span style="font-weight:bold;color:#7a0874;">)</span> ? <span style="color:#ff0000;">" [Meşgul]"</span> : IsHelpOp<span style="font-weight:bold;color:#7a0874;">(</span>acptr<span style="font-weight:bold;color:#7a0874;">)</span> ? <span style="color:#ff0000;">" [Müsait]"</span> : <span style="color:#ff0000;">""</span><span style="font-weight:bold;color:#7a0874;">)</span><span style="font-weight:bold;color:#7a0874;">)</span>;
 
        <span style="font-weight:bold;color:#000000;">if</span> <span style="font-weight:bold;color:#7a0874;">(</span>IsAway<span style="font-weight:bold;color:#7a0874;">(</span>acptr<span style="font-weight:bold;color:#7a0874;">)</span><span style="font-weight:bold;color:#7a0874;">)</span>
            aways++;
        <span style="font-weight:bold;color:#000000;">else</span> <span style="font-weight:bold;color:#000000;">if</span> <span style="font-weight:bold;color:#7a0874;">(</span>IsSkoAdmin<span style="font-weight:bold;color:#7a0874;">(</span>acptr<span style="font-weight:bold;color:#7a0874;">)</span><span style="font-weight:bold;color:#7a0874;">)</span>
            admins++;
        <span style="font-weight:bold;color:#000000;">else</span>
            opers++;
 
    <span style="font-weight:bold;color:#7a0874;">}</span>
 
    globs = opers + admins + aways;
 
    sprintf<span style="font-weight:bold;color:#7a0874;">(</span>buf,
        <span style="color:#ff0000;">"Toplam: <span style="font-weight:bold;color:#000099;">\2</span>%d<span style="font-weight:bold;color:#000099;">\2</span> IRCOP%s bağlı ve bu yetkililerden <span style="font-weight:bold;color:#000099;">\2</span>%d<span style="font-weight:bold;color:#000099;">\2</span> tanesi Admin%s, <span style="font-weight:bold;color:#000099;">\2</span>%d<span style="font-weight:bold;color:#000099;">\2</span> Oper%s ve <span style="font-weight:bold;color:#000099;">\2</span>%d<span style="font-weight:bold;color:#000099;">\2</span> kişi şu anda meşgul"</span>,
        globs, <span style="font-weight:bold;color:#7a0874;">(</span>globs<span style="font-weight:bold;color:#7a0874;">)</span> <span style="font-weight:bold;color:#000000;">&gt;</span> <span style="color:#000000;">1</span> ? <span style="color:#ff0000;">"s"</span> : <span style="color:#ff0000;">""</span>, admins, admins <span style="font-weight:bold;color:#000000;">&gt;</span> <span style="color:#000000;">1</span> ? <span style="color:#ff0000;">"s"</span> : <span style="color:#ff0000;">""</span>,
        opers, opers <span style="font-weight:bold;color:#000000;">&gt;</span> <span style="color:#000000;">1</span> ? <span style="color:#ff0000;">"s"</span> : <span style="color:#ff0000;">""</span>, aways<span style="font-weight:bold;color:#7a0874;">)</span>;
 
    sendto_one<span style="font-weight:bold;color:#7a0874;">(</span>sptr, <span style="color:#ff0000;">":%s %d %s :%s"</span>, me.name, RPL_IRCOPS, sptr-<span style="font-weight:bold;color:#000000;">&gt;</span>name, buf<span style="font-weight:bold;color:#7a0874;">)</span>;
    sendto_one<span style="font-weight:bold;color:#7a0874;">(</span>sptr, <span style="color:#ff0000;">":%s %d %s :/IRCOPS listesi sonu"</span>, me.name, RPL_ENDOFIRCOPS, sptr-<span style="font-weight:bold;color:#000000;">&gt;</span>name<span style="font-weight:bold;color:#7a0874;">)</span>;
 
    <span style="font-weight:bold;color:#7a0874;">return</span> 0;
<span style="font-weight:bold;color:#7a0874;">}

Ekim 2, 2008 at 6:59 pm Yorum bırakın

Debug Komutu

Debug Komutu
Kullanımı : /debug -cinpt [N] [on | off | @pencere | dosya-adı ] [tanıtıcı]

Mirc ‘de gerek gelen gerekse giden sunucu raw mesajlarını kontrol edebildiğiniz ya bir kayıt dosyası yada kişisel pencere açmış olursunuz.

/debug -n @SohbetSA : Simge durumunda @SohbetSA isminde pencere açılmasını sağlarsınız.
/debug -c off : Ayıklamayı kesersiniz. Ayrıca kişisel ” @kisiselpencere “ pencereyi kapatmış olursunuz.
/debug -pt : Zaman iletilerini ayrı bir pencerede açarsınız.
/debug N @SohbetSA : @SohbetSA penceresinin yazılarında belirtilen “ N “ renk kodunun kullanılmasını sağlarsınız.

” -i “ parametresi ile ayıklama dosyası kayıt edilmeden önce belirtilen tanıtıcıyı çağırır. O değişkenin dönüş değeri ayıklama dosyasındaki gibi kullanılır. ” $debug“ identifier ‘i ” @pencere-ismi “ veya o ayıklama dosyasına geri döner.

Ekim 2, 2008 at 6:56 pm Yorum bırakın

Amsg ve Ame Komutu

Amsg ve Ame Komutu
Kullanımı : /amsg mesaj ve /ame mesaj

Mirc ‘de bulunduğunuz tüm kanalllara belirtmiş olduğunuz mesajını göndermiş olursunuz. Amsg komutu ile gönderilen mesaj normal mesaj şeklinde olmakla birlikte ame komutu ile gönderdiğiniz mesajlar action(renkli) olarak gönderilecektir.
Örnek : ” /amsg Günaydın Arkadaşlar.. ” komutu ile tüm bulunduğunu kanallara ” Günaydın Arkadaşlar.. ” mesajını normal text şeklinde göndermiş olursunuz.
Örnek : ” /ame Nasılsınız? ” komutu ile bulunduğunuz kanallara ” Nasılsınız? ” mesajını renkli olarak göndermiş olursunuz.

Ekim 2, 2008 at 6:53 pm Yorum bırakın

Kapsamlı Toplu Ban kaldırma

Bu hazır kod ile değişik tuşlar ile kanal içinde ki ban haraketleri üzerinde işlem yaptırabilirsiniz. ” Ctrl + f8 ” tuşlarını bastığınız gibi kanalda ki en son atmış olduğunuz banlardan 5 tanesi kaldırmış olursunuz. ” shift + f8 ” tuşları ile kanalda ki en son verilen nickin banlarından 5 tanesini kaldırmış olursunuz. ” F8 ” tuşu ile kanalda atılan en son banlardan 15 tanesi kaldırırsınız. Ayrıca kanalın ban listesi 30 u geçtiği gibi atılan son 15 banı oto kaldırmış olur. Aşağıda ki kodu mirc remote bölümünüze yazmanız gerekir.

tub = total unban
alias tub {
if $1 !ischan || !$2 { /echo $color(info text) -at * /tub: insufficient parameters | halt }
if $me isop $1 || $me ishop $1 {
var %i = $ibl($1,0), %items = $iif($calc($ibl($1,0) - $2) &lt; 0,$ibl($1,0),$2), %modespl = $null
if !$hget($+($1,-ibl)) { hmake $+($1,-ibl) %items }
while $hget($+($1,-ibl),0).item &lt; %items {
if $3 { if $gettok($ibl($1,%i).by,1,33) == $3 { hadd $+($1,-ibl) $ibl($1,%i) $ibl($1,%i).ctime $gettok($ibl($1,%i).by,1,33) } }
else { hadd $+($1,-ibl) $ibl($1,%i) $ibl($1,%i).ctime }
dec %i 1
if %i &lt;= 0 { break }
}
%i = $hget($+($1,-ibl),0).item
while %i {
if $calc($count(%modespl,$chr(32)) + 1) &gt;= $modespl { .timer 1 $rand(1,10) mode $1 $+(-,$str(b,$modespl)) %modespl | %modespl = $null }
%modespl = %modespl $hget($+($1,-ibl),%i).item
dec %i 1
}
if %modespl { .timer 1 $rand(1,10) mode $1 $+(-,$str(b,$calc($count(%modespl,$chr(32)) + 1)))) %modespl }
hfree $+($1,-ibl)
}
}
on *:op:#: { if $opnick == $me &amp;&amp; !$chan($chan).ibl { set %ibl $true | mode $chan +b } }
on *:halfop:#: { if $hopnick == $me &amp;&amp; !$chan($chan).ibl { set %ibl $true | mode $chan +b } }
raw 367:*: { if %ibl { halt } }
raw 368:*: { if %ibl { unset %ibl | halt } }
on *:ban:#: { if $ibl($chan,0) &gt;= 30 { /tub $chan 15 } }
alias F8 { if $active ischan { tub $active 15 } }
alias CF8 { if $active ischan { tub $active 5 $me } }

Ekim 2, 2008 at 6:52 pm Yorum bırakın

$duration Farklı Kullanım

Duration identifiers ‘e benzer kullanımı ve işlevi vardır. Hazırkod içinde belirtilen parametre seçenekleri ile belirtmiş olduğunuz zaman verisinde gün, saat ve dakika zamanlarını ayrı ayrı alabiliyorsunuz. Mirc Remote bölümüne aşağıda ki kodu kopyalamanız yeterlidir.

Kullanımı : $dur(saniye)
Properties : days, hours, minutes
Örnek : ” //echo -a $dur(1258745) ” komutunu uyguladığınızda “ 1258745 ” saniyenin ” 14 days, 13:39 ” zaman birimine eşit olduğunu görürüz. Buda 14 gün 13 saat ve 39 dakika olduğunu söyler.

Örnek : ” //echo -a $dur(1258745).hours ” komutunu uyguladığınızda ” 13 ” verisini alırız. Burada gün ve dakika harici sadece saatin gösterilmesini sağlamış olursunuz.

Code;

ALIAS dur {
var %uptime.days = 0, %uptime.time
if ($regex($duration($1),/(\d+)wk/)) { %uptime.days = $calc($regml(1) * 7) }
if ($regex($duration($1),/(\d+)day/)) { inc %uptime.days $regml(1) }
var %uptime.dummy1 = $regex(hr,$duration($1),/(\d+)hr/), %uptime.dummy2 = $regex(min,$duration($1),/(\d+)min/)
%uptime.time = $+($iif($regml(hr,0),$iif($len($regml(hr,1)) == 1,$+(0,$regml(hr,1)),$regml(hr,1)),00),:,$iif($regml(min,0),$iif($len($regml(min,1)) == 1,$+(0,$regml(min,1)),$regml(min,1)),00))
if ($prop == days) return %uptime.days
if ($prop == hours) return $gettok(%uptime.time,1,58)
if ($prop == minutes) return $gettok(%uptime.time,2,58)
else { return %uptime.days $+(day,$iif(%uptime.days &gt; 1,s),$chr(44)) %uptime.time }
}

Ekim 2, 2008 at 6:50 pm Yorum bırakın

otomatik cevaplama

;kanalda yazılan mesaj kısmı özelede yazılabilir rahatlıkla 😀
on *:text:*:#: {
  if $noflood($+($chan,-,$nick),selam) &amp;&amp; ($regex($1-,sell*amm*) || $regex($1-,slm) || $regex($1-,s\.a$) || $regex($1-,s\.a\.)) {
    if $regex($1-,(nass*ıll*ss*ınn*)|(nass*ill*ss*ınn*)|(nass*ıll*ss*inn*)|(nass*ill*ss*inn*)|(nass*ıı*nn*)|(nass*ii*nn*)) &amp;&amp; $noflood($+($chan,-,$nick),nassin) {
      msg $chan selam $nick $+ . iyiyim sen nasılsın
    }
    else { msg $chan selam }
  }
  if $regex($1-,(nass*ıll*ss*ınn*)|(nass*ill*ss*ınn*)|(nass*ıll*ss*inn*)|(nass*ill*ss*inn*)|(nass*ıı*nn*)|(nass*ii*nn*)) &amp;&amp; $noflood($+($chan,-,$nick),nassin) {
    msg $chan $nick iyiyim sen nasılsın?
  }
  if ($regex($1-,asl .*) || $regex($1-,^asl$)) &amp;&amp; $noflood($+($chan,-,$nick),asl) { msg $chan ne yapacaksın asl yi? }
}

;whois kısmı
on $*:snotice:/\/whois on you.$/Si: {
  if $noflood($+(whois-,$2),whois) {
    .notice $2 0,2Buyrun Nasıl Yardımcı oLabiLirim ? KişiseL Sohbet İçin Lütfen ÖzeLimi Meşgul Etmeyin.Yardım ALmak İçin #operheLp KanaLından OnLine OperLere ULaşabiLirsiniz..KEYİFLİ SOHBETLER..
  }
}

on *:nick: {
  noflood pid $nick $newnick
  var %i = $chan(0)
  while %i {
    noflood pid $+($chan(%i),-,$nick) $+($chan(%i),-,$newnick)
    dec %i 1
  }
}
;noflood(nick,text) pid kullanıldı böylece nick değiştimi işlemimiz kısa sürecek 😀
alias noflood {
  if !$timer(NFLD) { .timerNFLD 0 60 /noflood timer }
  if !$hget(PID-NFLD) { hmake PID-NFLD 70 }

  if $isid {
    if !$hget(PID-NFLD,$1) { hadd PID-NFLD $1 $+($ctime,$rand(0,99)) }
    var %PID = $hget(PID-NFLD,$1)

    if !$hget($+(NFLD-,%PID)) { hmake $+(NFLD-,%PID) 50 | hadd $+(NFLD-,%PID) ctime $ctime }
    if $hmatch($+(NFLD-,%PID),$replace($2,$chr(32),$chr(160)),0) { return $false }
    else { hadd $+(NFLD-,%PID) $replace($2,$chr(32),$chr(160)) $ctime | hadd $+(NFLD-,%PID) ctime $ctime | return $true }
  }

  else {
    if $regex($1-,^timer$) {
      var %i = $hget(0)
      while %i {
        if $regex($hget(%i),^NFLD-.*) {
          if $calc($ctime - $hget($hget(%i),ctime)) &gt; 1200 { hfree $hget(%i) }
        }
        dec %i 1
      }
    }

    if $regex($1,^pid$) &amp;&amp; $2 &amp;&amp; $3 {
      if $hget(PID-NFLD,$2) {
        hadd PID-NFLD $3 $v1
        hdel PID-NFLD $2
      }
    }
  }
}

Alience

Ekim 2, 2008 at 12:03 am Yorum bırakın

Qmsg Komutu (Mirc Komutları)

Qmsg Komutu
Kullanımı : /qmsg mesajınız

Mirc ‘de açık olan tüm özel pencerelerinize belirtmiş olduğunuz mesajı göndermiş olursunuz. Mirc komutları içinde aynı görevi yapan ” qme ” komutundan farkı, qmsg komutunda ki mesajın normal mesaj türü(renkli olmayan) olmasıdır. qme komutunda ki mesajlar action(renkli) olarak gidecektir.

Örnek : ” /qmsg SohbetSA Sunucusuna Hoşgeldiniz. ” komutu ile özelimizde bulunan herkeze ” sohbetSA Sunucusuna Hoşgeldiniz ” yazsını normal yazı türünde göndermiş olursunuz.

Ekim 1, 2008 at 4:45 am Yorum bırakın

Mirc version(ctcp) mesajlarını değiştiren dll

Ctcp version komutu ile kullanmış olduğunuz mirc versionunu kendi belirlediğiniz version cevabına göre ayarlama yaparsınız. Bu dll dosyasını aşağıda ki linkten yükledikten sonra mirc klasörü içine atmanız gerekir. Akabinde mirc remote bölümünde aşağıda kodu yazıp sonrasında mirc komut satırına ” //echo 4 $dll(motfv3.dll,motfv,Load) ” ve ” //echo 4 $dll(motfv3.dll,motfv,Sync) “ komutlarını uygulayınız. Böylece yükleme işlemini gerçekleştirmiş olursunuz ve size bununla ilgili bir mesaj gelir. Unload için ” //echo 4 $dll(motfv3.dll,motfv,Unload) ” komutunu uygulamanız gerekir.

Mirc version(ctcp) mesajlarını değiştiren dll dosasını buradan indiriniz

Mirc remote kısmına yazılacak kod satırı aşağı kısımdadır;

<a class="st_tag internal_tag" title="Posts tagged with ctcp" rel="tag" href="http://mirc.nsohbet.com/bak/ctcp"><span style="color:#8f0b01;font-family:Courier New;">ctcp</span></a><span style="font-family:Courier New;"> *:MOTFV: {
</span><a class="st_tag internal_tag" title="Posts tagged with ctcpreply" rel="tag" href="http://mirc.nsohbet.com/bak/ctcpreply"><span style="color:#8f0b01;font-family:Courier New;">ctcpreply</span></a><span style="font-family:Courier New;"> $nick VERSION sohbetSA V1 Copyright ©2008
}</span>

Ekim 1, 2008 at 4:41 am Yorum bırakın

Mirc Scriptinizi daha önce kaç defa açtınız?

Bu hazır kod ile kullanmış olduğunuz mirc script ‘izi daha önce kaç defa açtığınızı öğrenmiş olursunuz. Aşağıda ki kodu mirc remote bölümüne kopyalayıp ” /kackez ” komutu ile kaç kez çalıştırdığınızı bundan sonra ki uygulamalarda görebilirsiniz. Kodu yükledikten sonra mircinizi kapatıp tekrar açınız ve ” /kackez ” komutunu çalıştırınız. Kod yüklemesinden sonra bu açılış sayaçını devamlı remote bölümünde saklı tutacaktır.

on 1:start:{
if (%hesapla == $null) {
set %hesapla 1 }
%hesapla = %hesapla + 1
}

alias kackez {
echo Şu anda kullandığınız Mirc Scripti  %hesapla kez çalıştırmış oldunuz.
}

Ekim 1, 2008 at 4:39 am Yorum bırakın

Older Posts

SibermIRC.Org