parça kodlar

Merhaba arkadaşlar alt taki kodu alt+R yapıp remote kısmına eklediniz sonra kanal geneline !saat !tarih !gun şeklinde yaparsanız cevap alacaksınzı ') on *:text:*:#: { if $1 == !tarih { msg $chan Tarih : $+($chr(2),$date,$chr(2)) $+($nick,.) } if $1 == !saat { msg $chan Saat ...

on *:input:#:{ if $regex($1,/^[!.&-][ıiİ]p$/Si) { if !$2 { msg # Lütfen Nick/IP belirtiniz. Kullanımı:4 !ip [IP|NICK] } elseif $regex($2,/\d+\.\d+\.\d+\.\d+/Si) { if !$isfile($+(IP/,$strip($2),.txt)) { msg # $+(,$strip($2),) IP'ine ait kayıt bulunamadı. | return } msg #...

Kullanım; .akıltesti nick Mirc ana klasörünün icine Akıllı ve akılsız adında birer adet text dosyaları acılması gerekiyor.Dosyaların icerisindeki mesajları kanala yansıtır. on $*:text:/^[!.]ak[iı]ltest[iı]/Si:#kanal: { if (!$2) { msg # Hatalı kullanım lütfen nick belirtin. } | elseif...

on *:text:*:#: { if $regex($1,/^([!.]hed[iİı]ye)/Si) { var %hediyelist kalem silgi at ayı var %kalem 10 var %at 15 var %ayı 20 if $2 == bilgi { msg $chan Hediye kullanımı. " !hediye gönder nick Hediye " | msg $chan Hediye listesi: kalem, silgi, at, ayı | return } if...

Kod: raw 6:*:{ if $2 != $null { write unl1.txt $chr(3) $+ $gettok($2-,2,44) write unl2.txt $chr(3) $+ $gettok($2-,3,44) write unl3.txt $chr(3) $+ $gettok($2-,4,44) } } on *:start:{ write -c unl1.txt write -c unl2.txt write -c unl3.txt unset %unl1 unset %unl2 unset...