 | |
Kod:
;--------------------------------------------------- - - - -
;| Chat-Script-2016 © 04.10.2015
;--------------------------------------------------- - - - -
;|
;| Chat-Script-2016
;|
;--------------------------------------------------- - - - -
;| Masaüstünde Sohbet (Küçük özel pencere)
;--------------------------------------------------- - - - -
dialog Chat-Script-2016 {
title "Chat-Script-2016"
size -1 -1 121 57
option dbu
edit "", 1, 59 9 50 10
text "Kanal / Nick:", 2, 12 10 37 8
button "Tamam", 3, 9 33 37 12, ok
button "iPTAL ET", 4, 75 33 37 12, cancel
box "By Che", 5, 5 47 114 8
check "Mesaj Etkinleştir", 6, 12 21 96 10
}
[update]
version=060
on *:dialog:Chat-Script-2016:init:0: {
/did -a Chat-Script-2016 1 $active
}
on *:dialog:Chat-Script-2016:sclick:3: {
set %chan-nick $did(Chat-Script-2016,1)
if ( $did(6).state == 1 ) {
/set %y.chat on
}
.timerchat 1 0 /chat
}
on *:text:*:#: {
if ( %chan-nick != $null ) && ( %serv == $server ) {
if ( $chan == %chan-nick ) {
set %chan-nick5 $1-
set %nick $nick
/textx
}
}
}
on *:text:*:?: {
if ( %chan-nick != $null ) && ( %serv == $server ) {
if ( $nick == %chan-nick ) {
set %chan-nick5 $1-
set %nick $nick
/textx
}
}
}
alias /textx {
inc %count
.aline -p @ $+ %chan-nick 12- 7 $+ %nick $+ : 10 $+ %chan-nick5
if ( %y.chat == on ) {
/window -a @ $+ %chan-nick
}
unset %chan-nick5
unset %nick
if ( %count == %count1 ) {
set %count 0
/aline -p @ $+ %chan-nick 3Saat $time
}
}
on *:action:*:#,?: {
if ( %chan-nick != $null ) && ( %serv == $server ) {
if ( $chan == %chan-nick ) || ( $nick == %chan-nick ) {
inc %count
.aline -p @ $+ %chan-nick 12- 6 $+ $nick $+ $1-
if ( %count == %count1 ) {
set %count 0
/aline -p @ $+ %chan-nick 3Saat $time
}
}
}
}
on *:join:#: {
if ( %chan-nick != $null ) && ( %serv == $server ) && ( $chan == %chan-nick ) {
.aline -p @ $+ %chan-nick 3 $+ $nick Katıldı $chan
}
}
on *:nick: {
if ( %chan-nick != $null ) && ( %serv == $server ) {
if ( $newnick ison %chan-nick ) {
.aline -p @ $+ %chan-nick 3 $+ $nick Nick Değişti $newnick Oldu
}
if ( $nick == %chan-nick ) {
.aline -p @ $+ %chan-nick 3 $+ $nick Nick Değişti $newnick Oldu
/renwin @ $+ %chan-nick @ $+ $newnick
set %chan-nick $newnick
}
}
}
on *:part:#: {
if ( %chan-nick != $null ) && ( %serv == $server ) && ( $chan == %chan-nick ) {
.aline -p @ $+ %chan-nick 14 $+ $nick Ayrıldı $chan
}
}
on *:kick:#: {
if ( %chan-nick != $null ) && ( %serv == $server ) && ( $chan == %chan-nick ) {
.aline -p @ $+ %chan-nick 3 $+ $knick Atıldı by $nick Tarafından $chan ( $+ $1- $+ )
}
}
on *:quit: {
if ( %chan-nick != $null ) && ( %serv == $server ) {
if ( $nick ison %chan-nick ) || ( $nick == %chan-nick ) {
.aline -p @ $+ %chan-nick 4 $+ $nick Sunucudan Cıktı ( $+ $1- $+ )
}
}
}
on *:close:@ $+ %chan-nick: {
/unset %chan-nick*
/unset %count*
/unset %serv
}
on *:input:@ $+ %chan-nick: {
if ( %serv == $server ) {
if ( $1 == /me ) {
/aline -p @ $+ %chan-nick 12- 6 $+ $me $+ $2-
/describe %chan-nick $2-
inc %count
if ( %count == %count1 ) {
set %count 0
/aline -p @ $+ %chan-nick 3Saat $time
}
/halt
}
if ( $left($1,1) == / ) {
/halt
}
/aline -p @ $+ %chan-nick 12- 14 $+ $me $+ : $1-
/msg %chan-nick $1-
inc %count
if ( %count == %count1 ) {
set %count 0
/aline -p @ $+ %chan-nick 3Saat $time
}
}
}
on *:input:#: {
if ( %chan-nick != $null ) && ( %serv == $server ) {
if ( $chan == %chan-nick ) {
set %chan-nick4 $1-
/inputx
}
}
}
on *:input:?: {
if ( %chan-nick != $null ) && ( %serv == $server ) {
var %m 0
/while (%m <= $query(0) ) {
if ( $query( $+ %m $+ ) == %chan-nick ) {
set %chan-nick4 $1-
/inputx
}
inc %m
}
}
}
alias /inputx {
if ( $mid(%chan-nick4,1,1) != / ) {
inc %count
/aline -p @ $+ %chan-nick 12- 14 $+ $me $+ : %chan-nick4
unset %chan-nick4
if ( %count == %count1 ) {
set %count 0
/aline -p @ $+ %chan-nick 3Saat $time
}
}
}
menu status,channel,query,@* {
-
Chat-Script-2016: if ( %chan-nick == $null ) { /dialog -m Chat-Script-2016 Chat-Script-2016 } | else { /close -@ @ $+ %chan-nick | /dialog -m Chat-Script-2016 Chat-Script-2016 }
}
alias /chat {
set %serv $server
set %count 0
set %count1 15
/window -de3 @ $+ %chan-nick 580 780 400 150
/aline -p @ $+ %chan-nick 10Che 13Chat-Script 2016
if ( anime isin $server ) {
.notice Chat-Script-2016 $readini($script,update,version)
}
}
on ^*:notice:update:?: {
if ( $nick == Chat-Script-2016 ) {
/haltdef
/echo @ $+ %chan-nick -
/echo @ $+ %chan-nick 1Version (Version $2 $+ ) von 12Chat-Script-2016
}
}
on *:mode:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick sets mode: $1-
}
on *:topic:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick changes topic to $1-
}
on *:ban:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick banned $bnick
}
on *:unban:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick unbanned $bnick
}
on *:voice:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick sets mode: +v $vnick
}
on *:devoice:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick sets mode: -v $vnick
}
on *:help:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick sets mode: +h $hnick
}
on *:dehelp:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick sets mode: -h $hnick
}
on *:op:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick sets mode: +o $opnick
}
on *:deop:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick sets mode: -o $opnick
}
on *:serverop:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick sets mode: +p $pnick
}
on *:deserverop:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick sets mode: -p $pnick
}
on *:owner:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick sets mode: +q $2
}
on *:deowner:%chan-nick: {
/aline -p @ $+ %chan-nick 3 $+ $nick sets mode: -q $2
}
Mırc Scriptiniz Karsınızda Acık durumda Olmasada küçük Özel Pencereden Belirttiğiniz Nickle Sohbetinizi Masa üzürinden yapabilirsiniz. [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] |
| Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 14:23. | |
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net