Çevrimdışı

On 1:input:*:{
if !$regex($1,\/) {

msg $active 5 $+ $iif($regex($1,[0-9]),$+($chr(32),$1-),$1-) | halt }



}

}

ArkadaşLar ßende ßoyLe ßir Kod var Düz ve ınce yazar. ßunu nick yazınca aLtı çizqili yapma Durumu var mı

 

Çevrimdışı

on *:INPUT:#: {
if ($inpaste) || ($ctrlenter) || ($readini(mirc.ini,text,commandchar) != $left($1,1)) {
var %i = 1, %s = $1- | while ($gettok(%s,%i,32)) {
if ($nick($chan,$v1)) { var %s = $puttok(%s,$+(,$gettok(%s,%i,32),),%i,32) }
inc %i
}
msg $chan $iif(c isincs $chan($chan).mode,$strip(%s),%s)
halt
}
}

 

Çevrimdışı

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

on *:INPUT:#: { if ($inpaste) || ($ctrlenter) || ($readini(mirc.ini,text,commandchar) != $left($1,1)) { var %i = 1, %s = $1- | while ($gettok(%s,%i,32)) { if ($nick($chan,$v1)) { var %s = $puttok(%s,$+(,$gettok(%s,%i,32),),%i,32) } inc %i } msg $chan $iif(c isincs $chan($chan).mode,$strip(%s),%s) halt } }

ßu kod sade yazı stili oldu. soylemek ıstedıqm bu değiL

 

Çevrimdışı

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

ßu kod sade yazı stili oldu. soylemek ıstedıqm bu değiL

on *:input:*: {
if ($left($1,1) != /) {
haltdef | var %1 = 1,%2 = $1-,%v1,%t,%3
while ($gettok(%2,%1,32)) { %v1 = $v1 | if ($active = %v1 || %v1 ison #) { %3 = $v1 | break } | inc %1 }
%t = $regsubex(%2,$+(/\b,%3,\b/gi),$+($chr(3),4,$chr(31),%3,$chr(3),$chr(31)))
.msg $target %t | echo $color(own text) $target $timestamp $+($me,:) %t
}
}