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

- mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)

- - Sınav Sistemi (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/505081-sinav-sistemi.html)

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

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

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Op/Oper/Admin/Helper Sınavını rahatlıkla yapabileceğiniz basit bir kod.

Süre/Soru/Tek Cevap Hakkı Seçeneklerini Manuel Belirleyebilirsiniz.

Sınav Sonunda Başarı Oranı % cinsinden verilecektir.

Addon herşeyi kendisi otomatik yapmaktadır ekstra bir işlem yapmanıza gerek yoktur.

En son resimde kendi eklediğim soruları daha cevaplayamadıgım aşikardır. Sercan daha sonradan aleyhimde kullanmasın diye ben şimdiden paylaştım:)))

Basit ama yararlı bir kod

Kurulum

1.) Sinav.Rar klasörünü Rar'dan çıkartarak Script ANA Dizinine Atın. Ana Dizin //run $mircdir komutuyla script içinden bulunur.

2.)/load -rs sinav/sinav.mrc komutuyla yükleyin.

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

1.)Facebook'tan. [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

2.)[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cevap: Sınav Sistemi

o zaman sınavı yapan kişi tarafından soruların sürekli güncel tutulması lazım, sınava girecek olan kişi bu eklentiyi kullanırsa %100 helper,oper,admin olacaktır;s4

Cevap: Sınav Sistemi

Tabi orası öyle zaten Sınav klasörünün içinde .txt biçiminde sınav soruları ve yeni soruların ne formatta ekleneceği yazılı ona bakarak yapabilirler. Unutulmaması gereken nokta cevabın *'dan sonra yazılacak olması. Bunuda hatırlatayım ve orada da yazıyor.

Cevap: Sınav Sistemi

Link e girdiğimizde dosya boyutu 00.00 kb. olarak gözüküyor. Yeniler misiniz?

Cevap: Sınav Sistemi

Link Güncellendi. Eklentiden İndirebilirsiniz.

Cevap: Sınav Sistemi

Kod İçin Teşekkürler uFuK kardeşim.. Bu Sınavı Normal Founder, Sop, Oplar kanalda yapamazlar mı? Yapabilmeleri için kodun neresine ne yazmamız gerekli..? Bir de txt dosyalarındaki soruları okumuyor kanala yansıtmıyor..

Cevap: Sınav Sistemi

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

Herhangi bir problem yok görüldüğü üzere. Aldığınız kodları üzerinde değişiklik yapmadan kurulum anlatımında belirtildiği gibi kopyalayın remoteye

Cevap: Sınav Sistemi

Abi yanlış anladın sanırım kodda değiştirme vs. yapmadım hiç.. Sen deneme yaptığın yerde adminsin.. Ben bunu normal bir op arkadaşa yüklettirip denettirdim.. Statuse İRCop yetkisine sahip değilsiniz vs. diye uyarı atıyormuş.. Bu yüzden txt.teki soruları okumamıştır diye düşünerek founder, sop, oplar kullanabilirler mi dedim.. Bileydim bu kadar zahmet vermezdim sana hakkını helal et.. Ayrıca deneme yaptığın Test nickli arkadaşta çok cahil ;) Şaka tabi o da sağolsun..

Cevap: Sınav Sistemi

Benim o Test :) Cevap süresini 4 saniye yaptım deneme diye :)

Çalışır Op Sop Founder User farketmez lakin şu var sınava çekeceği nicki /sajoin komutuyla çektiği için ircop yetkisine sahip değilsiniz uyarısı veriyor /sajoin olan kısmı silersen ve userin sınav odasına kendi girmesini sağlarsan kod çalışacaktır

Cevap: Sınav Sistemi

Alıntı:

IRCplus Nickli Üyeden Alıntı (Mesaj 1041306716)

linkler kırık

Link olarak değil arkadaş eklenti olarak eklemiş üstad.

Alıntı:

uFuK Nickli Üyeden Alıntı (Mesaj 1041256426)

Link Güncellendi. Eklentiden İndirebilirsiniz.

Cevap: Sınav Sistemi

Benim kullandigim mirc`de hata alıyorum hata " IRCOPER Unknown command " bu hatayı nasıl giderebilirim. Şimdiden sagol`un emeğinize sağlık.

Cevap: Sınav Sistemi

Downloand edilemiyor bilginiz olsun.

Cevap: Sınav Sistemi

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

Bu linkten indirebilirsiniz Link sağlam.

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] benim addonumda ircoper diye bir alias yok şimdi tekrar baktım ircoper aliasıyla başlayan bir syntax yok. Hangi işlemden sonra bu hatayi aldıgını söylersen daha net yardımcı olurum

Cevap: Sınav Sistemi

Kodları Merak ettim okuyayım dedim, son posttaki linkten indirdim, bunlar ne abi?
Dll'i yüklerken hata verdi, farklı exe sürümlerinde denedim. ııh olmadı.

PHP- Kodu:

   alias mdx return $dll(ufuk/mdx.dll,$1,$2-)
dialog fenomens {
  title "Proxy Koruma Sistemi"
  size -1 -1 251 121
  option dbu
  list 1, 3 11 50 84, size
  edit "", 4, 8 98 35 10, autohs
  button "Ekle", 2, 11 110 24 11
  text "İp Listesi", 3, 16 3 28 8
  list 5, 69 11 50 84, size
  edit "", 6, 74 98 35 10, autohs
  button "Ekle", 7, 77 110 24 11
  text "Muaf İp Listesi", 8, 77 3 44 8
  list 9, 136 11 50 84, size
  edit "", 10, 141 98 35 10, autohs
  button "Ekle", 11, 146 110 24 11
  text "Muaf Nick Listesi", 12, 139 3 47 8
  radio "Zline At", 13, 200 11 41 10
  radio "Shun At", 14, 200 23 42 10
  radio "G:Zline At", 15, 200 50 40 10
  radio "G:line At", 16, 200 36 42 10
  radio "Kill At", 17, 200 74 40 10
  radio "Kline At", 18, 200 62 39 10
  box "Ceza Türü", 19, 194 2 50 110
  edit "", 20, 197 97 44 10, autohs
  check "Proxy Sistem Aç/Kapa", 22, 179 114 70 10
  radio "Kanal Çek", 21, 200 85 40 10
}

on *:dialog:fenomens:*:*: { 
  if $devent == sclick { 
    if $did == 2 { did -a $dname 1 $did(4) | hadd -m t1 $did(4) | hsave t1 ufuk/t1.hash }
    if $did == 7 { did -a $dname 5 $did(6) | hadd -m t2 $did(6) | hsave t2 ufuk/t2.hash }
    if $did == 11 { did -a $dname 9 $did(10) | hadd -m t3 $did(10) | hsave t3 ufuk/t3.hash }
    if $did(13).state == 1 { set %cezatur zline } 
    if $did(14).state == 1 { set %cezatur shun } 
    if $did(16).state == 1 { set %cezatur gline }
    if $did(15).state == 1 { set %cezatur gzline }
    if $did(18).state == 1 { set %cezatur kline }
    if $did(17).state == 1 { set %cezatur kill }
    if $did(21).state == 1 { set %cezatur kcek | set %kcek1 $did(20) }
    if $did(22).state == 1 { set %proxysistem on } 
    else { unset %proxysistem }
  }
  if $devent == init { 
    mdx MarkDialog $dname
    mdx SetDialog $dname bgcolor $rgb(47,163,204)
    mdx SetFont $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22 +b Turkish 12 600 Arial
    mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22 textbg $rgb(47,163,204)
    mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22 background $rgb(47,163,204)
    mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22 text $rgb(0,0,0) 
    mdx SetDialog $dname style title tool sysmenu
    var %t 1
    while %t <= $hmatch(t1,*,0) {
      did -a $dname 1 $hmatch(t1,*,%t)
      inc %t
    }
    var %t 1
    while %t <= $hmatch(t2,*,0) {
      did -a $dname 5 $hmatch(t2,*,%t)
      inc %t
    }
    var %t 1
    while %t <= $hmatch(t3,*,0) {
      did -a $dname 9 $hmatch(t3,*,%t)
      inc %t
    }
    if %cezatur == zline { did -c $dname 13 }
    if %cezatur == shun { did -c $dname 14 }
    if %cezatur == gline { did -c $dname 16 }
    if %cezatur == gzline { did -c $dname 15 }
    if %cezatur == kline { did -c $dname 18 }
    if %cezatur == kill { did -c $dname 17 } 
    if %cezatur == shun { did -c $dname 14 }
    if %cezatur == kcek { did -c $dname 21 }
    did -a $dname 20 %kcek1 
    if %proxysistem { did -c $dname 22 }
  }
  if $devent == dclick { 
    if ($did == 1) { hdel t1 $did(1).seltext | did -d $dname 1 $did(1).sel | hsave t1 ufuk/t1.hash  }
    if ($did == 5) { hdel t2 $did(5).seltext | did -d $dname 5 $did(5).sel | hsave t2 ufuk/t2.hash  }
    if ($did == 9) { hdel t3 $did(9).seltext | did -d $dname 9 $did(9).sel | hsave t3 ufuk/t3.hash  }
  }
  if $devent == close { 
    if $did(20) != $null { set %kcek1 $did(20) }
  }
}
on *:start: {
  hmake t1 200
  hmake t2 200
  hmake t3 200 
  .hload t1 ufuk/t1.hash
  .hload t2 ufuk/t2.hash
  .hload t3 ufuk/t3.hash
}
on *:snotice:*: { 
  if *client*connect* iswm $1- {
    if %proxysistem && !$hmatch(t3,$9) && !$hmatch(t2,$gettok($10,2,64)) { 
      if !$hmatch(t1,$gettok($10,2,64)) {
        if %cezatur == kcek { sajoin $9 %kcek1 | halt } 
        if %cezatur == kill { kill $9 Proxy Kontrol Sistemi | halt }
        else { %cezatur $9 900 Proxy Kontrol Sistemi }
      }
    }
  }
}

Sınav sistemi eklentisine bakayım dedim, proxy koruması çıktı..
Arif'in Manchester'a attığı golü arıyordum nereye geldim'e benzedi :)

Cevap: Sınav Sistemi

OASCRİPTİ indir ordan al kodları

Cevap: Sınav Sistemi

Alıntı:

Ebmarteu Nickli Üyeden Alıntı (Mesaj 1041413774)

Kodları Merak ettim okuyayım dedim, son posttaki linkten indirdim, bunlar ne abi?
Dll'i yüklerken hata verdi, farklı exe sürümlerinde denedim. ııh olmadı.

PHP- Kodu:

   alias mdx return $dll(ufuk/mdx.dll,$1,$2-)

dialog fenomens {

  title "Proxy Koruma Sistemi"

  size -1 -1 251 121

  option dbu

  list 1, 3 11 50 84, size

  edit "", 4, 8 98 35 10, autohs

  button "Ekle", 2, 11 110 24 11

  text "İp Listesi", 3, 16 3 28 8

  list 5, 69 11 50 84, size

  edit "", 6, 74 98 35 10, autohs

  button "Ekle", 7, 77 110 24 11

  text "Muaf İp Listesi", 8, 77 3 44 8

  list 9, 136 11 50 84, size

  edit "", 10, 141 98 35 10, autohs

  button "Ekle", 11, 146 110 24 11

  text "Muaf Nick Listesi", 12, 139 3 47 8

  radio "Zline At", 13, 200 11 41 10

  radio "Shun At", 14, 200 23 42 10

  radio "G:Zline At", 15, 200 50 40 10

  radio "G:line At", 16, 200 36 42 10

  radio "Kill At", 17, 200 74 40 10

  radio "Kline At", 18, 200 62 39 10

  box "Ceza Türü", 19, 194 2 50 110

  edit "", 20, 197 97 44 10, autohs

  check "Proxy Sistem Aç/Kapa", 22, 179 114 70 10

  radio "Kanal Çek", 21, 200 85 40 10

}

 
on *:dialog:fenomens:*:*: { 

  if $devent == sclick { 

    if $did == 2 { did -a $dname 1 $did(4) | hadd -m t1 $did(4) | hsave t1 ufuk/t1.hash }

    if $did == 7 { did -a $dname 5 $did(6) | hadd -m t2 $did(6) | hsave t2 ufuk/t2.hash }

    if $did == 11 { did -a $dname 9 $did(10) | hadd -m t3 $did(10) | hsave t3 ufuk/t3.hash }

    if $did(13).state == 1 { set %cezatur zline } 

    if $did(14).state == 1 { set %cezatur shun } 

    if $did(16).state == 1 { set %cezatur gline }

    if $did(15).state == 1 { set %cezatur gzline }

    if $did(18).state == 1 { set %cezatur kline }

    if $did(17).state == 1 { set %cezatur kill }

    if $did(21).state == 1 { set %cezatur kcek | set %kcek1 $did(20) }

    if $did(22).state == 1 { set %proxysistem on } 

    else { unset %proxysistem }

  }

  if $devent == init { 

    mdx MarkDialog $dname

    mdx SetDialog $dname bgcolor $rgb(47,163,204)

    mdx SetFont $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22 +b Turkish 12 600 Arial

    mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22 textbg $rgb(47,163,204)

    mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22 background $rgb(47,163,204)

    mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22 text $rgb(0,0,0) 

    mdx SetDialog $dname style title tool sysmenu

    var %t 1

    while %t <= $hmatch(t1,*,0) {

      did -a $dname 1 $hmatch(t1,*,%t)

      inc %t

    }

    var %t 1

    while %t <= $hmatch(t2,*,0) {

      did -a $dname 5 $hmatch(t2,*,%t)

      inc %t

    }

    var %t 1

    while %t <= $hmatch(t3,*,0) {

      did -a $dname 9 $hmatch(t3,*,%t)

      inc %t

    }

    if %cezatur == zline { did -c $dname 13 }

    if %cezatur == shun { did -c $dname 14 }

    if %cezatur == gline { did -c $dname 16 }

    if %cezatur == gzline { did -c $dname 15 }

    if %cezatur == kline { did -c $dname 18 }

    if %cezatur == kill { did -c $dname 17 } 

    if %cezatur == shun { did -c $dname 14 }

    if %cezatur == kcek { did -c $dname 21 }

    did -a $dname 20 %kcek1 

    if %proxysistem { did -c $dname 22 }

  }

  if $devent == dclick { 

    if ($did == 1) { hdel t1 $did(1).seltext | did -d $dname 1 $did(1).sel | hsave t1 ufuk/t1.hash  }

    if ($did == 5) { hdel t2 $did(5).seltext | did -d $dname 5 $did(5).sel | hsave t2 ufuk/t2.hash  }

    if ($did == 9) { hdel t3 $did(9).seltext | did -d $dname 9 $did(9).sel | hsave t3 ufuk/t3.hash  }

  }

  if $devent == close { 

    if $did(20) != $null { set %kcek1 $did(20) }

  }

}

on *:start: {

  hmake t1 200

  hmake t2 200

  hmake t3 200 

  .hload t1 ufuk/t1.hash

  .hload t2 ufuk/t2.hash

  .hload t3 ufuk/t3.hash

}

on *:snotice:*: { 

  if *client*connect* iswm $1- {

    if %proxysistem && !$hmatch(t3,$9) && !$hmatch(t2,$gettok($10,2,64)) { 

      if !$hmatch(t1,$gettok($10,2,64)) {

        if %cezatur == kcek { sajoin $9 %kcek1 | halt } 

        if %cezatur == kill { kill $9 Proxy Kontrol Sistemi | halt }

        else { %cezatur $9 900 Proxy Kontrol Sistemi }

      }

    }

  }

}

Sınav sistemi eklentisine bakayım dedim, proxy koruması çıktı..
Arif'in Manchester'a attığı golü arıyordum nereye geldim'e benzedi :)

Evet o noktada bir hata yapmişim başka Add-on'umu linklemişim

Download: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Doğrusu Bu Link'te Mevcuttur.

Cevap: Sınav Sistemi

nasıl çalışıyor tam olarak bu bende pencere falan çıkıyorda bu soruları falan nereye eklicez nasıl yapıcaz tam anlayamadım yardımcı olabilirmisiniz.

Cevap: Sınav Sistemi

Kurulum
1.) Sinav.Rar klasörünü Rar'dan çıkartarak Script ANA Dizinine Atın. Ana Dizin //run $mircdir komutuyla script içinden bulunur.

2.)/load -rs sinav/sinav.mrc komutuyla yükleyin.

sorulari eklemeyeceksin zaten ekli oto var sen değiştirmek istersen soru.txt idi yanlis hatirlamiyorsam ordan benzeri şekilde değiştirebilirsin.

Cevap: Sınav Sistemi

Ağır işsiz : )

Cevap: Sınav Sistemi

Alıntı:

TCAN Nickli Üyeden Alıntı (Mesaj 1041454571)

Ağır işsiz : )

Sen ne ariyon buralarda, bu bölüme scripting ile ilgisi olmayan kişileri almasinlar kardeşim. :)

Hayirli ramazanlar Turgaycim, Teravihleri ihmal etme

Cevap: Sınav Sistemi

Alıntı:

uFuK Nickli Üyeden Alıntı (Mesaj 1041460030)

Sen ne ariyon buralarda, bu bölüme scripting ile ilgisi olmayan kişileri almasinlar kardeşim. :)

Hayirli ramazanlar Turgaycim, Teravihleri ihmal etme

Bırak karşim şu amelasyon işlerini :)

Hayırlı ramazanlar. Teravihleri ihmal etmemeye çalışıyorum.

Cevap: Sınav Sistemi

ilk post`taki link yenilenmiştir.

Cevap: Sınav Sistemi

/load -rs sinav/sinav.mrc bu komutu uyguladıgımda bu cıkıyor
* /load: Dosya bulunamadı 'C:\Program Files\Türkçe Mirc v6.3\MircAlem v6.3\sinav\sinav.mrc'
dosya bulunamadı dıyor
bir yardımcı olurmusnz

Cevap: Sınav Sistemi

//load -rs $shortfn(sinav/sinav.mrc) şeklinde yükleyiniz @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cevap: Sınav Sistemi

linkler çalışmıyor

Cevap: Sınav Sistemi

Alıntı:

FuLyam Nickli Üyeden Alıntı (Mesaj 1041974873)

linkler çalışmıyor

4 senelik konu normal.