Add-on ve snippet(parça) kod istekleri buraya - Sayfa 44 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Poison341 · 17 Nisan 2016, 10:59

Nick Değiştiğimde İdentimde Değişsin istiyorum bunun için nasıl bir remote olabilir..

GBL · 20 Nisan 2016, 00:46

Merhabalar, yardıma ihtiyacım var ve forumda uygun birşey bulamadım. 2 adet sorum var;

1 -Elimdebir adet gline panelim var, Gline paneli gline atıyor fakat malesef ki sunucu sistemimizde ki otomatik gline açma sisteminde ki sorun yüzünden süre parametresi koymamız gerekiyor. 1800 olarak süre koyamadım, koyduğum hiç bir yerde de 30dk olmasına rağmen açmadı. Buna 1800 parametresini nereye koyacağız?

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias g { dialog -m g g }
dialog g {
  title Gline
  size -1 -1 98 92
  option dbu
  radio "Küfür", 2, 10 33 36 10, group
  radio "Kişisel Bilgi", 3, 10 45 41 10
  radio "-18", 4, 10 57 36 10
  radio "Ücretli", 5, 55 33 50 10
  radio "Ensest", 6, 55 45 50 10
  radio "Reklam", 7, 55 57 50 10
  box "Nick/IP", 1, 5 4 90 24
  edit "", 8, 8 14 83 10, autohs
  button "At", 9, 8 72 37 12, ok
  button "Kaldır", 10, 55 72 37 12, cancel
}
on *:dialog:g:init:*:{
  did -f g 8
  did -a g 8 $cb
}
on *:dialog:g:sclick:*:{
  if ($did = 2) { set %sebep [ 4[»1Güvenlik4«] 12 : 12 Sunucumuzda Uygunsuz Hareket Ve Konuşma Yaptığınız Tespit Edildiğinden Girişiniz Yasaklanmıştır! 12Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
4[»10 Yönetim4«] }
  if ($did = 3) { set %sebep [ 4[»1Güvenlik4«] 12 : 12 Sunucumuzda Genelinde Telefon Veya Msn Verdiğiniz Tespit Edildiğinden Girişiniz Yasaklanmıştır! 12Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
4[»10 Yönetim4«] }
  if ($did = 4) { set %sebep [ 4[»1Güvenlik4«] 12 : 1218 Yaşından Küçük Olduğunuz veya 18 Yaş Altı Arayış Yaptığınız Tespit Edildiğinden Girişiniz Yasaklanmıştır! 12Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
4[»10 Yönetim4«] }
  if ($did = 5) { set %sebep [ 4[»1Güvenlik4«] 12 : 12Sunucumuzda Maddiyat İçerikli Arayış Yaptığınız veya Sunucuyu Maddi Çıkarlarınız İçin Kullandığınız Tespit Edildiğinden Girişiniz Yasaklanmıştır! Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
4[»1 Yönetim4«] }
  if ($did = 6) { set %sebep [ 4[»1Güvenlik4«] 12 : 12Ensest Arayış veya Düzeni Bozmaya Yönelik Davranışlardan Birini Yaptığınız Tespit Edildiğinden Girişiniz Yasaklanmıştır! Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
4[»1Yönetim4«] }
  if ($did = 7) { set %sebep [ 4[»1Güvenlik4«] 12 : 12Sunucumuzda Reklam Yaptığınız Tespit Edildiğinden Dolayı Girişiniz Yasaklanmıştır! Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
4[»0Yönetim4«] }
  if ($did = 9) { gline $did(8) %sebep }
  if ($did = 10) { gline -*@ $+ $did(8) }
}
on *:dialog:g:close:*:{
  unset %sebep
}

--------------------------------------------------------------------------------------------

2- Elimde F tuşuna tanımlanmış bir hotlink mevcut. Ctrl ile basıp gline attığımda gline atıyor, log'u #log odasına atıyor ve op'a işlemin yapıldığına dair bilgi geçiyor.. Elimde ki Hotlink 'i şu üstte ki sistemin süre olayını hallettikten sonra o'na bağlayamazmıyız?


on ^*:hotlink:*<*>*:#opX,#LogX:return
on ^*:hotlink:*<*>*:@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]:return
on *:hotlink:*:*:{ 
  clipboard $remove($1,<,>,¤,©)
  if ($mouse.key == 3) { 
    F12 $remove($1,<,>,¤,©)
    msg #Log $hotline 
    $iif($active == #op,.timer 1 $rand(1,3) /msg #op $gettok(Oki.-Gitti.-Atıldı.,$rand(1,3),45))
  }
  else { 
  .dialog -m g2 g2 }
}
dialog g2 {
  title "G-Line +/-"
  size -1 -1 95 37
  option dbu
  edit "", 1, 5 5 85 10, autohs
  button "At", 2, 5 20 40 12, ok
  button "Kaldır", 3, 50 20 40 12,
}
on *:dialog:g2:init:*:{
  did -a g2 1 $cb
}
on *:dialog:g2:sclick:*:{
  if ($did = 2) { F12 $did(1) }
  if ($did = 3) { gline -*@ $+ $did(1) | shun -*@ $+ $did(1) | gzline -*@ $+ $did(1) }
}

---------------------------------------------------------------------------

Yardım vermeniz yada görmemezlikten gelmeniz halinde her şekilde teşekkür ediyorum.

MatheuS · 20 Nisan 2016, 03:51

GBL Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Merhabalar, yardıma ihtiyacım var ve forumda uygun birşey bulamadım. 2 adet sorum var;

1 -Elimdebir adet gline panelim var, Gline paneli gline atıyor fakat malesef ki sunucu sistemimizde ki otomatik gline açma sisteminde ki sorun yüzünden süre parametresi koymamız gerekiyor. 1800 olarak süre koyamadım, koyduğum hiç bir yerde de 30dk olmasına rağmen açmadı. Buna 1800 parametresini nereye koyacağız?

alias g { dialog -m g g }
dialog g {
title Gline
size -1 -1 98 92
option dbu
radio "Küfür", 2, 10 33 36 10, group
radio "Kişisel Bilgi", 3, 10 45 41 10
radio "-18", 4, 10 57 36 10
radio "Ücretli", 5, 55 33 50 10
radio "Ensest", 6, 55 45 50 10
radio "Reklam", 7, 55 57 50 10
box "Nick/IP", 1, 5 4 90 24
edit "", 8, 8 14 83 10, autohs
button "At", 9, 8 72 37 12, ok
button "Kaldır", 10, 55 72 37 12, cancel
}
on *:dialog:g:init:*:{
did -f g 8
did -a g 8 $cb
}
on *:dialog:g:sclick:*:{
if ($did = 2) { set %sebep [ 4[»1Güvenlik4«] 12 : 12 Sunucumuzda Uygunsuz Hareket Ve Konuşma Yaptığınız Tespit Edildiğinden Girişiniz Yasaklanmıştır! 12Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Yönetim4«] }
if ($did = 3) { set %sebep [ 4[»1Güvenlik4«] 12 : 12 Sunucumuzda Genelinde Telefon Veya Msn Verdiğiniz Tespit Edildiğinden Girişiniz Yasaklanmıştır! 12Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Yönetim4«] }
if ($did = 4) { set %sebep [ 4[»1Güvenlik4«] 12 : 1218 Yaşından Küçük Olduğunuz veya 18 Yaş Altı Arayış Yaptığınız Tespit Edildiğinden Girişiniz Yasaklanmıştır! 12Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Yönetim4«] }
if ($did = 5) { set %sebep [ 4[»1Güvenlik4«] 12 : 12Sunucumuzda Maddiyat İçerikli Arayış Yaptığınız veya Sunucuyu Maddi Çıkarlarınız İçin Kullandığınız Tespit Edildiğinden Girişiniz Yasaklanmıştır! Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Yönetim4«] }
if ($did = 6) { set %sebep [ 4[»1Güvenlik4«] 12 : 12Ensest Arayış veya Düzeni Bozmaya Yönelik Davranışlardan Birini Yaptığınız Tespit Edildiğinden Girişiniz Yasaklanmıştır! Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
if ($did = 7) { set %sebep [ 4[»1Güvenlik4«] 12 : 12Sunucumuzda Reklam Yaptığınız Tespit Edildiğinden Dolayı Girişiniz Yasaklanmıştır! Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
if ($did = 9) { gline $did(8) %sebep }
if ($did = 10) { gline -*@ $+ $did(8) }
}
on *:dialog:g:close:*:{
unset %sebep
}

Yardım vermeniz yada görmemezlikten gelmeniz halinde her şekilde teşekkür ediyorum.

Öncelikle daha detaylı görebilmemiz için verdiğiniz code ları code tagı altında vermenizi dilerim bu şekilde baktıgımızda karman çorman birşey görünüyor.

Vermiş oldugunuz dialoga süre olarak gün saat dakika belirtebileceğiniz bir alan ekledim. Bu şekilde istediğiniz süre zarfında gline atabileceksiniz. Nicklist bölümünde nicke sağ tıklayarak GLine seçimiyle dialogu aktif edebiliyorsunuz dilersenizde nick seçili iken F11 tuşu ile yine dialogu açabiliyorsunuz.
Süre sorununuz oldugunu belirttiğiniz için süre kısmını aktif etmediğiniz takdirde bile dialog üzerinden gline attıgınızda 30 Dk süre ile olmasını sağladım.
Hotlink hakkında pek bir bilgim olmadığı için o konuda yardımcı olamayacağım eminimki yardım edecek birileri olacaktır.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

menu nicklist { 
  GLine:g | .enable #gip | .who +I $$1
}
alias F11 { .g | .enable #gip | .who +I $$1 }
#gip off
raw 352:*:did -ra g 8 *@ $+ $4 
raw 315:*:.disable #gip
#gip end
alias g { if (!$dialog(g)) { dialog -m g g } | else { dialog -v g } } 
dialog g {
  title "Gline"
  size -1 -1 118 92
  option dbu
  radio "Küfür", 2, 3 34 36 10
  radio "Kişisel Bilgi", 3, 3 48 40 10
  radio "-18", 4, 3 62 40 10
  radio "Ücretli", 5, 46 34 30 10
  radio "Ensest", 6, 46 48 30 10
  radio "Reklam", 7, 46 62 30 10
  box "Nick/IP", 1, 2 4 74 24
  edit "", 8, 5 14 68 10, autohs
  button "At", 9, 2 77 35 12, ok
  button "Kaldır", 10, 42 77 35 12, cancel
  box "SüreLi", 11, 80 2 35 72
  check "Aktif", 13, 84 10 25 10
  edit "", 14, 83 21 28 10
  check "Gün", 12, 84 34 25 10
  check "Saat", 15, 84 47 25 10
  check "Dakika", 16, 84 60 25 10
  button "X", 17, 97 77 18 12
}
on *:dialog:g:init:*:{
  did -f g 8
  if ($did(13).state != 1) { did -b g 12 | did -b g 14 | did -b g 15 | did -b g 16 } 
}
on *:dialog:g:sclick:*:{
  if ($did = 2) { set %sebep [ 4[»1Güvenlik4«] 12 : 12 Sunucumuzda Uygunsuz Hareket Ve Konuşma Yaptığınız Tespit Edildiğinden Girişiniz Yasaklanmıştır! 12Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Yönetim4«] }
  if ($did = 3) { set %sebep [ 4[»1Güvenlik4«] 12 : 12 Sunucumuzda Genelinde Telefon Veya Msn Verdiğiniz Tespit Edildiğinden Girişiniz Yasaklanmıştır! 12Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Yönetim4«] }
  if ($did = 4) { set %sebep [ 4[»1Güvenlik4«] 12 : 1218 Yaşından Küçük Olduğunuz veya 18 Yaş Altı Arayış Yaptığınız Tespit Edildiğinden Girişiniz Yasaklanmıştır! 12Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Yönetim4«] }
  if ($did = 5) { set %sebep [ 4[»1Güvenlik4«] 12 : 12Sunucumuzda Maddiyat İçerikli Arayış Yaptığınız veya Sunucuyu Maddi Çıkarlarınız İçin Kullandığınız Tespit Edildiğinden Girişiniz Yasaklanmıştır! Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Yönetim4«] }
  if ($did = 6) { set %sebep [ 4[»1Güvenlik4«] 12 : 12Ensest Arayış veya Düzeni Bozmaya Yönelik Davranışlardan Birini Yaptığınız Tespit Edildiğinden Girişiniz Yasaklanmıştır! Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
if ($did = 7) { set %sebep [ 4[»1Güvenlik4«] 12 : 12Sunucumuzda Reklam Yaptığınız Tespit Edildiğinden Dolayı Girişiniz Yasaklanmıştır! Bkz/Network Charters ==>> [ 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
if ($did = 9) { 
    if ($did(13).state == 1) {
      if ($did(12).state == 1) { gline $did(8) + $+ $did(14) $+ d %sebep }
      if ($did(15).state == 1) { gline $did(8) + $+ $did(14) $+ h %sebep }
      if ($did(16).state == 1) { gline $did(8) + $+ $did(14) $+ m %sebep } 
    } 
    else { gline $did(8) +30m %sebep } 
  }
  if ($did = 10) { gline - $+ $did(8) }
  if ($did = 13) { if ($did(13).state == 1) { did -e g 12 | did -e g 14 | did -e g 15 | did -e g 16 } | else { did -b g 12 | did -b g 14 | did -b g 15 | did -b g 16 } }
  if ($did = 12) { did -u g 15 | did -u g 16 }
  if ($did = 15) { did -u g 12 | did -u g 16 }
  if ($did = 16) { did -u g 12 | did -u g 15 }
  if ($did = 17) { unset %sebep | dialog -x g }
}
on *:dialog:g:close:*: { unset %sebep }

Poison341 · 20 Nisan 2016, 15:21

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:*:{
  if !salla == $1 {
  msg # 12 $2 0,4Salla  13,1Salla  0,6Kopppp 7,1Kopp 0,1Oynaaa 8,2oynaaa 0,3Kıvırrrrrrrrr 0,6Sağdannnnn 13,1Soldaaannn 9,1Koppppppppppppppp  } 

}

elimdeki bu remotea belirli bir süre eklemek yani şöyle 1 dakika da bir yada 5 dakikada bir kullanabilsin istiyorum ve sadece yetkililer kullansın istiyorum yardım ederseniz sevinirim

GBL · 20 Nisan 2016, 19:53

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Mevcut panele sadece 30dk süresi (1800saniye) eklemek işimi görecekti.. Sen ise oturup sıfırdan yapmışsın paneli. gösterdiğin ilgi için ve emeğin için teşekkür ederim.

LindaGab · 28 Nisan 2016, 18:51

Merhabalar Ben Yıldız,
Mircime ekleyebileceğim geniş kapsamlı proxy/tor koruması arıyorum. Şuan bulunduğum sunucu unreal sunucu. IF de detaylı arama yaptım fakat bulamadım tam olarak. Yardımcı olursanız çok memnun olacağım.
Alakanız ve ilginiz için şimdiden çok teşekkür ederim.

CoCoRiCo · 29 Nisan 2016, 08:37

LindaGab Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Merhabalar Ben Yıldız,
Mircime ekleyebileceğim geniş kapsamlı proxy/tor koruması arıyorum. Şuan bulunduğum sunucu unreal sunucu. IF de detaylı arama yaptım fakat bulamadım tam olarak. Yardımcı olursanız çok memnun olacağım.
Alakanız ve ilginiz için şimdiden çok teşekkür ederim.

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

Berk · 11 Mayıs 2016, 00:15

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias sw { if $sock($1).status == active { sockwrite -nt $1- } }
alias sunucu return irc.unrealircd.org:6667
alias setname return [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
alias chanlar return #sohbet
alias ident return Chat
alias basla {
  foral
  timerforum 0 3600 /foral
  timercycle 0 10 /clon
}
alias dur {
  .timerforum off
  .timercycle off
}

alias clon {
  set %andd  $rand(0,9999999999999)
  set %proxy $read(proxy.txt)
  sockclose x $+ %andd
  sockopen x $+ %andd $gettok(%proxy,1,58) $gettok(%proxy,2,58) 
}
on *:sockopen:x*: {
  if ( $sockerr > 0 ) { return }
  sw $sockname CONNECT $sunucu $+(HTTP/1.0,$CRLF,$CRLF)
}
on *:sockread:x*:{
  if ( $sockerr > 0 ) { return }
  var %report
  .sockread %report
  tokenize 32 %report
  var %asasa sockwrite -n $sockname
  if ($gettok(%report,1-2,32) == HTTP/1.0 200) || ($gettok(%report,1-2,32) == HTTP/1.1 200) {
    set %and $rand(10,2000)
    %asasa NICK $read(nick.txt)
    %asasa USER $ident " "  : $+ $setname
    .timer $+ $sockname 1 %and  /sockclose $sockname
    %asasa join $chanlar
  }
  if ($1 == ping) { %asasa pong $2 }
  if (version isin $4) { %asasa notice $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ VERSION esChat v3.6 © 2006 $+ $chr(1) }
  if ($2 == 001) {
    .hinc -ms Bot gir
    if $hget(Bot,gir) > $r(4,8) {
      var %bot $sock(x*,$r(1,$sock(x*,0)))
      sockwrite -nt %bot quit
    }
  }
}
alias foral { write -c proxy.txt | sockopen ipal [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 }
on *:sockopen:ipal*:{ var %:ipal sockwrite -n $sockname | %:ipal GET /proxy.txt $+ $sock($sockname).mark  HTTP/1.1 | %:ipal Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | %:ipal $crlf }
on *:sockread:ipal*:{ var %ipal | sockread %ipal | .tokenize 32 %ipal | if (*.*.*:* iswm %ipal) && (*a* !iswm %ipal) { write proxy.txt %ipal } }
on *:sockclose:ipal*:{ echo -a Proxy list güncellendi4 $lines(proxy.txt) ip mevcut. }

* /sockopen: Yetersiz veya eksik parametre (Satır 20, script15)

Burda bir hata alıyorum + Proxy txt Listesi oluşturuyorum mircde icine koyuyorum proxyleri /baslat ettikden sonra önce satıs 20 script 15 hatası veriyor sonra proxy txt icine attıgım ipler komple sıfırlanıyor bunun bir cözümü varmı ?

bluecr · 11 Mayıs 2016, 14:30

Merhaba arkadaslar tek bir komutla bir usere 5 kanalda yetki yazılabilir mi böyle bir remote yapılabilir mi fakat şu şekilde;

#chanserv 50
#chanserv-yönetim 50
#chanserv-sohbet 100
#founders 50
#staff 40

Accessler hiç değişmeyecek bu şekilde tek komutla mesela /csyetkiekle Nick yaptığımızda aynı anda aynı accessleri birden yazacak burada en önemlisi acc seviyeleri.

Teşekkür ederim kolay gelsin.

SuLh · 11 Mayıs 2016, 15:39

bluecr Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Merhaba arkadaslar tek bir komutla bir usere 5 kanalda yetki yazılabilir mi böyle bir remote yapılabilir mi fakat şu şekilde;

#chanserv 50
#chanserv-yönetim 50
#chanserv-sohbet 100
#founders 50
#staff 40

Accessler hiç değişmeyecek bu şekilde tek komutla mesela /csyetkiekle Nick yaptığımızda aynı anda aynı accessleri birden yazacak burada en önemlisi acc seviyeleri.

Teşekkür ederim kolay gelsin.

Bunun için şöyle bir şey işinizi görecektir

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias yetkii { return #chanserv-yönetim 50 #chanserv 50 #chanserv-sohbet 100 #founders 50 #staff 40 }
alias ekle {  var %s 1,%n $1 | tokenize 32 $yetkii | :hm | chanserv access $($+($,%s),2) add %n $($+($,$calc(%s + 1)),2) | if %s != $calc($0 - 1) { %s = $calc(%s + 2) | goto hm } }

Kullanımı: /ekle Nick

Seçenekler	Arama
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder	Arama: Gelişmiş Arama Yap
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Konuyu Toplam 2 Üye okuyor. (0 Kayıtlı üye ve 2 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.