on !*:join:#help: { .timer 1 1 kontrolet $nick $chan }
alias kontrolet { if $1 isreg $2 {
    if ($nick == $me) { halt }
    set %helpernicx $1
    helperx
  }
}

;~~~~~~~~~~~~~~~~~~~~~~~~~~~~
alias -l nicklist { 
  if $dialog(helperx) {   
    if %x = 8 { timerabout off | unset %x %y } 
    else { 
      var %y = $calc($sin(%x) / %x)  
      dialog -s helperx 700 $calc(%z + $round($iif(%x = 0,10,$calc(%y * 1500)),500)) 280 160 
      inc %x 0.1 
    } 
  } 
  else { 
    .timerabout off 
    unset %x %y %z 
  } 
} 
alias helperx { if !$dialog(helperx) { dialog -m helperx helperx } | set %x 2.1 | .timerabout -m 0 1 nicklist } 
dialog helperx {  
  title %kbscxx Help UYARI Sistemi  
  size -1 -1 100 90  
  option dbu 
  icon $mircdirkelebek\iconlar\bag2.ico 
  text  %helpernicx Help kanalında Yardım bekliyor! , 1, 8 14 120 25  
  button "Yardım Ver", 2, 6 30 37 14, cancel flat    
  button "Başka Sonuz?", 3, 45 30 37 14, cancel flat
  button "Sorun cözüldü", 4, 86 30 45 14, cancel flat
  button "Gereksiz Bk.", 5, 6 50 37 14, cancel flat    
  button "Konumuz", 6, 45 50 37 14, cancel flat
  button "Help Kontrol", 7, 86 50 45 14, cancel flat
  box "Giriş Uyarısı", 8, 2 5 132 24,cancel flat
  button "&KAPAT", 9, 1 73 20 10,ok
}  
on *:dialog:helperx:sclick:*: {   
  if ($did == 2) { .join #help | .mode #Help +v %helpernicx  }   
  if ($did == 2) { /msg #help 2Hoş Geldiniz %helpernicx ; 2Size IRC/Services Hakkında Nasıl Yardımcı Olabilirim? } 
  if ($did == 3) { /msg #help 2 %helpernicx 2Size yardımcı olabilecegim BAŞKA bir sorunuz varmı ? }
  if ($did == 5) { /msg #help   %helpernicx 2Lütfen gereksiz BEKLEME YAPMAYINIZ Aksi durumda 1 dakika sonra Atılacaksınız!  %kelebek }   
  if ($did == 5) { .timer 1 60  /mode #Help +b %helpernicx | .timer 1 60 /kick #Helpdesk %helpernicx 2 #Helpdesk Kanalında 1 Dakika kaldıgınız icin ATILDINIZ lütfen gereksiz bekleme yapmayınız. } 
  if ($did == 4) { .mode #help -v %helpernicx | /msg #Help  2 %helpernicx Sorunuz Çözümlenmiştir, Kanaldan Çıkabilirsiniz. ( /part #Help ) }
  if ($did == 6) { /msg #help  %helpernicx 2Sadece IRC/Services Hakkında Yardım veriyoruz lütfen Soru/Öneri/Görüşleriniz icin  #Helpdesk Kanalını Kulanınız }
  if ($did == 7) {  .join #help | .timer 1 1 /helperx }
  if ($did == 9) { .unset %helpernicx }
} 
on 1:dialog:helperx:init:0:{
  mdx MarkDialog $dname  mdx Set
  mdx SetDialog $dname style title tool sysmenu
}