This is a nice bad word script using hash tables. But upon using it, I\'ve found that it doesn\'t show the bad words stored. (I don\'t know maybe it\'s just me) Instead it shows the date and time only. I did change something a little to and it turns out well and it fits my needs:

hadd -m Profanity %bw $date $asctime(hh:nn:ss TT) | echo -a 4* 2The bad word $+ 4 %bw 2is added successfully.

 .List Bad Words: {
    if (!$hget(badword,1).item) { echo -s 6* 2my badword list is currently empty. }
    else var %x = $hget(badword,0).data,%d = 0
    while (%x) {
      echo -s 4*1 $hget(badword,%x).data ->4 $hget(badword,%x).item 2is on my profanity list.
      dec %x | inc %d
    }
  }
}