on $*:text:/^[!@.]dice$/Si:*:{ if ($me != Zizzle) && (Zizzle ison #) halt
  aspam $nick
  if (!$public($chan).ison) { .notice $nick This command will not work while public is turned off.  To turn it on use !zpub on (must be op). | halt }
  if (%dicegame [ $+ [ $chan ] ]) { halt }
  else {
    set -z %dicegame [ $+ [ $chan ] ] 9
    var %item = $rand(1,17)
    var %item2 = $rand(1,10)
    var %nick [ $+ [ $chan ] ] $nick(#,$rand(1,$nick(#,0)),a)
    if (%item == 1) set %item11 [ $+ [ $chan ] ] bite
    if (%item == 2) set %item11 [ $+ [ $chan ] ] kiss
    if (%item == 3) set %item11 [ $+ [ $chan ] ] fuck
    if (%item == 4) set %item11 [ $+ [ $chan ] ] lick
    if (%item == 5) set %item11 [ $+ [ $chan ] ] make out with
    if (%item == 6) set %item11 [ $+ [ $chan ] ] cum on
    if (%item == 7) set %item11 [ $+ [ $chan ] ] love
    if (%item == 8) set %item11 [ $+ [ $chan ] ] slap
    if (%item == 9) set %item11 [ $+ [ $chan ] ] whip
    if (%item == 10) set %item11 [ $+ [ $chan ] ] cuddle
    if (%item == 11) set %item11 [ $+ [ $chan ] ] spank
    if (%item == 12) set %item11 [ $+ [ $chan ] ] rub
    if (%item == 13) set %item11 [ $+ [ $chan ] ] suck
    if (%item == 14) set %item11 [ $+ [ $chan ] ] nibble
    if (%item == 15) set %item11 [ $+ [ $chan ] ] do anything they want to
    if (%item == 16) set %item11 [ $+ [ $chan ] ] rape
    if (%item == 17) set %item11 [ $+ [ $chan ] ] hump

    if (%item2 == 1) set %item22 [ $+ [ $chan ] ] lips
    if (%item2 == 2) set %item22 [ $+ [ $chan ] ] neck
    if (%item2 == 3) set %item22 [ $+ [ $chan ] ] boobs
    if (%item2 == 4) set %item22 [ $+ [ $chan ] ] ears
    if (%item2 == 5) set %item22 [ $+ [ $chan ] ] anywhere they want
    if (%item2 == 6) set %item22 [ $+ [ $chan ] ] tits
    if (%item2 == 7) set %item22 [ $+ [ $chan ] ] toes
    if (%item2 == 8) set %item22 [ $+ [ $chan ] ] ass
    if (%item2 == 9) set %item22 [ $+ [ $chan ] ] pussy
    if (%item2 == 10) set %item22 [ $+ [ $chan ] ] balls

    .timer $+ $chan $+ 1 1 3 describe $chan 6Throws three die...
    .timer $+ $chan $+ 2 1 5 msg $chan 2The first die landed on:6 %item11 [ $+ [ $chan ] ] $+ 2.
    .timer $+ $chan $+ 3 1 6 msg $chan 2The second die landed on:6 %item22 [ $+ [ $chan ] ] $+ 2.
    .timer $+ $chan $+ 4 1 7 msg $chan 2The third die landed on:6 %nick [ $+ [ $chan ] ] $+ 2!

    if (%nick [ $+ [ $chan ] ] == $nick) { .timer $+ $chan $+ 5 1 8 msg $chan 2Well that's no fun,6 $nick $+ 2! }
    else {
      if (%nick [ $+ [ $chan ] ] == $me) { .timer $+ $chan $+ 6 1 8 msg $chan 2SH*T! Do not touch me6 $nick $+ 2! }
      else {
        if (Runescript isin %nick [ $+ [ $chan ] ]) || (Loot isin %nick [ $+ [ $chan ] ]) || (Chanstat isin %nick [ $+ [ $chan ] ]) || (Vectra isin %nick [ $+ [ $chan ] ]) || (Partyroom isin %nick [ $+ [ $chan ] ]) || (Borg isin %nick [ $+ [ $chan ] ]) || (Cookiebot isin %nick [ $+ [ $chan ] ]) { .timer $+ $chan $+ 6 1 8 msg $chan 2Sorry, it's not that kind of robot6 $nick $+ 2... }
        else { .timer $+ $chan $+ 7 1 8 msg $chan 6 $+ $nick 3must %item11 [ $+ [ $chan ] ] $+ 6 %nick [ $+ [ $chan ] ] $+ 3's %item22 [ $+ [ $chan ] ] $+ !!
          unset %item11 [ $+ [ $chan ] ]
          unset %item22 [ $+ [ $chan ] ]
          unset %nick [ $+ [ $chan ] ]
        }
      }
    }
  }
}