info
Posted: Sat Jan 28, 2012 2:11 pmhello anyone can help me to fix it?
something does not work
something does not work
- Code: Select all
on *:snotice:*:{
if (*client*connect* iswm $1-) {
var %difyip = $remove($token($10,2,64),$chr(41)), %difynick = $9, %difyident = $remove($token($10,1,64),$chr(40))
;var %difyip = $remove($token($13,2,64),$chr(41)), %difynick = $12, %difyident = $remove($token($13,1,64),$chr(40))
if $read(user.ini,w,$+(*,%difyip,$chr(32),%difynick,$chr(32),*)) { writeini $+(-dl,$readn) user.ini }
writeini user.ini %difyip %difynick 14Ident: %difyident 02Last Entry: $+($time,-,$date)
}
elseif (*changed*his*her*nickname* iswm $1-) {
;var %difyzip = $remove($token($5,2,64),$chr(41)), %difynickz = $11, %difyidentz = $remove($token($5,1,64),$chr(40))
var %difyip = $remove($token($13,2,64),$chr(41)), %difynick = $12, %difyident = $remove($token($13,1,64),$chr(40))
if $read(user.ini,w,$+(*,%difyzip,$chr(32),%difynickz,$chr(32),*)) { writeini $+(-dl,$readn) user.ini }
writeini user.ini %difyzip %difynickz 14Ident: %difyidentz 02Last Entry: $+($time,-,$date)
}
}
on *:TEXT:!*:#: {
if ($1 == !archive) {
if $regex($2,/^\d+.\d+/) {
if $read(user.ini,r,/^\Q $+ $2 $+ \E\s/) {
msg $chan $2 user Listing
filter -ffcg user.ini depo.ini /^\Q $+ $2 $+ \E\s/
play $chan depo.ini 750
}
else { msg $chan $2 There are no users
}
}
if $regex($2,/^[^\d]/) {
if $read(user.ini,r,/[^:]\s\Q $+ $2 $+ \E\s/i) {
msg $chan $2 user Listing
filter -ffcg user.ini depo.ini /[^:]\s\Q $+ $2 $+ \E\s/i
play $chan depo.ini 750
}
else { msg $chan $2 There are no users }
}
}
}