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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Ufak bir yardım! (https://www.ircforumlari.net/mirc-scripting-sorunlari/455595-ufak-bir-yardim.html)

beydagi44 22 Şubat 2012 14:29

Ufak bir yardım!
 
,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 ;)"
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.

TİGeR 22 Şubat 2012 15:09

Cevap: Ufak bir yardım!
 
Tollbar'ı Sadece bir kanalda gösteremessin gibime gelior ama emin değilim ;s1

beydagi44 22 Şubat 2012 16:00

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

OperServ 22 Şubat 2012 17:53

Cevap: Ufak bir yardım!
 
$active yazani %helperchan olarak degis ole dene bi

WaLek 22 Şubat 2012 18:13

Cevap: Ufak bir yardım!
 
Alıntı:

OperServ Nickli Üyeden Alıntı (Mesaj 1041039058)
$active yazani %helperchan olarak degis ole dene bi



%operchan veya %helpchan eklemesi icin belirtmesi gerekmezmi : )

OperServ 22 Şubat 2012 18:25

Cevap: Ufak bir yardım!
 
helper diyorda ondan :)

beydagi44 22 Şubat 2012 19:19

Cevap: Ufak bir yardım!
 
Alıntı:

OperServ Nickli Üyeden Alıntı (Mesaj 1041039058)
$active yazani %helperchan olarak degis ole dene bi

Olmadı dediğini yaptım.

beydagi44 22 Şubat 2012 19:24

Cevap: Ufak bir yardım!
 
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ş :) ilginiz için teşekkür ederim.

OperServ 22 Şubat 2012 19:24

Cevap: Ufak bir yardım!
 
,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

WaLek 22 Şubat 2012 23:38

Cevap: Ufak bir yardım!
 
e Konuda kiLit herhaLde : PPPp


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 09:01.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk