menu channel,query,status {
Ians Settings
.Settings
..away...: {
if ($hget(Away,Status) == 1) {
echo -a ERROR: You are already marked as away
}
else {
hadd -m Away MSG2 $$?="Why are you going away?"
hadd -m Away Status 1
hsave AwayStatus.db $hget(Away,Status)
}
}
..back...: {
if ($hget(Away,Status) == 0) {
echo -a ERROR: You are not marked as away
}
else {
hadd -m Away Status 0
hsave AwayStatus.db $hget(Away,Status)
}
}
..position...: hadd -m Away Position $$?="What position are you in SwayGaming?"
..email...: hadd -m Away Email $$?="What is your current email?"
.Skins
..Skin1...: hadd -m Skins 1 $$?="What is Skin1?" | hsave Skins1.db $hget(Skins,1)
..Skin2...: hadd -m Skins 2 $$?="What is Skin2?" | hsave Skins2.db $hget(Skins,2)
..Skin3...: hadd -m Skins 3 $$?="What is Skin3?" | hsave Skins3.db $hget(Skins,3)
}
on *:OPEN:?:{
if ($hget(Away,Status) == 0) {
msg $nick $hget(Skins,1) Ian Olson $hget(Skins,2) $+ $hget(Away,POSITION) $+ $hget(Skins,2) Currently has $query(0) queries open. $hget(Skins,3)
msg $nick $hget(Skins,1) $+ $hget(Away,Email) $+ $hget(Skins,2) Please be patient, I might be busy. Leave a message and I will get back to you ASAP! $hget(Skins,3)
}
else {
msg $nick $hget(Skins,1) Ian Olson $hget(Skins,2) $+ $hget(AWAY,POSITION) $+ $hget(Skins,2) Is currently $+ $hget(Away,MSG2) $+ . $hget(Skins,3)
msg $nick $hget(Skins,1) $+ $hget(Away,Email) $+ $hget(Skins,2) Sorry I am not available to talk =D. Leave a message and I will get back to you ASAP! $hget(Skins,3)
}
}
on *:START:{
if (!$hget(Away,Status)) {
hadd -m Away Status 0
}
if (!$hget(Skins,1)) || (!$hget(Skins,2) || ($hget(Skins,3)) {
hadd -m Skins 1 4,1-0
hadd -m Skins 2 4·0
hadd -m Skins 3 4-
echo -a SKINS HAVE BEEN PRESET!
}
if (!$hget(Away,Position)) {
echo -a Position: YOU MUST SET YOUR CURRENT POSITION! Right Click -> Settings -> Position
}
if (!$hget(Away,Email)) {
echo -a Email: YOU MUST SET YOUR CURRENT EMAIL! Right Click -> Settings -> Email
}
hsave Skins1.db $hget(Skins,1)
hsave Skins2.db $hget(Skins,2)
hsave Skins3.db $hget(Skins,3)
hsave AwayStatus.db $hget(Away,Status)
}
on *:DISCONNECT:{
hsave Skins1.db $hget(Skins,1)
hsave Skins2.db $hget(Skins,2)
hsave Skins3.db $hget(skins,3)
if ($hget(Away,Status) == 1) { hadd -m Away Status 0 | hsave AwayStatus.db $hget(Away,Status) } else { hsave AwayStatus.db $hget(Away,Status) }
hsave position.db $hget(Away,Position)
hsave email.db $hget(Away,Email)
}
on *:QUIT:{
hsave Skins1.db $hget(Skins,1)
hsave Skins2.db $hget(Skins,2)
hsave Skins3.db $hget(skins,3)
if ($hget(Away,Status) == 1) { hadd -m Away Status 0 | hsave AwayStatus.db $hget(Away,Status) } else { hsave AwayStatus.db $hget(Away,Status) }
hsave position.db $hget(Away,Position)
hsave email.db $hget(Away,Email)
}