query roll back - 11/06/05 03:32 AM
me and my friend came up with this, but it's not excally working right.
ON *:TEXT:*:?:{
if (!$hget($nick $+ Pms)) { hmake $nick $+ Pms 10 }
hinc $nick $+ Pms count
hadd $nick $+ Pms message $+ $hget($nick $+ Pms,count) $timestamp < $+ $nick $+ > $1-
if ($hget($nick $+ Pms,count) == 5) {
hdel $nick $+ Pms count
}
}
ON *:INPUT:?:{
if (!$hget($active $+ Pms)) { hmake $nick $+ Pms 10 }
hinc $active $+ Pms count
hadd $active $+ Pms message $+ $hget($nick $+ Pms,count) $timestamp < $+ $me $+ > $1-
if ($hget($active $+ Pms,count) == 5) {
hdel $active $+ Pms count
}
}
alias readback {
if (!$1) { echo -a No Nickname Given. | halt }
else {
set %aliechoback1 1
set %aliechoback2 5
while (%aliechoback1 <= %aliechoback2) {
echo -a $hget($1 $+ Pms,message $+ %aliechoback1)
inc %aliechoback1
}
}
}
ON *:TEXT:*:?:{
if (!$hget($nick $+ Pms)) { hmake $nick $+ Pms 10 }
hinc $nick $+ Pms count
hadd $nick $+ Pms message $+ $hget($nick $+ Pms,count) $timestamp < $+ $nick $+ > $1-
if ($hget($nick $+ Pms,count) == 5) {
hdel $nick $+ Pms count
}
}
ON *:INPUT:?:{
if (!$hget($active $+ Pms)) { hmake $nick $+ Pms 10 }
hinc $active $+ Pms count
hadd $active $+ Pms message $+ $hget($nick $+ Pms,count) $timestamp < $+ $me $+ > $1-
if ($hget($active $+ Pms,count) == 5) {
hdel $active $+ Pms count
}
}
alias readback {
if (!$1) { echo -a No Nickname Given. | halt }
else {
set %aliechoback1 1
set %aliechoback2 5
while (%aliechoback1 <= %aliechoback2) {
echo -a $hget($1 $+ Pms,message $+ %aliechoback1)
inc %aliechoback1
}
}
}