IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Çözüldü mirc botunda özelde random soru sordurmak (https://www.ircforumlari.net/mirc-scripting-sorunlari/829499-mirc-botunda-ozelde-random-soru-sordurmak.html)

alphae 27 Ağustos 2019 01:05

Cevap: mirc botunda özelde random soru sordurmak
 
Alıntı:

Set Nickli Üyeden Alıntı (Mesaj 1042142268)
Engelleme yaptıramazsın, özel bir modülle ancak engelletirsin, unreal bazlı o şekil istediğin sonucu alabilirsin, yada bot üstünden değilde web bazlı işlem yatırırsın kanalda shun uygulatirsin birçok fikir çıkartabilirsin kısaca


Alta özel yazmayi engele modulu var ama sikintili sikintisi su servicesle alakali hic bisi calismioyor
hic bir islem yapamiyorum kendim oper oldum halde ozele yazamiyorum ayni zamanda startuste cift tikladimda hic bir sonuc vermiyor services engeliyor acikcasi.

Kod:

#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>
#ifdef _WIN32
#include <io.h>
#endif
#include <fcntl.h>
#include "h.h"
#include "proto.h"
#ifdef STRIPBADWORDS
#include "badwords.h"
#endif
#ifdef _WIN32
#include "version.h"
#endif

DLLFUNC char *ozelmesaj(aClient *, aClient *, aClient *, char *, int);

ModuleHeader MOD_HEADER(ozelmesaj)
= {
        "ozelmesaj",
        "Kayitsiz Nicklere Ozelde Konusma Engeli Modulu",
        "Coded by degisirsiniz",
        "3.2-b8-1",
        NULL
};

DLLFUNC int MOD_INIT(ozelmesaj)(ModuleInfo *modinfo)
{
        HookAddPCharEx(modinfo->handle, HOOKTYPE_USERMSG, ozelmesaj);
        return MOD_SUCCESS;
}

DLLFUNC int MOD_LOAD(ozelmesaj)(int module_load)
{
        return MOD_SUCCESS;
}

DLLFUNC int MOD_UNLOAD(ozelmesaj)(int module_unload)
{
        return MOD_SUCCESS;
}

DLLFUNC char *ozelmesaj(aClient *cptr, aClient *sptr, aClient *acptr, char *text, int notice)
{
        if (!IsARegNick(sptr)) {
                if (!IsServer(sptr) && !IsOper(sptr) && !IsULine(acptr)) {
                        sendnotice(sptr, "*** Mesaj gonderebilmek icin nickinizi kaydetmeniz gerekmektedir.");
                        return NULL;
                }
        }
        return text;
}


Set 27 Ağustos 2019 08:31

Cevap: mirc botunda özelde random soru sordurmak
 
Alıntı:

alphae Nickli Üyeden Alıntı (Mesaj 1042142278)
Alta özel yazmayi engele modulu var ama sikintili sikintisi su servicesle alakali hic bisi calismioyor
hic bir islem yapamiyorum kendim oper oldum halde ozele yazamiyorum ayni zamanda startuste cift tikladimda hic bir sonuc vermiyor services engeliyor acikcasi.

Kod:

#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>
#ifdef _WIN32
#include <io.h>
#endif
#include <fcntl.h>
#include "h.h"
#include "proto.h"
#ifdef STRIPBADWORDS
#include "badwords.h"
#endif
#ifdef _WIN32
#include "version.h"
#endif

DLLFUNC char *ozelmesaj(aClient *, aClient *, aClient *, char *, int);

ModuleHeader MOD_HEADER(ozelmesaj)
= {
        "ozelmesaj",
        "Kayitsiz Nicklere Ozelde Konusma Engeli Modulu",
        "Coded by degisirsiniz",
        "3.2-b8-1",
        NULL
};

DLLFUNC int MOD_INIT(ozelmesaj)(ModuleInfo *modinfo)
{
        HookAddPCharEx(modinfo->handle, HOOKTYPE_USERMSG, ozelmesaj);
        return MOD_SUCCESS;
}

DLLFUNC int MOD_LOAD(ozelmesaj)(int module_load)
{
        return MOD_SUCCESS;
}

DLLFUNC int MOD_UNLOAD(ozelmesaj)(int module_unload)
{
        return MOD_SUCCESS;
}

DLLFUNC char *ozelmesaj(aClient *cptr, aClient *sptr, aClient *acptr, char *text, int notice)
{
        if (!IsARegNick(sptr)) {
                if (!IsServer(sptr) && !IsOper(sptr) && !IsULine(acptr)) {
                        sendnotice(sptr, "*** Mesaj gonderebilmek icin nickinizi kaydetmeniz gerekmektedir.");
                        return NULL;
                }
        }
        return text;
}


Bunuda unrealcilere sorman gerekiyor, onlarda çok yardim severdir, yardımcı olucaklardir, oraya konu açarak sorununa çözüm bulursun

alphae 25 Kasım 2019 00:55

Cevap: mirc botunda özelde random soru sordurmak
 
altaki kod calsiyor ama bir sorun var sorun şu cözemedim.


Simdi Nicki kayit eden kisi help odasina bisi yazdinda bot yanlis cevap diyip atiyor.
istedigim şu sayi olarak yanlis cevap verirse atsin normal yazi yazdi icin atmasın.

Alıntı:

Set Nickli Üyeden Alıntı (Mesaj 1042142259)
Kod:

on *:text:*:#: {
  if $regex($3,/^(onaylayınız)$/Si) && $nick == nickserv {
    %soru = $read(sorular.txt)
      msg #help $strip($1) Soru: $token(%soru,1,149)
      msg #help  $strip($1) Nick kaydınızı tamamlamak için yukarıdaki soruyu cevaplayınız.
      .hadd -m register $strip($1) $token(%soru,2,149)
      return
    }
  if $hget(register,$nick) { %v1 = $v1
    if %v1 == $1- { msg #help $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -m register $nick | return }
  gzline $nick +0 yanlis cevap | ns dropnick $nick | hdel -m register $nick
}

Mobille biraz sorun çıkıyor k.bakma anca böyle düzenlemeler yapıyorum ama şuan istediğin gibi çalışması gerek



Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 00:42.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk