Just put this in your remotes then type /wop anywhere in mIRC
[-WARNING-] THIS MIGHT GIVE YOU A HEADACHE
If you are easily dizzied then dont do this

alias wop {
  window -pdC +L @Wheelofpain 0 0 315 315
  window -ph @Dominator 0 0 800 465
  wheelofpain 1
}
alias  wheelofpain {
  if $window(@Dominator) && $window(@Wheelofpain) {
    drawrect -rfn @Dominator 16711935 1 0 0 800 465
    var %i 360
    while %i > 90 {
      var %x $calc($sin($calc($1 +%i)).deg *80 +210),%y $calc($cos($calc($1 +%i)).deg *80 +210)
      var %x2 $calc($sin($calc($1 +180+%i)).deg *80 +610),%y2 $calc($cos($calc($1 +180+%i)).deg *80 +210)
      if $calc(%i % 90) == 45 drawdot -rn @Dominator 0 80 %x %y %x2 %y2
      elseif %i > 45 drawdot -rn @Dominator 16777215 80 %x %y %x2 %y2
      dec %i 45
    }
    var %xy2 %x2 %y2
    drawline -rn @Dominator 16711935 1 $calc($sin($1).deg *180 +610) $calc($cos($1).deg *180 +210) $calc($sin($calc(180+$1)).deg *180 +610) $calc($cos($calc(180+$1)).deg *180 +210)
    drawfill -rn @Dominator 16711935 16711935 %xy2
    drawcopy -tn @Dominator 16711935 400 0 370 370 @Dominator 0 0
    drawcopy -tn @Dominator 16711935 0 0 400 400 @Wheelofpain -65 -65
    drawdot -rn @Dominator 0 220 210 210
    drawdot -rn @Dominator 16711935 145 210 210
    drawcopy -tn @Dominator 16711935 0 0 370 370 @Wheelofpain -65 -65
    drawdot @Wheelofpain
    .timer -h 1 1 wheelofpain $calc(11+$1)
  }
  else { window -c @Wheelofpain | window -c @Dominator }
}

on *:keydown:@Wheelofpain:27:window -c @Wheelofpain