I made a greet system for mirc with 1000 slots, i hope you enjoy it
Oh, and the commands:
Add greet:
/addgreet Nick Message
Delete Greet:
/delgreet Nick
List all greets:
/greets
And yes. hash tables are hitting again :P
alias addgreet {
if ($hget(greets) != greets) { hmake greets }
hadd greets $1 $2-
echo -a Greet Added for $1
}
alias delgreet {
var %i = 1
while (%i <= $hget(greets,0).item) {
if ($hget(greets,%i).item == $1) {
hdel greets $1
echo -a Greet Deleted for $1
}
inc %i
}
}
alias greets {
var %i = 1
if ($hget(greets)) {
while (%i <= $hget(greets,0).item) {
echo -a 4,1[0 $+ $hget(greets,%i).item $+ 4,1] 4,1(7 $+ $hget(greets,$hget(greets,%i).item) $+ 4)
inc %i
}
}
}
on *:EXIT:{ hsave greets greetsystem.txt }
on *:START:{ hmake greets | hload greets greetsystem.txt }
on *:JOIN:#:{
var %i = 1
while (%i <= $hget(greets,0).item) {
if ($nick == $hget(greets,%i).item) {
msg $chan 4,1[0 $+ $nick $+ 4,1] 4,1(7 $+ $hget(greets,$nick) $+ 4)
}
inc %i
}
}
Yeah this is REALLL weird. Made this same thing a few days ago for a guy that knows ZIP about mIRC. I have no use for these kinds of scriplets.
We used the same add/del aliases even. Kind of spooky.
http://www.evolutionscriptz.com/modules.php?name=Forums&file=viewtopic&t=881