Kanal ve Özel Loglama Modülü m_loggit.c

/* * ================================================================== * Filename:             m_loggit.c * Description:          Real-time Logging * Written by:         MartinCo * ================================================================== */#include "config.h"#include "struct.h"#include "common.h"#include "sys.h"#include "numeric.h"#include "msg.h"#include "channel.h"#include <time .h>#include <sys /stat.h>#include <stdio .h>#include <stdlib .h>#include <string .h>#include <fcntl .h>#include "h.h"// ==================================================================// Definitions & macros// ================================#define MyMod            LoggitModInfo->handle#define DelHook(x)        if (x) HookDel(x); x = NULLDLLFUNC char        *loggit_privmsg(aClient *, aClient *, aClient *, char *, int);DLLFUNC char        *loggit_chanmsg(aClient *, aClient *, aChannel *, char *, int);// ==================================================================// Module header// ==================================================================ModuleHeader MOD_HEADER(m_loggit)  = {    "Loggit",    "$Id: m_loggit.c,v 3.6 2007 MartinCo Exp $",    "Loggit",    "3.2-b8-1",    NULL    };ModuleInfo        *LoggitModInfo;static Hook        *HookPrivMsg;static Hook        *HookChanMsg;static FILE *fp;DLLFUNC int MOD_INIT(m_loggit)(ModuleInfo *modinfo){    int ret = MOD_SUCCESS;              LoggitModInfo    = modinfo;    HookPrivMsg    = HookAddPCharEx(MyMod, HOOKTYPE_USERMSG, loggit_privmsg);    HookChanMsg    = HookAddPCharEx(MyMod, HOOKTYPE_CHANMSG, loggit_chanmsg);    return ret;}DLLFUNC int MOD_LOAD(m_loggit)(int module_load){    return MOD_SUCCESS;}DLLFUNC int MOD_UNLOAD(m_loggit)(int module_unload){    DelHook(HookChanMsg);    DelHook(HookPrivMsg);    return MOD_SUCCESS;}// ==================================================================// Functions for nicknames, channel names and prefixes// ==================================================================DLLFUNC char *loggit_privmsg(aClient *cptr, aClient *sptr, aClient *acptr, char *text, int notice){    time_t calender_time;    struct tm tdate;    calender_time = time(NULL);    tdate = *localtime(&calender_time);    FILE * pFile;    pFile = fopen ("privmsg.log", "a");    fprintf (pFile, "%02d-%02d-%02d %02d:%02d [%s > %s] %s\n", tdate.tm_mday, tdate.tm_mon + 1, tdate.tm_year - 100, tdate.tm_hour, tdate.tm_min, cptr->name, acptr->name, text);    fclose (pFile);    return text;}DLLFUNC char *loggit_chanmsg(aClient *cptr, aClient *sptr, aChannel *chptr, char *text, int notice){    time_t calender_time;    struct tm tdate;    calender_time = time(NULL);    tdate = *localtime(&calender_time);    FILE * pFile;    pFile = fopen ("chanmsg.log", "a");    fprintf (pFile, "%02d-%02d-%02d %02d:%02d [%s] [%s] %s\n", tdate.tm_mday, tdate.tm_mon + 1, tdate.tm_year - 100, tdate.tm_hour, tdate.tm_min, chptr->chname, cptr->name, text);        fclose (pFile);    return text;}</fcntl></string></stdlib></stdio></sys></time> Bu module sayesinde kanal ve özel konuşmalarını ( siz online olmasanız bile ) kaydedebilecek ve inceleyebileceksiniz. Sistem, özel konuşmaları Unreal klasörü içerisine privmsg.log olarak, kanal konuşmalarını ise yine aynı klasöre chanmsg.log olarak kaydediyor. İstediğiniz değişiklikleri yapıp kullanmak da mümkün. Alıntıdır.

» Devamını Oku

mIRC Özele kodla girmek

; Bu yazıyı değiştirmek kodun çalışmamasına sebep olabilir... ;Bu kod PysCoPaT tarafından yazılmıştır...on *:open:?:*:{    if ( $nick != %ozelson ) {    unset %ozelkod    set %ozelyazi $1-     set %gerekli  (ßy PysCoPaT)     set %ozelkod $rand(a,z) $+ $rand(1,9) $+ $rand(a,z)     .privmsg $nick 4 Kontrol ediliyorsunuz... 15 %gerekli    .timer 1 4 .msg $nick 2Selam4 $nick     .timer 1 4 .msg $nick 2Bot olmadığınız kanıtlamak için özelime 4 !kod %ozelkod 2 yazınız.. 15 %gerekli    .timer 1 4 .msg $nick 2Kodu 30 saniye içinde girmediğiniz zaman mesajlarınızı göremiyeceğim. 15 %gerekli    window -m @Özel     echo @Özel 1,4 $time(HH:nn.ss) 2 Özel isteği Nick: 4 $nick     set %ozelson $nick    .timer 1 30 unset %ozelson  }  closemsg $nick}on *:text:!kod *:?:{  if ( $2  ==  %ozelkod ) {    clear $nick    .window -m @Özel    .echo @Özel 1,4 $time(HH:nn.ss) 2 $nick şifreyi doğru girdiği için özelinize kabul edilmiştir...     .timers off    .q $nick    set %gerekli  (ßy PysCoPaT)    .msg $nick 2Şifreniz Doğru. Görüşme talebiniz 4kabul edilmiştir... Not Sadece İlk Yazdığınız $me Nickine ulaşacaktır... 15 %gerekli    .echo $nick $timestamp < $+ $nick $+ > %ozelyazi  }  else {    set %gerekli  (ßy PysCoPaT)    .privmsg $nick 2Girdiğiniz kod 4yanlıştır2 30 saniyeliğine bana yazmanız engellenmiştir...15 %gerekli    .timers off    .ignore $nick    .timer 1 30 ignore -r $nick    .closemsg $nick    unset %ozelson    .window -m @Özel    .echo @Özel 1,4 $time(HH:nn.ss) 2 $nick ile özel görüşme reddedilmiştir... Çünkü kodu yanlış girmiştir. Girmesi gereken kod:7 %ozelkod 2Kod olarak gösterilen yazı:4 $2   }}}

» Devamını Oku

mIRC Özel Karşılama

on *:open:?:*:{   msg $nick 4,1 15Selam 4 $nick  15>>>>>    msg $nick 4,1 15Bugün4 $date 15ve Saat 4 $time(HH:nn.ss) 15>>>  msg $nick 4,1 15Konuşmadığım Süre 4 $duration($idle)         15 >>>  msg $nick 4,1 15Toplam Açılan Özel Pencerem 4Sayısı %q! 15 >>  inc %q!  msg $nick 4,1 15Şu an Özelimdeki4 $+($query(0),.) 15Kişisin Müsait Olduğumda Cevap Verilecektir  msg $nick 4,115. Lütfen Görüşmek istediginiz konuyu4,1 (Örnek  !Aşk ) 4,115 Şeklinde yazınız. 4KonuLar :  4 !Aşk15  , 4 !Sohbet 15  , 4 !Help 15  , 4 !access 15  ,  4 !Diger 15 ,   15Uygunsuz İstekler Durumunda Direk Olarak ignore Edileceksiniz4.9­Servisler iLe iLgiLi Sorunlariniz için 4/join #help 9 Yaziniz.  4 Zline ,  Kline ,  Akill ,  Nick ,   Kanal  9 ve  4$ifre  9Sorunlariniz icin 4 /join  #OperHelp  9Yaziniz...  inc %q!  if !Diger  iswm $1 { msg $nick 1,1 8   4,1 ßuyrun Sizi DinLiyorum ¿ ? }  if !şikayet iswm $1 { msg $nick 1,1 9 !Şikayet 0Edene EttiĞiniz Kişiye EttiĞiniz Konuya ßaqLı oLarak DeqerLendiriLiCekdir. }  if !Help iswm $1 { msg $nick 1,1 11 !help 0Komut SorCaksanız HeLp KanaLını KuLLanınız. O KanaL Sizin İçin Var. /join #help YapaßiLirsiniz. }  if !sohbet iswm $1 { msg $nick 1,1 7 !Sohbet 0iStiOsan ßoSuna ßekLeme GLoßaL KanaLLarı KuLLan. /Join #sohbet ;) }  if !aşk iswm $1 { msg $nick 1,1 13 !Aşk'a0 ayırıCak vakdIm yoq  :P }  if !access iswm $1 { msg $nick 1,1 8 !Access 0iStediĞiniz KanaLın HeLp KanaLına ve/veya SopLarına Giriniz.  }

» Devamını Oku

mIRC Özel kabul Addon

Ozel kabul menusu arkadaslar adinda belli özele gelenleri kabul veya red ediyoruz. Bi isim koymadim ayarlarinda SrjN var, mutlaka “/oz” ile acip assagi yukari olan oka basip oradan Script adini logosunu ayarlamalisiniz tamamen size göre ben ayarlarken SrjN yaptim ama size kalmis bu olay tamamen. Bunu unutmayin    DOWNLOAD : http://bc.vc/jFYe7p ALINTIDIR.

» Devamını Oku

Özel Koruması , Küfür Ban Deop Koruması

alias ozelk dialog -m ozelk ozelk dialog ozelk { title “HelpOper Script” size -1 -1 90 95 option dbu icon 1, 1 2 90 27, icon/cod.jpg box “ÖzeL Korumalar “, 2, 4 31 80 42 check “Küfür Koruması”, 3, 14 40 53 10 check “Ban Koruması”, 4, 14 50 50 10 check “Deop Koruması”, 5, 14 60 50 10 button […]

» Devamını Oku