#login on
on *:text:!login &:?: {
if (%hfpass == $2) {
set -u6000 $+(%,hf,$nick) on
notice $nick Login succesful.
}
}
#login end
#Hf on
alias Hfon {
if ($group(#find) == off) {
.enable #find
echo 5 -a Hash Find has been turned on.
}
else {
echo 5 -a Hash Find is already on.
}
}
alias Hfoff {
if ($group(#find) == on) {
.disable #find
echo 5 -a Hash find has been turned off.
}
else {
acho 5 -a Hash find is already off.
}
}
alias Hfadd {
if ($hget(find)) {
var %hf.sub = $$?="what's user's name."
var %hf.dat = $$?="What's %hf.sub phone number? "
hadd find %hf.sub %hf.dat
echo 5 -a Entry created for %hf.sub $+ .
hsave find " $+ $scriptdirfind.hsh"
}
else {
hmake find 100
var %hf.sub = $$?="Enter the subject's name."
var %hf.dat = $$?="Enter the information you want for $1 $+ ."
hadd find %hf.sub %hf.dat
echo 5 -a Entry created for %hf.sub $+ .
hsave find " $+ $scriptdirfind.hsh"
}
}
alias Hfdel {
if ($hget(find)) {
var %hf.sub = $$?="Name to delete?"
hdel find %hf.sub
echo 5 -a Entry for %hf.sub deleted.
}
else {
echo 5 -a Table cannot be found.
echo 5 -a Entry cannot be present.
}
}
alias Hfclear {
if ($hget(find)) {
hfree find
echo 5 -a Table cleared.
}
}
menu nicklist {
Hash find
.On Off
..Hf on:Hfon
..Hf off:Hfoff
.Table
..Add:Hfadd
..Delete:Hfdel
..Clear:Hfclear
.set pass:set %hfpass $$?="Set your new pass."
}
#Hf end
#find on
on *:start: {
if ($isfile(find.hsh)) {
hmake find 100
hload -o find find.hsh
}
else {
hmake find 100
}
}
on *:exit: {
hsave -o find " $+ $scriptdirfind.hsh"
hfree find
unset %hf*
}
on *:text:@find &:*: {
if (((%aa != on) && ($hfind(find, $2)) && ($($+(%,hf,$nick),2) == on))) {
msg $nick : $+ $hget(find, $2)
set -u10 %aa on
}
else {
if ((%aa != on) && ($hget(find) == $null)) {
set -u10 %aa on
hmake 100 find
}
}
}
#find end