And updated to:
alias item { return $read(pickpocketgame.txt) }
on *:TEXT:*:#:{
if ($1 == !additem) && ($regex($nick($chan,$nick).pnick,/(~|&|@)/)) {
if (!$read(pickpocketgame.txt, w, $2)) {
write pickpocketgame.txt $2-
msg # $2- has been added to the pickpocket game.
}
else { msg # That item has already been added. }
}
if ($1 == !delitem) && ($regex($nick($chan,$nick).pnick,/(~|&|@)/)) {
if ($read(pickpocketgame.txt, w, $2)) {
write -dl $+ $2- pickpocketgame.txt
msg # $2- has been deleted from the pickpocket game.
}
else { msg # That item has not been added to delete. }
}
if ($1 == !pickpocket) {
if ($2 != $null) {
if ($2 ison $Chan) {
if (!%floods) {
msg # $me Walks up to $2 silently
msg # $me Reaches in $2 $+ 's pocket, and finds a/an: $item $+ .
inc -u3 %floods
}
else { msg # $nick $+ , you must wait alteast 3 seconds before using this command again. }
}
else { msg # $2 is not on this channel. }
}
else { msg # Correct command is: !pickpocket <Nick>. }
}
}