; rescalable and orient changing pentagram at mouse position by escaflowne
{ 
PENFRONT 3 PENSIZE 255 PENOPACITY 0 PENFILLOPACITY 255 RANDOM 255 RANDOM 255 RANDOM PENCOLOR 
MOUSEPOS y = x =

66 scale =        ;Change scale to make bigger or smaller

1 orient =        ;Set orientation: 1 for normal, -1 for flipped

scale scale_h =
scale scale_w =
200 width =
200 height =
x width 2 / - centerx =
y height 2 / - centery =

width 2 / x circcenterx =
height 2 / y circcentery =
circcenterx circcentery height scale_h * 100 / width scale_w * 100 / oval
100 100 - scale_w * 100 / centerx + width 2 / +
  0 100 - orient * scale_h * 100 / centery + height 2 / +
  158 100 - scale_w * 100 / centerx + width 2 / +
  180 100 - orient * scale_h * 100 / centery + height 2 / +
line

158 100 - scale_w * 100 / centerx + width 2 / +
  180 100 - orient * scale_h * 100 / centery + height 2 / +
  5 100 - scale_w * 100 / centerx + width 2 / +
  68 100 - orient * scale_h * 100 / centery + height 2 / +
line

5 100 - scale_w * 100 / centerx + width 2 / +
  68 100 - orient * scale_h * 100 / centery + height 2 / +
  195 100 - scale_w * 100 / centerx + width 2 / +
  68 100 - orient * scale_h * 100 / centery + height 2 / +
line

195 100 - scale_w * 100 / centerx + width 2 / +
  68 100 - orient * scale_h * 100 / centery + height 2 / +
  42 100 - scale_w * 100 / centerx + width 2 / +
  180 100 - orient * scale_h * 100 / centery + height 2 / +
line

42 100 - scale_w * 100 / centerx + width 2 / +
  180 100 - orient * scale_h * 100 / centery + height 2 / +
  100 100 - scale_w * 100 / centerx + width 2 / +
  0 100 - orient * scale_h * 100 / centery + height 2 / +
line"" CHATSTR = } CHATSTR "penta1" == If
;By Esca