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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Korumalar Dialog (https://www.ircforumlari.net/mirc-scripting-sorunlari/197745-korumalar-dialog.html)

Korumalar Dialog

Merhaba Arkadaslar Kendıme Dialog Stüdio Ile Bır Koruma Panelı Hazırladım Yanlız ben gerısını getıremedım bana yardımcı olabılırmısınız korumları on off durumna getırmem ıcın.. Sclick ve group olarak yanı.
ve Yazıları Kalınlastırmam ıcın neler gerekıyor yardımlarınızı beklıyorum arkadaslar.

Alıntı:

Cevap: Korumalar Dialog

Butonlarda meydana gelecek işleme ait komutları bilmiyorum(uz) dolayısıyla hazır birşey yapıp verebilmek mümkün değil fakat sana kısa bir şekilde anlatmaya çalışayım.

Senini diyalogundan bir kısım :

Kod:

dialog Sensizben {

title "Sensizben Script V1"

size -1 -1 198 147

option dbu

check "Reklam Koruması", 2, 6 16 50 10, 3state flat

check "Küfür Koruması", 3, 6 28 50 10, 3state flat

check "Telefon Koruması", 6, 6 108 54 10, 3state flat

check "Tekrar Koruması", 7, 6 40 50 10, flat

check "Flood Koruması", 8, 6 52 50 10, flat

}

Kodlarının hemen altına bu satırları ekle..

Kod:

on *:dialog:sensizben:*:*: { 

  if ($devent == sclick) {

    if ($did == 20) { burayakomutugir } 

    if ($did == 9) { burayakomutugir }

  }

}

Burada iki fonksiyon var ayarlaman gereken

1. Mavi yazıyla işaretlediğim yerler buton id numaraları

Örneğin : Reklam koruması butonunu id numarası 2 Sclick bölümünde mavi renkli yere bu id numarasını vereceksin.

2. Kırmızı yazıyla yazdığım yere ise komutunu gireceksinç

Örneğin : 2 numaralı id'e sahip Reklam korumasının komutu reklam

Cevap: Korumalar Dialog

Dikkat etmen kereken yerleri renklerle belirttim o şekilde coğalta bilirsin

kod yazan yere koruma kodlarını eklıyorsun tamamlayacaktım uykum geldi örnek orda sen cözersin gerisini umuyorum klay gelsin

Kod:

dialog Sensizben {

  title "Sensizben Script V1"

  size -1 -1 198 147

  option dbu

  check "Reklam Koruması", 2, 6 16 50 10, 3state flat

  check "Küfür Koruması", 3, 6 28 50 10, 3state flat

  check "Telefon Koruması", 6, 6 108 54 10, 3state flat

  check "Tekrar Koruması", 7, 6 40 50 10, flat

  check "Flood Koruması", 8, 6 52 50 10, flat

  check "Uzun Yazı Koruması", 9, 6 64 57 10, flat

  check "Caps Lock Koruması", 10, 6 75 61 10, flat

  check "Bad Nick Koruması", 11, 6 86 60 10, flat

  check "Telefon Koruması", 12, 6 97 53 10, 3state flat

  box "Kanal Korumaları", 13, 3 6 100 117

  button "Liste", 14, 61 16 37 10, default flat multi

  button "Liste", 15, 61 28 37 10, default flat multi

  box "Kişisel Korumalar", 16, 106 6 88 74

  check "Küfür Koruması", 17, 108 16 52 10, flat

  check "Flood Koruması ", 18, 108 39 53 10, 3state flat

  check "Ban Koruması", 19, 108 64 50 10, 3state flat

  check "Deop Koruması", 20, 108 51 50 10, 3state flat

  box "Özellerde", 1, 106 83 89 40

  check "Ortak Kanal Göster", 4, 108 91 57 10, 3state flat

  check "Clone Göster", 5, 108 100 50 10, 3state flat

  check "Özelleri Engelle", 21, 108 109 50 10, 3state flat

  check "Reklam Koruması", 22, 108 28 52 10, flat

  button "Tamam", 23, 81 130 37 12,ok

} 

on *:dialog:Sensizben:init:*: {

  if ($group(#Reklam).status == on )  did -c Sensizben 2
   if ($group(#Küfür).status == on )   did -c Sensizben 3

  if ($group(#Telefon).status == on )  did -c Sensizben 6

  if ($group(#Tekrar).status == on )   did -c Sensizben 7
   if ($group(#Flood).status == on )  did -c Sensizben 8

  if ($group(#Uzun).status == on )   did -c Sensizben 9

  if ($group(#Caps).status == on )  did -c Sensizben 10

  if ($group(#Bad ).status == on )   did -c Sensizben 11

  if ($group(#Telefon2).status == on )  did -c Sensizben 12

  if ($group(#Küfür2).status == on )   did -c Sensizben 17

  if ($group(#Flood2).status == on )  did -c Sensizben 18

  if ($group(#Ban).status == on )   did -c Sensizben 19

  if ($group(#Deop).status == on )  did -c Sensizben 20

  if ($group(#Ortak).status == on )   did -c Sensizben 4

  if ($group(#Clone).status == on )  did -c Sensizben 5

  if ($group(#Özelleri).status == on )   did -c Sensizben 21

  if ($group(#Reklam2).status == on )   did -c Sensizben 22

}

on *:dialog:Sensizben:sclick:2: {

  if ($group(#Reklam).status == on ) { .disable #Reklam  }

  else {  /.enable #Reklam }

}

on *:dialog:Sensizben:sclick:3: {

  if ($group(#Küfür).status == on ) { .disable #Küfür }

  else {  /.enable #Küfür  }

}

on *:dialog:Sensizben:sclick:6: {

  if ($group(#Telefon).status == on ) { .disable #Telefon  }

  else {  /.enable #Telefon }

}

on *:dialog:Sensizben:sclick:7: {

  if ($group(#Tekrar).status == on ) { .disable #Tekrar }

  else {  /.enable #Tekrar  }

}

 

;***********************
 
 #Reklam on

on *:text:*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
if $chan == %operchan {

    .halt

  }

  if $nick !isop $chan {

    .timer 1 01 shun $nick

    .mode $chan +b $nick  | /.kick # $nick

    .msg $chan  $+ $nick $+  Reklam kullandığınızdan dolayı 10 Dk konuşmanız engellenmiştir..

    .timer 1 900 .mode $chan -b $nick

  }

}
 #Reklam end

;***********************
 #Küfür on

kod
 #Küfür end

;******************
 #Telefon off

kod
 #Telefon end

;*******************
 #Tekrar off

kod
 #Tekrar end

;*******************

#Flood off

kod

#Flood end

;*******************

#Uzun off

kod

#Uzun end

;*******************

#Caps off

kod

#Caps end

;*******************

#Bad off

kod

#Bad end

;*******************

#Telefon2 off 

kod

#Telefon2 end

;*******************

#Küfür2 off

kod

#Küfür2 end

;*******************

#Flood2 off

kod

#Flood2 end

;*******************

#Ban off 

kod

#Ban end

;*******************

#Deop off

kod

#Deop end

;*******************

#Ortak off

kod

#Ortak end

;*******************

#Clone off

kod

#Clone end

;*******************

#Özelleri off

kod

#Özelleri end

;*******************

#Reklam2 off

kod

#Reklam2 end

;*******************

Cevap: Korumalar Dialog

Murat_Aziz ve Hayat Tşk Yardımlarınız Icın Ama Bır Kac Sey Icın Yardım Almak Istıyorum
1.Sunucuya Baglanınca * /did: Geçersiz parametre Bu hatayı verıyor Sorun nerde acaba ?
2. Ben Bu Liste Kısımlarına Tıklayınca Baska Bır Dıyalog Eklemek Istıyorum Ama Olmuyor Yapamadım Yanı
if ($did == 14 ) { .dialog -m shitlist shitlist }
if ($did == 15 ) { .dialog -m kufurs kufurs }
if ($did == 24 ) { .dialog -m badz badz }

Bu Sekıl Denedım Olmadı Nerede Yanlıs Yapıyorum Acaba ?

Alıntı:

dialog Sensizben {
title "Sensizben Script V1"
size -1 -1 198 147
option dbu
check "Reklam Koruması", 2, 6 16 50 10, 3state flat
check "Küfür Koruması", 3, 6 28 50 10, 3state flat
check "Join Part Flood Koruması", 6, 6 108 70 10, 3state flat
check "Tekrar Koruması", 7, 6 40 50 10, flat
check "Flood Koruması", 8, 6 52 50 10, flat
check "Uzun Yazı Koruması", 9, 6 64 57 10, flat
check "Caps Lock Koruması", 10, 6 75 61 10, flat
check "Bad Nick Koruması", 11, 6 86 60 10, flat
check "Telefon Koruması", 12, 6 97 53 10, 3state flat
box "Kanal Korumaları", 13, 3 6 100 117
button "Liste", 14, 61 16 37 10, default multi
button "Liste", 15, 61 28 37 10, default multi
box "Kişisel Korumalar", 16, 106 6 88 74
check "Küfür Koruması", 17, 108 16 52 10, flat
check "Flood Koruması ", 18, 108 39 53 10, 3state flat
check "Ban Koruması", 19, 108 64 50 10, 3state flat
check "Deop Koruması", 20, 108 51 50 10, 3state flat
box "Özellerde", 1, 106 83 89 40
check "Ortak Kanal Göster", 4, 108 91 57 10, 3state flat
check "Clone Göster", 5, 108 100 50 10, 3state flat
check "Özelleri Engelle", 21, 108 109 50 10, 3state flat
check "Reklam Koruması", 22, 108 28 52 10, flat
button "Tamam", 23, 77 130 37 12, ok
button "Liste", 24, 62 86 37 12
}
on *:dialog:Sensizben:init:*: {
if ($group(#Reklam).status == on ) did -c Sensizben 2
if ($group(#Küfür).status == on ) did -c Sensizben 3
if ($group(#Telefon).status == on ) did -c Sensizben 6
if ($group(#Tekrar).status == on ) did -c Sensizben 7
if ($group(#Flood).status == on ) did -c Sensizben 8
if ($group(#Uzun).status == on ) did -c Sensizben 9
if ($group(#Caps).status == on ) did -c Sensizben 10
if ($group(#Bad ).status == on ) did -c Sensizben 11
if ($group(#jp).status == on ) did -c Sensizben 12
if ($group(#Küfür2).status == on ) did -c Sensizben 17
if ($group(#Flood2).status == on ) did -c Sensizben 18
if ($group(#Ban).status == on ) did -c Sensizben 19
if ($group(#Deop).status == on ) did -c Sensizben 20
if ($group(#Ortak).status == on ) did -c Sensizben 4
if ($group(#Clone).status == on ) did -c Sensizben 5
if ($group(#Özelleri).status == on ) did -c Sensizben 21
if ($group(#Reklam2).status == on ) did -c Sensizben 22
if ($did == 14 ) { .dialog -m shitlist shitlist }
if ($did == 15 ) { .dialog -m kufurs kufurs }
if ($did == 24 ) { .dialog -m badz badz }
}
on *:dialog:Sensizben:sclick:2: {
if ($group(#Reklam).status == on ) { .disable #Reklam }
else { /.enable #Reklam }
}
on *:dialog:Sensizben:sclick:3: {
if ($group(#Küfür).status == on ) { .disable #Küfür }
else { /.enable #Küfür }
}
on *:dialog:Sensizben:sclick:6: {
if ($group(#Telefon).status == on ) { .disable #Telefon }
else { /.enable #Telefon }
}
on *:dialog:Sensizben:sclick:7: {
if ($group(#Tekrar).status == on ) { .disable #Tekrar }
else { /.enable #Tekrar }
}
on *:dialog:Sensizben:sclick:8: {
if ($group(#flood).status == on ) { .disable #flood }
else { /.enable #flood }
}
on *:dialog:Sensizben:sclick:9: {
if ($group(#uzun).status == on ) { .disable #uzun }
else { /.enable #uzun }
}
on *:dialog:Sensizben:sclick:10: {
if ($group(#caps).status == on ) { .disable #caps }
else { /.enable #caps }
}
on *:dialog:Sensizben:sclick:11: {
if ($group(#bad).status == on ) { .disable #bad }
else { /.enable #bad }
}
on *:dialog:Sensizben:sclick:12: {
if ($group(#jp).status == on ) { .disable #jp }
else { /.enable #jp }
}
on *:dialog:Sensizben:sclick:17: {
if ($group(#küfür2).status == on ) { .disable #küfür2 }
else { /.enable #küfür2 }
}
on *:dialog:Sensizben:sclick:18: {
if ($group(#flood2).status == on ) { .disable #flood2 }
else { /.enable #flood2 }
}
on *:dialog:Sensizben:sclick:19: {
if ($group(#ban).status == on ) { .disable #ban }
else { /.enable #ban }
}
on *:dialog:Sensizben:sclick:20: {
if ($group(#deop).status == on ) { .disable #deop }
else { /.enable #deop }
}
on *:dialog:Sensizben:sclick:4: {
if ($group(#ortak).status == on ) { .disable #ortak }
else { /.enable #ortak }
}
on *:dialog:Sensizben:sclick:5: {
if ($group(#clone).status == on ) { .disable #clone }
else { /.enable #clone }
}
on *:dialog:Sensizben:sclick:22: {
if ($group(#özelleri).status == on ) { .disable #özelleri }
else { /.enable #özelleri }
}
on *:dialog:Sensizben:sclick:17: {
if ($group(#reklam2).status == on ) { .disable #reklam2 }
else { /.enable #reklam2 }
}

Cevap: Korumalar Dialog

arkadasım yapmak istediğin hayat arkadasın verdıgı sekıl ben farlı bısey sunmustum sana benım verdiğimi yapacaksan

Kod:

 

on *:dialog:Sensizben:sclick:14: {
 dialog -m shitlist shitlist

}

on *:dialog:Sensizben:sclick:15: {
 dialog -m kufurs kufurs

}

on *:dialog:Sensizben:sclick:24: {
 dialog -m badz badz

}

seklinde ekleme yapacaksın

o eklediğin yer yanlıs sil onu

sıl kırmızı olan yerı } işaretin den aşaya benım ustte verdıgımı ekle

Kod:

if ($group(#Clone).status == on ) did -c Sensizben 5

if ($group(#Özelleri).status == on ) did -c Sensizben 21

if ($group(#Reklam2).status == on ) did -c Sensizben 22
 if ($did == 14 ) { .dialog -m shitlist shitlist } 

if ($did == 15 ) { .dialog -m kufurs kufurs } 

if ($did == 24 ) { .dialog -m badz badz } 

}

Cevap: Korumalar Dialog

Bu Diyaloglarda Tamam butonu ekledıgımde o dıyalog un kapanmasını bır turlu beceremedım onu nasıl yapıcam acaba.

Cevap: Korumalar Dialog

Buton'un id'ini sclick devent'inde
if $did == idno { dialog -c $dname $dname }
veya buton'a ok özelliği ekle Enter'a basınca işlesin.

Dialog hakkında dersleri incelemeni tavsiye ederim.

Cevap: Korumalar Dialog

Alıntı:

dialog Sensizben {
title "Sensizben Script V1"
size -1 -1 198 147
option dbu
check "Reklam Koruması", 2, 6 16 50 10, flat
check "Küfür Koruması", 3, 6 28 50 10, flat
check "Telefon Koruması", 6, 6 108 54 10, flat
check "Tekrar Koruması", 7, 6 40 50 10, flat
check "Flood Koruması", 8, 6 52 50 10, flat
check "Uzun Yazı Koruması", 9, 6 64 57 10, flat
check "Caps Lock Koruması", 10, 6 75 61 10, flat
check "Bad Nick Koruması", 11, 6 86 60 10, flat
check "Join/Part Koruması", 12, 6 97 53 10, flat
box "Kanal Korumaları", 13, 3 6 100 117
button "Liste", 14, 61 16 37 10, default flat multi
button "Liste", 15, 61 28 37 10, default flat multi
button "Liste", 24, 62 86 37 12, default flat multi
box "Kişisel Korumalar", 16, 106 6 88 74
check "Küfür Koruması", 17, 108 16 52 10, flat
check "Flood Koruması ", 18, 108 39 53 10, flat
check "Ban Koruması", 19, 108 64 50 10, flat
check "Deop Koruması", 20, 108 51 50 10, flat
box "Özellerde", 1, 106 83 89 40
check "Ortak Kanal Göster", 4, 108 91 57 10, flat
check "Clone Göster", 5, 108 100 50 10, flat
check "Özelleri Engelle", 21, 108 109 50 10, flat
check "Reklam Koruması", 22, 108 28 52 10, flat
button "Tamam", 23, 81 130 37 12,flat ok
}
on *:dialog:Sensizben:sclick:14:/dialog -m shitlist shitlist
on *:dialog:Sensizben:sclick:15:/dialog -m kufurs kufurs
on *:dialog:Sensizben:sclick:24:/dialog -m badz badz
;------------------------------
;Sensizben Dialog S-Click

on 1:dialog:Sensizben:sclick:*:{
if ($did(2).state == 1) { .enable #Reklam } | else { .disable #reklam }
if ($did(3).state == 1) { .enable #küfür } | else { .disable #küfür }
if ($did(6).state == 1) { .enable #telefon } | else { .disable #telefon }
if ($did(7).state == 1) { .enable #tekrar } | else { .disable #tekrar }
if ($did(8).state == 1) { .enable #flood } | else { .disable #flood }
if ($did(9).state == 1) { .enable #uzun } | else { .disable #uzun }
if ($did(10).state == 1) { .enable #caps } | else { .disable #caps }
if ($did(11).state == 1) { .enable #bad } | else { .disable #bad }
if ($did(12).state == 1) { .enable #jp } | else { .disable #jp }
if ($did(17).state == 1) { .enable #küfür2 } | else { .disable #küfür2 }
if ($did(18).state == 1) { .enable #Flood2 } | else { .disable #Flood2 }
if ($did(19).state == 1) { .enable #ban } | else { .disable #ban }
if ($did(20).state == 1) { .enable #deop } | else { .disable #deop }
if ($did(4).state == 1) { .enable #ortak } | else { .disable #ortak }
if ($did(5).state == 1) { .enable #clone } | else { .disable #clone }
if ($did(21).state == 1) { .enable #özelleri } | else { .disable #özelleri }
if ($did(22).state == 1) { .enable #reklam2 } | else { .disable #reklam2 }
}
;---------------------------------
;Sensizben Dialog Init

on 1:dialog:Sensizben:init:0:{
if ($group(#reklam) == on) { did -c Sensizben 2 }
if ($group(#küfür) == on) { did -c Sensizben 3 }
if ($group(#telefon) == on) { did -c Sensizben 6 }
if ($group(#tekrar) == on) { did -c Sensizben 7 }
if ($group(#flood) == on) { did -c Sensizben 8 }
if ($group(#uzun) == on) { did -c Sensizben 9 }
if ($group(#caps) == on) { did -c Sensizben 10 }
if ($group(#bad) == on) { did -c Sensizben 11 }
if ($group(#jp ) == on) { did -c Sensizben 12 }
if ($group(#küfür2) == on) { did -c Sensizben 17 }
if ($group(#Flood2) == on) { did -c Sensizben 18 }
if ($group(#ban) == on) { did -c Sensizben 19 }
if ($group(#deop) == on) { did -c Sensizben 20 }
if ($group(#ortak) == on) { did -c Sensizben 4 }
if ($group(#clone) == on) { did -c Sensizben 5 }
if ($group(#özelleri) == on) { did -c Sensizben 21 }
if ($group(#reklam2) == on) { did -c Sensizben 22 }
}

Sonucu Banada Bildirirsen Sevinirim.

Cevap: Korumalar Dialog

button "Tamam", 23, 81 130 37 12 sonuna ok ekle calışır
}

bunun gibi
button "Tamam", 23, 81 130 37 12,ok
}