on *:sockread:lokki:{
sockread %rdsck
if ($gettok(%rdsck,1,32) == 220) {
sockwrite -n $sockname USER username
sockwrite -n $sockname PASS password
sockwrite -n $sockname TYPE A
sockwrite -n $sockname PASV
.timer 1 0.8 sockwrite -n $sockname LIST
socklisten dataport
}
echo -at %rdsck
}
on *:socklisten:dataport:{
sockaccept dataport
echo -at test
}