dialog global {
  title "Global Mesaj Gönder"
  size -1 -1 176 74
  option dbu
  edit "", 1, 4 17 169 31
  text " Aşşağıdan Global Mesajı Gonderebilirsiniz", 2, 9 6 157 8
  box "", 3, 4 1 169 15
  button "Gönder", 4, 4 49 82 22, flat
  button "Kapat", 5, 90 49 82 22, flat ok
}
on *:dialog:global:sclick:4:{ os global $did(1) }

edit "", 1, 4 17 169 31, multi

on *:dialog:global:sclick:4:echo -a $did(1,2)

on *:dialog:global:sclick:4:{ os global $did(1) }

on *:dialog:global:sclick:4:unset %c- | var %a- 1, %b- $did(1).lines | while %a- <= %b- { set -e %c- $addtok(%c-,$did(1,%a-).text,32) | inc %a-  } | os global %c-

 on *:notice:*:*:if ($nick == NickServ) && $dialog(getpas) && (Sifresi isin $1-) { did -a getpas 6 $5 }

 -NickServ- Taka Nick'inin Sifresi

on *:notice:*:*:if ($nick == NickServ) && $dialog(getpas) && (Sifresi isin $1-) { did -a getpas 1 $regsubex($5,/^(.+)\.$/S,\1) }

dialog getpas {
  title "New Project"
  size -1 -1 138 76
  option dbu
  edit "", 1, 16 21 81 14
  button "Sil", 2, 16 42 37 12
}
on *:dialog:getpas:sclick:2:did -r getpas 1

 alias getpas { dialog -m getpas getpas }
dialog getpas {
  title "Nick Sifresi Ogrenmek"
  size -1 -1 142 53
  option dbu
  text " Nicki Yazın :", 3, 6 6 55 8
  box "", 4, 3 1 60 15
  edit "", 5, 63 4 74 12
  edit "", 6, 6 23 127 10, read
  box "", 7, 3 17 134 19
  button "Ogren", 8, 3 38 66 12, flat
  button "Kapat", 9, 71 38 66 12, flat ok
}
on *:dialog:getpas:sclick:8:{ ns getpass $did(5) }
on *:notice:*:*:if ($nick == NickServ) && $dialog(getpas) && (Sifresi isin $1-) { did -a getpas 6 $5 }