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

16Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 14 Ekim 2015, 15:51   #1
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (1)
IF Ticaret Yüzdesi:(%)
anket kodu




merhabalar öncelikle böyle bir kod varmidir hic rastlamadım eger elinde olan varsa paylaşırsa sevinirim Kod anket üzerine sorusu ve 4-5 maddesi olan her nickin 1 oy kullandigi bir anket kodu yardımcı olan arkadaşlara simdiden tşk ederim

__________________
Eğer mutluluk para olsaydı, mesleğiniz ne olurdu?
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Yazgulu Sohbet
Alt 14 Ekim 2015, 17:37   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (2)
IF Ticaret Yüzdesi:(%)
Cevap: anket kodu




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Merhabalar ... Kodu ne için ıstıyorsun birazdaha acıklayıcı olabilirmisin nerde kullanacaksın ?


Mirc için istiyorsanız [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Burda Bir addon var ... bu değil ise yardımcı olmaya çalışalım ...

 
Alıntı ile Cevapla

Alt 14 Ekim 2015, 17:51   #3
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (1)
IF Ticaret Yüzdesi:(%)
Cevap: anket kodu




Anketi user ler için düşünüyorum mrc entegre edeceğim bir şey misal bir soru ve abcd gibi 5 seçeneği olan ve nickin 1 oy kullandigi bir sey suan verdiğiniz linki inceliyorum

__________________
Eğer mutluluk para olsaydı, mesleğiniz ne olurdu?
 
Alıntı ile Cevapla

Alt 14 Ekim 2015, 23:58   #4
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (1)
IF Ticaret Yüzdesi:(%)
Cevap: anket kodu




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
;Anket Addonu. ;Tüm kodlar kullanılabilir. ;Tek ricam bu addonu kalkıp başka bir nick altında "ben yazdım diye yayınlamayın lütfen. ;Güle güle kullanın. ;Iletişim MSN : admin@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ix.org On *:Join:#: { if ($nick !== $me) { if ($chan == %anketkanal) { .msg $nick Anketimize katılmak ister misiniz? | .msg $nick Anketimize katılmak için lütfen !Anket yazınız. | .msg $nick Anket sonuçlarını görmek içinse !Sonuc yazınız. | AnketleriBirArttir } if ($chan !== %anketkanal) { Halt } } } On *:Text:*:?: { if ($1 == !Sonuc) { Sonuclar } if ($1 == !Anket) { Anket } if ($1 == !Oy) { Set %OyAdresi $address($nick,3) | Set %oyveren $nick | Set %VerdigiOy $2 | .Denetleme } } Alias Sonuclar { if (%sonuc1 !== $null) { .msg $nick 4 %sonuc1 sonucunun aldığı oy sayısı %sonucoy1 } if (%sonuc2 !== $null) { .msg $nick 2 %sonuc2 2sonucunun aldığı oy sayısı %sonucoy2 } if (%sonuc3 !== $null) { .msg $nick 4 %sonuc3 2sonucunun aldığı oy sayısı %sonucoy3 } if (%sonuc4 !== $null) { .msg $nick 2 %sonuc4 2sonucunun aldığı oy sayısı %sonucoy4 } } Alias Anket { .msg $nick Anketimize hoşgeldiniz. .msg $nick Anket sorumuz şöyledir. .msg $nick  .msg $nick %anketsoru .msg $nick  .SonucOzel } Alias SonucOzel { if (%sonuc1 !== $null) { .msg $nick 1) 4 %sonuc1 } if (%sonuc2 !== $null) { .msg $nick 2) 4 %sonuc2 } if (%sonuc3 !== $null) { .msg $nick 3) 4 %sonuc3 } if (%sonuc4 !== $null) { .msg $nick 4) 4 %sonuc4 } .msg $nick  .msg $nick Anketimize katılmak için lütfen !Oy Seçtiğiniz şıkkın numarası. Örn : !Oy 1 } Alias Denetleme { if $read(Liste.txt,w,%OyAdresi) { .msg %Oyveren Üzgünüm, daha önceden oy kullanmışsınız. | halt } if !$read(Liste.txt,w,%OyAdresi) { .Oylamayap } } Alias OylamaYap { if (%VerdigiOy == $NULL) { .msg %Oyveren Lütfen seçtiğiniz anket cevabının numarasını giriniz. | .msg %Oyveren Örnek : !Oy 2 | halt } if (%VerdigiOy == 1) { inc %sonucoy1 } if (%VerdigiOy == 2) { inc %sonucoy2 } if (%VerdigiOy == 3) { inc %sonucoy3 } if (%VerdigiOy == 4) { inc %sonucoy4 } .msg $nick Oyunuz kaydedilmiştir. Oylama yaptığınız anket cevap numarası %VerdigiOy .write Liste.txt %OyAdresi .halt } Alias AnketleriBirArttir { inc %ilkanketgiris if (%ilkanketgiris == 1) { if (%sonuc1 !== $null) { inc %sonucoy1 } if (%sonuc2 !== $null) { inc %sonucoy2 } if (%sonuc3 !== $null) { inc %sonucoy3 } if (%sonuc4 !== $null) { inc %sonucoy4 } } if (%ilkanketgiris !== 1) { return } } Alias f1 { set %anketkanal $$?="Anket kanalını başında # olarak yazınız." | TestKanal } Alias TestKanal { if (%anketkanal == $null) { echo -a Anket sistemi anket kanalı olmadan maalesef çalışmaz. | halt } if (%anketkanal !== $null) { set %anketsoru $$?"Anketin sorusunu açık bir dille yazınız." | AnketSoruTest } } Alias AnketSoruTest { if (%anketsoru == $Null) { echo -a Sorusuz anket olur mu hiç? :) | echo -a Lütfen ankete soru girin. | halt } if (%anketsoru !== $null) { Set %sonuc1 $$?="Anket cevap 1 yazınız" | Cevapbirtest } } Alias CevapbirTest { if (%sonuc1 == $null) { echo -a Lütfen ankete sonuç giriniz. | halt } if (%sonuc1 !== $null) { set %sonuc2 $$?="Anket cevap 2 yazınız" | Cevapikitest } } Alias CevapikiTest { if (%sonuc2 == $null) { echo -a Lütfen ankete sonuç giriniz. | halt } if (%sonuc2 !== $null) { set %sonuc3 $$?="Anket cevap 3 yazınız" | Cevapuctest } } Alias CevapucTest { if (%sonuc3 == $null) { echo -a Lütfen ankete sonuç giriniz. | halt } if (%sonuc3 !== $null) { set %sonuc4 $$?="Anket cevap 4 yazınız" | Cevapdorttest } } Alias CevapdortTest { if (%sonuc4 == $null) { halt } if (%sonuc4 !== $null) { halt } }


Burasi cok karisik değiştirilmesi gereken kisimlar nelerdir bu kod hakkında bilgi verecek arkdaslar varmi

__________________
Eğer mutluluk para olsaydı, mesleğiniz ne olurdu?
 
Alıntı ile Cevapla

Alt 15 Ekim 2015, 15:24   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: anket kodu




Kimimben Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
;Anket Addonu. ;Tüm kodlar kullanılabilir. ;Tek ricam bu addonu kalkıp başka bir nick altında "ben yazdım diye yayınlamayın lütfen. ;Güle güle kullanın. ;Iletişim MSN : admin@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ix.org On *:Join:#: { if ($nick !== $me) { if ($chan == %anketkanal) { .msg $nick Anketimize katılmak ister misiniz? | .msg $nick Anketimize katılmak için lütfen !Anket yazınız. | .msg $nick Anket sonuçlarını görmek içinse !Sonuc yazınız. | AnketleriBirArttir } if ($chan !== %anketkanal) { Halt } } } On *:Text:*:?: { if ($1 == !Sonuc) { Sonuclar } if ($1 == !Anket) { Anket } if ($1 == !Oy) { Set %OyAdresi $address($nick,3) | Set %oyveren $nick | Set %VerdigiOy $2 | .Denetleme } } Alias Sonuclar { if (%sonuc1 !== $null) { .msg $nick 4 %sonuc1 sonucunun aldığı oy sayısı %sonucoy1 } if (%sonuc2 !== $null) { .msg $nick 2 %sonuc2 2sonucunun aldığı oy sayısı %sonucoy2 } if (%sonuc3 !== $null) { .msg $nick 4 %sonuc3 2sonucunun aldığı oy sayısı %sonucoy3 } if (%sonuc4 !== $null) { .msg $nick 2 %sonuc4 2sonucunun aldığı oy sayısı %sonucoy4 } } Alias Anket { .msg $nick Anketimize hoşgeldiniz. .msg $nick Anket sorumuz şöyledir. .msg $nick .msg $nick %anketsoru .msg $nick .SonucOzel } Alias SonucOzel { if (%sonuc1 !== $null) { .msg $nick 1) 4 %sonuc1 } if (%sonuc2 !== $null) { .msg $nick 2) 4 %sonuc2 } if (%sonuc3 !== $null) { .msg $nick 3) 4 %sonuc3 } if (%sonuc4 !== $null) { .msg $nick 4) 4 %sonuc4 } .msg $nick .msg $nick Anketimize katılmak için lütfen !Oy Seçtiğiniz şıkkın numarası. Örn : !Oy 1 } Alias Denetleme { if $read(Liste.txt,w,%OyAdresi) { .msg %Oyveren Üzgünüm, daha önceden oy kullanmışsınız. | halt } if !$read(Liste.txt,w,%OyAdresi) { .Oylamayap } } Alias OylamaYap { if (%VerdigiOy == $NULL) { .msg %Oyveren Lütfen seçtiğiniz anket cevabının numarasını giriniz. | .msg %Oyveren Örnek : !Oy 2 | halt } if (%VerdigiOy == 1) { inc %sonucoy1 } if (%VerdigiOy == 2) { inc %sonucoy2 } if (%VerdigiOy == 3) { inc %sonucoy3 } if (%VerdigiOy == 4) { inc %sonucoy4 } .msg $nick Oyunuz kaydedilmiştir. Oylama yaptığınız anket cevap numarası %VerdigiOy .write Liste.txt %OyAdresi .halt } Alias AnketleriBirArttir { inc %ilkanketgiris if (%ilkanketgiris == 1) { if (%sonuc1 !== $null) { inc %sonucoy1 } if (%sonuc2 !== $null) { inc %sonucoy2 } if (%sonuc3 !== $null) { inc %sonucoy3 } if (%sonuc4 !== $null) { inc %sonucoy4 } } if (%ilkanketgiris !== 1) { return } } Alias f1 { set %anketkanal $$?="Anket kanalını başında # olarak yazınız." | TestKanal } Alias TestKanal { if (%anketkanal == $null) { echo -a Anket sistemi anket kanalı olmadan maalesef çalışmaz. | halt } if (%anketkanal !== $null) { set %anketsoru $$?"Anketin sorusunu açık bir dille yazınız." | AnketSoruTest } } Alias AnketSoruTest { if (%anketsoru == $Null) { echo -a Sorusuz anket olur mu hiç? :) | echo -a Lütfen ankete soru girin. | halt } if (%anketsoru !== $null) { Set %sonuc1 $$?="Anket cevap 1 yazınız" | Cevapbirtest } } Alias CevapbirTest { if (%sonuc1 == $null) { echo -a Lütfen ankete sonuç giriniz. | halt } if (%sonuc1 !== $null) { set %sonuc2 $$?="Anket cevap 2 yazınız" | Cevapikitest } } Alias CevapikiTest { if (%sonuc2 == $null) { echo -a Lütfen ankete sonuç giriniz. | halt } if (%sonuc2 !== $null) { set %sonuc3 $$?="Anket cevap 3 yazınız" | Cevapuctest } } Alias CevapucTest { if (%sonuc3 == $null) { echo -a Lütfen ankete sonuç giriniz. | halt } if (%sonuc3 !== $null) { set %sonuc4 $$?="Anket cevap 4 yazınız" | Cevapdorttest } } Alias CevapdortTest { if (%sonuc4 == $null) { halt } if (%sonuc4 !== $null) { halt } }

Burasi cok karisik değiştirilmesi gereken kisimlar nelerdir bu kod hakkında bilgi verecek arkdaslar varmi

bot özelinde
if ($1 == !Anket) { Anket }
!anket Komutunu Kullandığında Soruyu Gösterir
-
if ($1 == !Oy)
yine bot özelinde !oy (cevapnumarası)
yaparsanız oy vermiş olursunuz

-
if ($1 == !Sonuc) { Sonuclar }
yine bot özelinde !sonuc yaptığınızda verilen oyları gösterir.

__________________
Güneşin ilk ışıklarına vererek umutlarımı
Masal Dünyamın açıp kapılarını
Girdim insan Kalabalığına
 
Alıntı ile Cevapla

Alt 15 Ekim 2015, 15:29   #6
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (1)
IF Ticaret Yüzdesi:(%)
Cevap: anket kodu




Tamam da bu kodu remoteye atıp f1 yaptım ve f1 de çıkan kısımları doldurduğum halde anket işini yapmadı bot özelinde derken bu kodu herhangi bir bota yerleştirmedim kendi kullandığım mirce yerleştirdim ve !Anket gibi komutları da denedim hiç bir cevap vermedi

__________________
Eğer mutluluk para olsaydı, mesleğiniz ne olurdu?
 
Alıntı ile Cevapla

Alt 15 Ekim 2015, 15:37   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: anket kodu




Kimimben Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
kendi kullandığım mirce yerleştirdim

kendi mircine yerleştirip kendin kullanacaksan ;
on *:text:*:?: {
gibi olan satırları ;
on *:input:*: {
yapmalısın

__________________
Güneşin ilk ışıklarına vererek umutlarımı
Masal Dünyamın açıp kapılarını
Girdim insan Kalabalığına
 
Alıntı ile Cevapla

Alt 15 Ekim 2015, 15:41   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (2)
IF Ticaret Yüzdesi:(%)
Cevap: anket kodu




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Merhabalar...

Simdi bastan Başlayalım herhangi bir kanalda @ yetkılı olan bir mirc icinde calıstırabilirsiniz ...

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Arkadasımın dedigi gibi Sizden haric bir Nick Bot ozeline

bot özelinde
if ($1 == !Anket) { Anket }
!anket Komutunu Kullandığında Soruyu Gösterir
-
if ($1 == !Oy)
yine bot özelinde !oy (cevapnumarası)
yaparsanız oy vermiş olursunuz
-
if ($1 == !Sonuc) { Sonuclar }
yine bot özelinde !sonuc yaptığınızda verilen oyları gösterir.


Mirc icinde Liste.txt klasorune kaydeder sonuclari

Almıs oldugunuz hatayı soylersenız dahada yard. olabilirim Saygılarım ile ..

 
Alıntı ile Cevapla

Alt 15 Ekim 2015, 16:39   #9
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (1)
IF Ticaret Yüzdesi:(%)
Cevap: anket kodu




Peki bu salonda olmaz mı özelde değil de salonda !Anket yazınca sorusunu ve Şıklarını verecek ve Userler ise oy kullanacak şekilde olmaz mı

__________________
Eğer mutluluk para olsaydı, mesleğiniz ne olurdu?
 
Alıntı ile Cevapla

Alt 16 Ekim 2015, 16:06   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: anket kodu




Kimimben Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Peki bu salonda olmaz mı özelde değil de salonda !Anket yazınca sorusunu ve Şıklarını verecek ve Userler ise oy kullanacak şekilde olmaz mı

On *:Text:*:?: {
kısmını
on *:text:*:#KANAL: {
şeklinde yaparsan Belirttiğin Kanalda Uygulanır

__________________
Güneşin ilk ışıklarına vererek umutlarımı
Masal Dünyamın açıp kapılarını
Girdim insan Kalabalığına
 
Alıntı ile Cevapla

Cevapla


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Hazir Kodu Sound kodu Lazim Pandorum mIRC Scripting Sorunları 2 22 Ekim 2010 12:00
selam status ekranına saat kodu koydum O Kodu NASIL SİLECEM ??? Y ofofyaRim mIRC Scripting Sorunları 5 31 Ağustos 2009 23:42
Anket :) XcLusive Komik Loglar 3 04 Mart 2009 20:02