on *:TEXT:@register*:#findclan-cod2: { if (!$hget(players,$nick)) { if ($2) { hadd -u604800 players $nick $2 notice $nick You registered in the $2 category. Your registration will expire in 7 days, if you find a team before then, please notify an admin. } else { msg $chan Please specify a league. (@register CAL-m) } } else { msg $chan Your nickname already exists in the $upper($hget(players,$nick)) database. } } on *:TEXT:@status*:#findclan-cod2: { if ($nick ison $chan) { if (($2 == cal-o) || ($2 == cal-m) || ($2 == cal-i)) || ($2 == other) { var %x 1 while (%x <= $hget(players,0).item) { if ($hget(players,%x).data == $2) { set %results %results $hget(players,%x).item } inc %x } msg $chan $+(,$upper($2) Players:) %results unset %results } if ($2 == detail) { msg $chan Registered Players: msg $chan CAL-O: $hfind(players,cal-o,0).data msg $chan CAL-M: $hfind(players,cal-m,0).data msg $chan CAL-I: $hfind(players,cal-i,0).data msg $chan OTHER: $hfind(players,other,0).data } msg $chan Total Registered: $hget(players,0).item } } ON *:TEXT:@detail*:#findclan-cod2: { if ($2) { if ($hget(players,$nick)) { set %x $hfind(details,$2, N, M) msg $chan $2 $+ 's Details: $hget(details,%x).data } else { msg $chan $2 is not in the database! } } else { msg $chan Please specify a name! } } ON *:TEXT:@mydetail*:#findclan-cod2: { if ($2) { if ($hget(players,$nick)) { hadd details $nick $2- msg $chan $nick $+ 's details has been set to: $2- } else { msg $chan Your nick does not exist in the database! } } else { msg $chan Your details are set to: $hget(details,$nick)) } } ON *:TEXT:@del*:#findclan-cod2: { if ($2) { if ($hget(players,$2)) { hdel players $2 hdel details $2 msg $chan Deleted $2 from the database. } else { msg $chan $2 is not in the database! } } else { msg $chan Please specify a name! } } ON *:TEXT:@commands*:#findclan-cod2: { msg $chan Commands: @register - use to register your nick and league in the database - Only CAL-o, CAL-m, CAL-I, or OTHER can be specified as your league (i.e. @register cal-m) msg $chan @status - use to view player names of whos looking for a team - @status detail for more detail (i.e @status cal-m) msg $chan @mydetail - use to set or view your detail - leaving @mydetail blank will show your detail, adding stuff after it sets your detail (i.e @mydetail Past Teams: compLexity Contact: AIM-chickenEater) msg $chan @credits - use to view credits! } ON *:TEXT:@credits*:#findclan-cod2: { msg $chan Coding - wonder, also thanks to snang :). msg $chan Idea - Twista msg $chan Version - 1.0 }