ON *:TEXT:!key:*: {
var %f = C:\Users\Owner\AppData\Roaming\mIRC\keys.txt
if (!$isfile(%f)) { msg $nick Error: File Not exist! | return }
if (!$lines(%f)) { msg $nick Error: File is empty! | return }
var %r = $read(%f,nt,1)
var %rn = $readn
if (%r) {
msg $nick %r
write -dl $+ %rn $qt(%f)
}
elseif (!%r) { msg $nick There is NOT any key available! }
}