kod bende çalışıyor sıfır bir mircte denermisin o kodu
başka bir yol denedim bu aliaes kodunu daha önce görmüştüm biryerde denemek istedim çalıştı
eski kodda çalışıyor bunuda denedim umarım başka sorun çıkmaz
remote kodu
Kod: Kodu kopyalamak için üzerine çift tıklayın!
#mrt on
alias kontrol {
var %murtt = 1
while (%murtt <= $nick(#,0)) {
var %Badd = $nick(#,%murtt)
if ($level($nick(#,%murtt)) == nnick) { _linedance msg %badd %swsw 7Tarih :14 $date 7Saat :14 $time }
inc %murtt
}
}
on *:join:#:if $ulist($nick,nnick,0) { inc -eu300 $+(%,$nick,#) 1 | if $($+(%,$nick,#),2) == 1 { msg $nick %swsw } }
#mrt end
menu * {
Arkadaş Nick
.aç:enable #mrt | set %swsw $$?="mesajınızı yazınız:"
.kapat:disable #mrt
.tara:kontrol
.listeyi gör:gör
.ekle:auser nnick $$?="nick yazınız:" $+ *
.çıkart:ruser nnick $$?="nick yazınız:" $+ *
}
alias gör {
$iif($window(@Görüntüleme),clear @Görüntüleme,window -n @Görüntüleme)
if ($ulist(*,nnick,0) != $null) {
set %cnt.shit 0
while (%cnt.shit < $ulist(*,nnick,0)) {
inc %cnt.shit 1
echo @Görüntüleme $ulist(*,nnick,%cnt.shit)
}
unset %cnt.shit
}
}
aliases kodu
Kod: Kodu kopyalamak için üzerine çift tıklayın!
_linedance {
if ($timer(.line.dance. $+ $cid) == $null) {
hadd -m pnp.qcommand count. $+ $cid 1
hadd -m pnp.qcommand 1. $+ $cid $1-
_dolinedance 1
}
else {
hinc -m pnp.qcommand count. $+ $cid
hadd -m pnp.qcommand $hget(pnp.qcommand,count. $+ $cid) $+ . $+ $cid $1-
}
}
_dolinedance {
if ($hget(pnp.qcommand,$1 $+ . $+ $cid) != $null) {
var %data = $ifmatch
.timer.line.dance. $+ $cid -m 1 $calc(3500 - $gettok(1250 1000 750 500 250,$1,32)) _dolinedance $calc($1 + 1)
%data
}
else hdel -w pnp.qcommand *. $+ $cid
}