Çevrimdışı

,alias demid {
if ($isid) return $dll("idealClup\dll\demid.dll",$1,$2-)
else dll "idealClup\dll\demid.dll" $1-
}
alias helpebak { scid $activecid window -a #help | halt }
alias helps { dialog -m yardır yardır }
alias helpes { if ($me isop #Help) || ($me ishop #Help) { helps } }

on 1:join:#help: {
if ($nick == $me) { .timer 1 15 helpebak }
if ($nick == $me) { .timerhelps 1 15 helpes }
}
on 1:part:#help: {
if ($nick == $me) { $iif($dialog(yardır),dialog -x yardır) }
}

alias yardır { dialog -m yardır yardır }
dialog yardır {
title "helperleri severim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
size -1 -1 400 30
option dbu
list 1, 3 0 450 25, size
}
on *:dialog:yardır:init:*:{
Düzenle
dialog -s $dname $calc($window(#help).w - 900) $calc($window(#help).h - $calc($window(#help).h - 40)) 717 60
demid DlgParent $dname STATIC #help
mdx MarkDialog $dname $dialog(yardır).hwnd
mdx SetDialog yardır style border
mdx SetControlMDX $dname 1 toolbar flat wrap arrows nodivider > $bars
mdx SetFont $dname 1 12 900 verdana
mdx SetColor 1 background $rgb(240,240,240)
mdx SetDialog [ $dname ] bgcolor $rgb(240,240,240)
mdx SetBorderStyle 1
did -i $dname 1 1 setscheme $rgb(0,0,0) $rgb(0,0,0)
dll idealClup\dll\aniwin.dll anime $dialog($dname).hwnd -vn 900
did -i $dname 1 1 bmpsize 20 20
did -i $dname 1 1 setimage icon normal idealClup\icon2\helps.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\bilgi.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\bk.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\info.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\appim.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\ok.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\kapats.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\helps.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\helps.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\helps.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\helps.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\helps.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\helps.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\helps.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\helps.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\helps.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\helps.ico
did -i $dname 1 1 setimage icon normal idealClup\icon2\helps.ico
did -a $dname 1 +a 1 $chr(32) Yardım Ver $chr(9) $+ Gelen Useri Karşıla , Voice Ver.
did -a $dname 1 +a -
did -a $dname 1 +a 2 $chr(32) Başka Soru? $chr(9) $+ Usere Başka Sorusu Varmı Sor.
did -a $dname 1 +a -
did -a $dname 1 +a 3 $chr(32) Bekleme Yasak $chr(9) $+ Useri Gereksiz Beklememesi İçin Uyar
did -a $dname 1 +a -
did -a $dname 1 +a 4 $chr(32) Sadece Konumuz $chr(9) $+ KanaLda Sadece IRC/Services Yardımı Verilir.
did -a $dname 1 +a -
did -a $dname 1 +a 5 $chr(32) #yönetim 'e Yolla $chr(9) $+ Useri #yönetim Kanalına Yönlendir.
did -a $dname 1 +a -
did -a $dname 1 +a 6 $chr(32) #Helpdesk 'e Yolla $chr(9) $+ Useri #Helpdesk Kanalına Yönlendir.
did -a $dname 1 +a -
did -a $dname 1 +a 7 $chr(32) Sorunuz Çözüldü $chr(9) $+ Useri -v yap
did -a $dname 1 +a -
did -a $dname 1 +a 8 $chr(32) Cs GeneL $chr(9) $+ Chanserv GeneL Komutları
did -a $dname 1 +a 9 $chr(32) Cs Levels1 $chr(9) $+ Chanserv Levels Komutları
did -a $dname 1 +a 10 $chr(32) Cs Levels2 $chr(9) $+ Chanserv Lvels 2 Komutları
did -a $dname 1 +a 11 $chr(32) Cs Set1 $chr(9) $+ Chanserv Set Komutları
did -a $dname 1 +a 12 $chr(32) Cs Set2 $chr(9) $+ Chanserv Set 2 Komutları
did -a $dname 1 +a 13 $chr(32) Cs Akick $chr(9) $+ Chanserv Akick Komutları
did -a $dname 1 +a 14 $chr(32) Cs Access $chr(9) $+ Chanserv Access Komutları
did -a $dname 1 +a 15 $chr(32) Ns GeneL1 $chr(9) $+ NickServ GeneL Komutları
did -a $dname 1 +a 16 $chr(32) Ns GeneL2 $chr(9) $+ NickServ GeneL2 Komutları
did -a $dname 1 +a 17 $chr(32) Nickserv Set $chr(9) $+ NickServ Set Komutları
did -a $dname 1 +a 18 $chr(32) MemoServ $chr(9) $+ MomoServ Komutları
}
on *:dialog:yardır:sclick:*:{
if $did($dname,1).sel == 2 {
if ($me isop $active) || ($me ishop $active) {
var %sabahisvar! = 1
while $snick($active,%sabahisvar!) {
.mode $active +v $snick($active,%sabahisvar!) | /msg $active $snick($active,%sabahisvar!) Hoş geldiniz Size Nasıl Yardımcı Olabilirim?
inc %sabahisvar!
}
}
}
if $did($dname,1).sel == 4 {
if ($me isop $active) || ($me ishop $active) {
var %sabahisvar! = 1
while $snick($active,%sabahisvar!) {
/msg $active $snick($active,%sabahisvar!) : Yardımcı Olabileceğim Başka Bir Sorunuz Varmı ?
inc %sabahisvar!
}
}
}
if $did($dname,1).sel == 6 {
if ($me isop $active) || ($me ishop $active) {
var %sabahisvar! = 1
while $snick($active,%sabahisvar!) {
.mode $active -v $snick($active,%sabahisvar!) | /msg $active $snick($active,%sabahisvar!) : Lütfen Kanalda Gereksiz Bekleme Yapmayınız. #Help Ailesi Keyifli Sohbetler Diler.
inc %sabahisvar!
}
}
}
if $did($dname,1).sel == 8 {
if ($me isop $active) || ($me ishop $active) {
var %sabahisvar! = 1
while $snick($active,%sabahisvar!) {
/msg $active $snick($active,%sabahisvar!) : Yardım Kanalımızda Sadece ; Chanserv/Nickserv/Memoserv Soruları Hakkında Yardım Verilmektedir.Bu Konular Hakkında Sorunuz Varsa Sizi Dinliyorum.
inc %sabahisvar!
}
}
}
if $did($dname,1).sel == 10 {
if ($me isop $active) || ($me ishop $active) {
var %sabahisvar! = 1
while $snick($active,%sabahisvar!) {
/msg $active $snick($active,%sabahisvar!) : Bu Konular Hakkında #yönetim Kanalından Yardım Alabilirsiniz , Başka Sorununuz Yoksa Lütfen /Part $active Yapınız
inc %sabahisvar!
}
}
}
if $did($dname,1).sel == 12 {
if ($me isop $active) || ($me ishop $active) {
var %sabahisvar! = 1
while $snick($active,%sabahisvar!) {
/msg $active $snick($active,%sabahisvar!) ; Nick Şifre , Kanal Şifre Problemleri ve Çalıntı Nick , Çalıntı Kanal Şikayetleriniz İçin #Helpdesk Kanalından Yardım Alabilirsiniz , Başka Sorununuz Yoksa Lütfen /Part $active Yapınız
inc %sabahisvar!
}
}
}
if $did($dname,1).sel == 14 {
if ($me isop $active) || ($me ishop $active) {
var %sabahisvar! = 1
while $snick($active,%sabahisvar!) {
/msg $active $snick($active,%sabahisvar!) ; Sorunuz çözümlenmiştir. Tekrar yardıma ihtiyacınız oldugunda $active kanalına gelebilirsiniz. Lütfen gereksiz bekleme yapmayınız Hoş sohbetler.
inc %sabahisvar!
}
}
}

if $did($dname,1).sel == 16 { CsGeneL }
if $did($dname,1).sel == 17 { CsLevels1 }
if $did($dname,1).sel == 18 { CsLevels2 }
if $did($dname,1).sel == 19 { Csset1 }
if $did($dname,1).sel == 20 { Csset2 }
if $did($dname,1).sel == 21 { Csakick }
if $did($dname,1).sel == 22 { Csaccess }
if $did($dname,1).sel == 23 { NsGeneL1 }
if $did($dname,1).sel == 24 { NsGeneL2 }
if $did($dname,1).sel == 25 { Nsset }
if $did($dname,1).sel == 26 { memoserv }
}

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


arkadaşlar bu help yardım kanalı için yazılmış bir toolbar bunu sadece help kanalında nasıl gösterebilirim şu anki haliyle bütün kanallarda gözüküyor yardımcı olurmusunuz.

 

Tollbar'ı Sadece bir kanalda gösteremessin gibime gelior ama emin değilim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

Kodu kelebek v.sohbetten aldım o scriptte sadece help k analında görünüyordu.

 

Çevrimiçi

$active yazani %helperchan olarak degis ole dene bi

__________________
Herkes bir, İş için yaratılmıştır.

 

Çevrimdışı

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

$active yazani %helperchan olarak degis ole dene bi

%operchan veya %helpchan eklemesi icin belirtmesi gerekmezmi : )

 

Çevrimiçi

helper diyorda ondan
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
Herkes bir, İş için yaratılmıştır.

 

Çevrimdışı

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

$active yazani %helperchan olarak degis ole dene bi

Olmadı dediğini yaptım.

 

Çevrimdışı

Akadaşlar çok özür diliyorum benim hatam kodda sorun yokmuş


,alias demid {

şu satırın başındaki virgül kodu o şekilde çalıştırıyormuş
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ilginiz için teşekkür ederim.

 

Çevrimiçi

,alias demid {
if ($isid) return $dll("idealClup\dll\demid.dll",$1,$2-)
else dll "idealClup\dll\demid.dll" $1-
}

kirmizi renkle belirledigim dll olmadigi icin olmayabilir, aldigin scriptien alip kendi scripitin ana klasorune atip ole dene

__________________
Herkes bir, İş için yaratılmıştır.

 

Çevrimdışı

e Konuda kiLit herhaLde : PPPp