mIRC Scripting

mIRC Scripting (https://www.mircscripting.net/)
-   Help - Yardım (https://www.mircscripting.net/help-yardym/)
-   -   mIRC Smiley! (https://www.mircscripting.net/help-yardym/643-mirc-smiley.html)

ozan44_tc 25 Ağustos 2013 21:12

mIRC Smiley!
 
on *:LOAD: {
load -a imgmirc.ini
set %imgmirc_config 253
/im_config
tanıtım
}

menu menubar {
.imgmirc config : /im_config
}

on *:START: if ( %imgmirc_config & 1 == 1 ) im_preload
ctcp ^*:version:?: /ctcpreply $nick version imgmirc $+(v,%imgmirc_ver) installed.

#laurellyazi on
on *:input:#:{
if /* !iswm $1- {
.haltdef
if (%lausmiley == on) {
.set %laurenkli OFF
say $replace($1-,; $+ $chr(41),;= $+ $chr(41),: $+ $chr(41),:= $+ $chr(41),:D,:=D,: $+ $chr(40),:= $+ $chr(40),; $+ $chr(40),;= $+ $chr(40),:@,:=@,:L,:-L,:B,:-B,;D,;-D,:F,:=F,:G,:=G,:M,:=M,:O,:=O,:P,:=P,:R,:=R,:S,:=S ,:U,:=U,kalp,¿ğ¿)
}
if (%laurenkli == on) {
.set %lausmiley OFF
.var %q 1,8 | .var %w 
.var %e 1,4 | .var %r 
say $replace($1-,; $+ $chr(41),%q ;- $+ $chr(41) %w ,: $+ $chr(41),%q :- $+ $chr(41)%w ,:D,%q :-D %w ,: $+ $chr(40),%q :- $+ $chr(40) %w ,; $+ $chr(40),%q ;- $+ $chr(40) %w ,:@,%e :-@ %r ,:L,%q :-L %w ,:B,%q :-B %w ,;D,%q ;-D %w ,:F,%q :-F %w ,:G,%q :-G %w ,:M,%q :-M %w ,:O,%q :-O %w ,:P,%q :-P %w ,:R,%q :-R %w ,:S,%q :-S %w ,:U,%q :-U %w )
}
}
}
on *:input:?:{
if /* !iswm $1- {
.haltdef
if (%lausmiley == on) {
.set %laurenkli OFF
say $replace($1-,; $+ $chr(41),;= $+ $chr(41),: $+ $chr(41),:= $+ $chr $+ $chr(41),:D,:=D,: $+ $chr(40),:= $+ $chr(40),; $+ $chr(40),;= $+ $chr $+ $chr(40),:@,:=@,:L,:-L,:B,:-B,;D,;-D,:F,:=F,:G,:=G,:M,:=M,:O,:=O,:P,:=P,:R,:=R,:S,:=S ,:U,:=U,kalp,¿ğ¿)
}
if (%laurenkli == on) {
.set %lausmiley OFF
.var %q 1,8 | .var %w 
say $replace($1-,; $+ $chr(41),%q ;- $+ $chr(41) %w ,: $+ $chr(41),%q :- $+ $chr(41)%w ,:D,%q :-D %w ,: $+ $chr(40),%q :- $+ $chr(40) %w ,; $+ $chr(40),%q ;- $+ $chr(40) %w ,:@,%e :-@ %r ,:L,%q :-L %w ,:B,%q :-B %w ,;D,%q ;-D %w ,:F,%q :-F %w ,:G,%q :-G %w ,:M,%q :-M %w ,:O,%q :-O %w ,:P,%q :-P %w ,:R,%q :-R %w ,:S,%q :-S %w ,:U,%q :-U %w )
}
}
}
on ^*:text:*:#:{
.haltdef
if (%lausmiley == on) {
.set %laurenkli OFF
echo $chan $timestamp 5< $+ $iif($nick isop #,4@) $+ $iif($nick ishop #,7 $+ $chr(37)) $+ $iif($nick isvoice #,10+) $+ $nick $+ 5>  $replace($1-,: $+ $chr(41),:= $+ $chr $+ $chr(41),:D,:=D,: $+ $chr(40),:= $+ $chr(40),; $+ $chr(40),;= $+ $chr $+ $chr(40),:@,:=@,:L,:=L,:B,:=B,;D,;-D,:F,:=F,:G,:=G,:M,:=M,:O,:=O,:P,:=P,:R,:=R,:S,:=S ,:U,:=U,kalp,¿ğ¿)
}
if (%laurenkli == on) {
.set %lausmiley OFF
.var %q 1,8 | .var %w 
echo $chan $timestamp 5< $+ $iif($nick isop #,4@) $+ $iif($nick ishop #,7 $+ $chr(37)) $+ $iif($nick isvoice #,10+) $+ $nick $+ 5>  $replace($1-,; $+ $chr(41),%q ;- $+ $chr(41) %w ,: $+ $chr(41),%q :- $+ $chr(41)%w ,:D,%q :-D %w ,: $+ $chr(40),%q :- $+ $chr(40) %w ,; $+ $chr(40),%q ;- $+ $chr(40) %w ,:@,%e :-@ %r ,:L,%q :-L %w ,:B,%q :-B %w ,;D,%q ;-D %w ,:F,%q :-F %w ,:G,%q :-G %w ,:M,%q :-M %w ,:O,%q :-O %w ,:P,%q :-P %w ,:R,%q :-R %w ,:S,%q :-S %w ,:U,%q :-U %w )
}
}
on ^*:text:*:?:{
.haltdef
if (%lausmiley == on) {
.set %laurenkli OFF
echo $nick $timestamp < $+ $nick $+ > $replace($1-,: $+ $chr(41),:= $+ $chr $+ $chr(41),:D,:=D,: $+ $chr(40),:= $+ $chr(40),; $+ $chr(40),;= $+ $chr $+ $chr(40),:@,:=@,:L,:=L,:B,:=B,;D,;-D,:F,:=F,:G,:=G,:M,:=M,:O,:=O,:P,:=P,:R,:=R,:S,:=S ,:U,:=U,kalp,¿ğ¿)
}
if (%laurenkli == on) {
.set %lausmiley OFF
.var %q 1,8 | .var %w 
echo $nick $timestamp < $+ $nick $+ > $replace($1-,; $+ $chr(41),%q ;- $+ $chr(41) %w ,: $+ $chr(41),%q :- $+ $chr(41)%w ,:D,%q :-D %w ,: $+ $chr(40),%q :- $+ $chr(40) %w ,; $+ $chr(40),%q ;- $+ $chr(40) %w ,:@,%e :-@ %r ,:L,%q :-L %w ,:B,%q :-B %w ,;D,%q ;-D %w ,:F,%q :-F %w ,:G,%q :-G %w ,:M,%q :-M %w ,:O,%q :-O %w ,:P,%q :-P %w ,:R,%q :-R %w ,:S,%q :-S %w ,:U,%q :-U %w )
}
}
#laurellyazi END

alias LauReLLYazi { dialog $iif($dialog(lauyazi),-v,-m) lauyazi lauyazi }
dialog lauyazi {
title "Yazi Stili Addonu ßy LauReLL"
size -1 -1 112 101
option dbu
check "", 1, 8 9 91 10
radio "Renkli Görünüm", 2, 6 32 50 10
radio "Smiley'li Görünüm", 3, 56 32 64 10
box "", 4, 0 1 108 23
icon 5, 9 43 32 32, $scriptdirrenkli.png, 0, noborder
icon 6, 70 43 32 32, $scriptdirsmiley.png, 0, noborder
button "ı [ T A M A M ] ı", 7, 7 86 96 12, ok
}
on *:dialog:lauyazi:init:*: {
if (%laurellyazi == ON) {
.did -c $dname 1
.did -e $dname 2,3
.did -a $dname 1 LauReLL Yazı Stili ( AÇIK )
}
if (%laurellyazi == OFF) {
.did -b $dname 2,3
.did -a $dname 1 LauReLL Yazı Stili ( KAPALI )
}
if (%laurenkli == ON) {
.did -c $dname 2
}
if (%lausmiley == ON) {
.did -c $dname 3
}
}
on *:DIALOG:lauyazi:*:*: {
if $devent == sclick {
if $did == 1 { if ($did(1).state == 1) { .set %laurellyazi ON | .echo -a 15,6 LauReLL Yazı Addonu Açık | laaçıkk | .enable #laurellyazi } | else { .set %laurellyazi OFF | .echo -a 6,15 LauReLL Yazı Addonu Kapalı | lakapalıı | .disable #laurellyazi } }
if $did == 2 { if ($did(2).state == 1) { .set %laurenkli ON | .set %lausmiley OFF } | else { .set %laurenkli OFF | .set %lausmiley ON } }
if $did == 3 { if ($did(3).state == 1) { .set %lausmiley ON | .set %laurenkli OFF } | else { .set %lausmiley OFF | .set %laurenkli ON } }
}
}
alias laaçıkk { .did -e $dname 2,3 | .did -a $dname 1 LauReLL Yazı Stili ( AÇIK ) }
alias lakapalıı { .did -b $dname 2,3 | .did -a $dname 1 LauReLL Yazı Stili ( KAPALI ) }
alias tanıtım {
.echo -a 2 Yazı Addonu Yuklendi...
.echo -a açmak için 4/laurellyazi2 Yazınız...
.echo -a Yazi Addonu 5ßy LauReLL 2- 3Www.mIRc.Com.TR
.set %lausmiley ON
.set %laurenkli OFF
laurellyazi
}
menu channel,menubar,status {
.LauReLL Yazı:/laurellyazi
}

LauReLL in yazı addonu mIRC eklediğim zaman gözalıcıyı etkisiz kılıyor neyaptımsa beceremedim ben değiştirince kod bozuluyor yardımcı olurmusunuz.

İndir yazi rar


++ mIRCScripting.net hakkında kısaca:

mS; "Gayri resmi mIRC" kullanıcı ve tasarımcı topluluğudur.
2009 yılında kurulan mS; tasarımcı ve geliştiricileri bir araya getiren etkileşim ve iletişim sağlayan bir platformdur.
mS; tasarım, programlama, geliştirme, düzenleme vb. pek çok konu etrafında bir araya gelmiş "mIRC" meraklısı bir çok insan tarafından yaratılan içeriğiyle; kullanıcı dostu, özgün elit, nitelikli kişi ve konularla hizmet sunan mIRC Scripting platformudur.

Özgün içerikten onay almaksızın içeriği yaratan kullanıcılarımız tamamen yada kısmen sorumludur, aynı zamanda söz konusu içerik mS yetkilileri izni olmaksızın, kaynak gösterilse dahi(!) kopyalanamaz ve/ya paylaşılamaz.   Site/içerik hakkında görüş, öneri ve şikayetleriniz için sikayet[at]mircscripting[dot]net e-posta ve ya İletişim adresinden bizlere ulaştırabilirsiniz.



mIRC mIRC Orjinal mIRC İndir mIRC Download mIRC Tutorials mIRC Socket mIRC Commands mIRC Komutlar mIRC Yükle mIRC Dersler mIRC Hazır Kodlar mIRC Classentifier mIRC DLL mIRC Dialog mIRC IRC mIRC FTP mIRC Telnet mIRC Help
mIRC Yardım mIRC Iconlar mIRC Com Object mIRC Binary Files mIRC Picture Windows mIRC Unicode mIRC Forum mIRC Hazır Kodlar mIRC Kod mIRC Script mIRC File Handling mIRC Scripting Language mIRC Scripting Dili mIRC Scripting Info
mIRC Scripting Tutorials



User Alert System provided by Advanced User Tagging v3.1.3 (Lite) - vBulletin Mods & Addons Copyright © 2026 DragonByte Technologies Ltd. Runs best on HiVelocity Hosting.

1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76

SEO by vBSEO 3.6.1