>ΐ?ΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜ ›™™©ͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺ™™Ήΐ ›™™ͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺš™Ήΐ ›™ͺͺͺͺͺͺͺͺͺͺ™™™™™™©ͺͺͺͺͺͺͺͺͺšΉ ΐ ›©ͺͺͺͺͺͺͺͺ™™™™™™™™™™©ͺͺͺͺͺͺͺͺΉΐ ›ͺͺͺͺͺͺͺš™™™™™™™™™™™™™ͺͺͺͺͺͺͺΊΐ """""«ͺͺͺͺͺͺš™™™™™™™™™™™™™™™ͺͺͺͺͺͺΊ ΐ """"""""«ͺͺͺͺͺš™™™™™™™™™™™™™™™™™ͺͺͺͺͺΊ ΐ """""""""""«ͺͺͺͺš™™™™™™™™™™™™™™™™™™™ͺͺͺͺΊΐ """""""""""""«ͺͺͺͺ™™™™™™™™™™™™™™™™™™™™©ͺͺͺΊ ΐ """"""""""""""«ͺͺͺ™™™™™™™™™™™™™™™™™™™™™™©ͺͺΊ ΐ """""""""""""""«ͺͺš™™™™™™™™©ͺͺͺͺͺ™™™™™™™™™ͺͺΊ ΐ """"""""""""""""«ͺͺ™™™™™™™©ͺͺͺͺͺͺͺͺͺ™™™™™™™©ͺΊΐ """""""""""""""""«ͺš™™™™™™©ͺͺͺͺͺͺͺͺͺͺͺ™™™™™™™ͺΊΐ """"""""""""""""""«ͺ™™™™™™©ͺͺͺͺͺͺͺͺͺͺͺͺͺ™™™™™™©Ί ΐ """""""""""""""""""«š™™™™™©ͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺ™™™™™™Ίΐ """""""""""""""""""«™™™™™™ͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺš™™™™™Ή ΐ """"""""""""""""""""›™™™™™ͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺš™™™™Ή ΐ """"""""""""""""""""›™™™™©ͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺͺ™™™™Ή ΐ """"""""""""""""""""›™™™™ͺͺͺͺͺͺͺͺ™™™™©ͺͺͺͺͺͺͺš™™™Ή ΐ """"""""""""""""""""›™™™©ͺͺͺͺͺͺš™™™™™™™ͺͺͺͺͺͺͺ™™™Ή ΐ """"""""""""""""""""›™™™ͺͺͺͺͺͺš™™™™™™™™™ͺͺͺͺͺͺš™™Ή ΐ """"""""""""""""""""›™™©ͺͺͺͺͺš™™™™™™™™™™™ͺͺͺͺͺͺ™™Ή ΐ """"""""""""""""""›™™©ͺͺͺͺͺ™™™™™™™™™™™™©ͺͺͺͺͺ™™Ή ΐ """"""""""""""""!›™™ͺͺͺͺͺ™™™™™™™™™™™™™™©ͺͺͺͺš™Ή " ΐ """"""""""""""""!›™©ͺͺͺͺš™™™™™™™™™™™™™™™ͺͺͺͺͺ™Ή  ""ΐ """"""""""""""""›™©ͺͺͺͺ™™™™™™™™™™™™™™™™©ͺͺͺͺ™Ή " "ΐ """""""""""""""›™ͺͺͺͺͺ™™™™™™©ͺͺͺ™™™™™™©ͺͺͺͺšΉ ""ΐ """"""""""""""""›™ͺͺͺͺš™™™™™ͺͺͺͺͺͺš™™™™™ͺͺͺͺšΉ""ΐ """""""""""""""›©ͺͺͺͺ™™™™™©ͺͺͺͺͺͺͺ™™™™™©ͺͺͺͺΉ ""ΐ """"""""""""""›©ͺͺͺͺ™™™™™ͺͺͺͺͺͺͺͺš™™™™©ͺͺͺͺΉ "ΐ """""""""""""›ͺͺͺͺš™™™™©ͺͺͺͺͺͺͺͺͺ™™™™™ͺͺͺͺΊ"  ΐ """""""""""›ͺͺͺͺš™™™™ͺͺͺͺͺͺͺͺͺͺš™™™™ͺͺͺͺΊ   "ΐ """""""" ""›ͺͺͺͺ™™™™©ͺͺͺͺͺͺͺͺͺͺͺ™™™™©ͺͺͺΊ  " ΐ """""!›ͺͺͺͺ™™™™ͺͺͺͺͺͺͺͺͺͺͺͺš™™™©ͺͺͺΊ"  "ΐ «ͺͺͺͺ™™™™ͺͺͺͺͺ™™©ͺͺͺͺš™™™©ͺͺͺ"""" "ΐ «ͺͺͺš™™™™ͺͺͺͺš™™™ͺͺͺͺš™™™™ͺͺ "ΐ !«ͺͺͺš™™™©ͺͺͺͺ™™™™©ͺͺͺͺ™™™™ͺͺ ΐ " "«ͺͺͺš™™™©ͺͺͺš™™™™™ͺͺͺͺ™™™™ͺ  ΐ """"±«ͺͺͺš™™›©ͺͺͺš™™™™™ͺͺͺͺ™™™™ͺ ""ΐ """"«ͺͺͺš™™™©ͺͺͺš™™™™™ͺͺͺͺ™™™™ͺ """"ΐ """" «ͺͺͺš™™™©ͺͺͺš™™™™™ͺͺͺͺ™™™™ͺ """""ΐ " " " "!«ͺͺͺš™™™©ͺͺͺš™™™™™ͺͺͺͺ™™™™ͺ !ΐ " "«ͺͺͺš™™™©ͺͺͺͺ™™™™©ͺͺͺͺ™™™™ͺͺ" ΐ """"""""""""«ͺͺͺš™™™™ͺͺͺͺš™™™ͺͺͺͺš™™™™ͺͺ ""ΐ "" """"«ͺͺͺͺ™™™™ͺͺͺͺͺ™™©ͺͺͺͺš™™™©ͺͺͺ!ΐ """""" ›ͺͺͺͺ™™™™ͺͺͺͺͺͺͺͺͺͺͺͺš™™™©ͺͺͺΊΐ """ "›ͺͺͺͺ™™™™©ͺͺͺͺͺͺͺͺͺͺͺ™™™™©ͺͺͺΊΐ """ "›ͺͺͺͺš™™™™ͺͺͺͺͺͺͺͺͺͺš™™™™ͺͺͺͺΊΐ ""›ͺͺͺͺš™™Ι™©ͺͺͺͺͺͺ«ͺͺ™™™™™ΚͺͺͺΊΐ ""›©ͺͺͺͺ™™™™™ͺͺͺͺͺͺͺͺš™™™™©ͺͺͺͺΉΐ " ›©ͺͺͺͺ™™™™™©ͺͺͺͺͺͺͺ™™™™™©ͺͺͺͺΉ"ΐ  ›™ͺͺͺͺš™™™™™ͺͺ ͺͺš™™™™™ͺͺͺͺšΉ!ΐ  ›™ͺͺͺͺͺ™™™™™™ ™™™™™™©ͺͺͺͺšΉ""ΐ ›™©ͺͺͺͺ™™™™™™ ™™™™™™©ͺͺͺͺ™Ή"""ΐ ›™©ͺͺͺͺš™™™™™™™™™™ͺͺͺͺͺ™Ή"ΐ ›™™ͺͺͺͺͺ™™™™™™™™™©ͺͺͺͺš™Ή!ΐ  ›™™©ͺͺͺͺͺ™™™ ™™™©ͺͺͺͺͺ™™Ή!ΐ ›™™©ͺͺͺͺͺš™™ Ÿ™™™ͺͺͺͺͺͺ™™Ήΐ "Α›™™™ͺͺͺͺͺͺ›™ ™™ͺͺͺͺͺͺš™™Ήΐ ›™™™©ͺͺͺͺͺͺš™ͺͺͺͺͺͺͺ™™™Ή!ΐ ›™™™™ͺͺͺͺͺͺͺ ͺͺͺͺͺͺš™™™Ή!ΐ ›™™™™©ͺͺͺͺͺͺ ͺͺͺͺͺͺ™™™™Ήΐ ›™™™™™ͺͺͺͺͺ ͺͺͺͺͺš™™™™Ή!ΐ «™™™™™™ͺͺͺͺ ͺͺͺͺš™™™™™Ή """ΐ «šœ™™™™©ͺͺͺ  ͺͺͺ™™™™™™Ί!! " """ΐ «ͺ™™™™™™©ͺͺ ͺͺ™™™™™™©Ί!""ΐ «ͺš™™™™™™©  ͺ™™™™™™™ͺΊ! """ΐ «ͺͺ™™™™™™™  ™™™™™™™©ͺΊ!! ""ΐ ±«ͺͺš™™™™™™°™™™›™™™ͺͺΊ!ΐ «ͺͺͺ™Ι™™™ ™™™™™™©ͺͺΊ!"""ΐ  «ͺͺͺͺ™™™™ ™™™™™©ͺͺͺΊ"""ΐ Α«ͺͺͺͺš™™™™™™™™ͺͺͺͺΊΑ!! !"ΐ «ͺͺͺͺͺš™ ™™™™ͺͺͺͺͺΊ!!ΐ «ͺͺͺͺͺͺœ ™™™ͺͺͺͺͺ¬Ί ! ΐ ›ͺͺͺͺͺͺͺ™™ͺͺͺͺͺͺͺΊ"!! ΐ ›©ͺͺͺͺͺͺ ͺͺͺͺͺͺͺͺΉ !""""ΐ ›™ͺͺͺͺͺ  ͺͺͺͺͺͺͺšΉ!!! """ "ΐ ›™™ͺͺͺͺ ͺͺͺͺͺͺš™Ή"!ΐ ΑΜΜΜΜΜΜΜΜΜΜΜΜΜΜ ΐΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜ!"" ΐ """"""""""""""""ΐ """""""" """"""""""!ΐ """""""""""""""""""!ΐ """""""""" """""""""ΐ """""""""""""""""""!ΐ """"""""""v""""""""""!ΐ """"""""""gVPUf'"""""""""!ΐ  """""""""""gVUUUUUUUf'"""""""""ΐ """""""""rfUUUUUUUUev"""""""""!ΐ """""""""rfUUUUUUUUev"""""""""ΐ """""""""gVUUUUUUUUUf'""""""""!ΐ """"""""rfVUUUUUUUUUfv""""""""ΐ """"""""rfUUUUUUUUUUev""""""""!ΐ """"""""gfUUUUUUUUUUef'"""""""!ΐ """"""""gVUUUUUUUUUUUf'"""""""!ΐ """""""rfVUUUUUUUUUUUfv"""""""!ΐ """""""rfUUWUVUUUVUWUev"""""""!ΐ """""""gfUUWUVUUUVUWUef'""""""!"ΐ """""""gVUuUUVUUUVUuUUf'""""""!"ΐ """"""rfVUuUUVUUUVUuUUfv"""""""ΐ """"""rfUUWUeUUUUeUUWUev""""""""ΐ """""""gfUUWUeUUUUeUUWUef'"""""!""ΐ """"""rfVUuUUeUUUUeUUuUUfv"""""! !""ΐ "" """"""rfVUuUUUUUUUUUUuUUfv"""""!"""ΐ """"""""gfUUWUUUUUUUUUUUWUef'"""""""ΐ """""gffUWUUUUUUUUUUUWeff'""""" "ΐ "" """"rfffvUUUUUUUUUUUUufffv"""" !"ΐ """" """"rfffvffVUUUUUUUffvfffv""""""ΐ """"" """"gfffgfffVUUUUUffffgfff'"""!"ΐ """""" """"gffffffffUUUUeffffffff'"""!"ΐ """""" """rfffffffffVUUUfffffffffv""""!"ΐ """"""""""rffffffffffUUefffffffffv""" """ΐ """"""""""wfffffffffffeffffffffffv'"""!"""ΐ """""""""""""wgfffffffffffffffffffw'"""""""""" "ΐ """""""" """""rwwwgfffffffffffwwww"""""! "ΐ """"""""" """""""""rwffffffffvw"""""""""""ΐ """"""""""!""""""""""""""wffffffv'""""""""""!!"ΐ """"""""""""!""""""""""""gfffff'"""""""""""!!"ΐ """"""""""""""""""""""rgfffw""""""""""""!!"ΐ """"""""! """""""""""""rwvw"""""""""""""!""ΐ """"""""""""""""""""""'"""""""""""""" """ΐ """"""""""""""""""""""""""""""""""""" """ΐ """"""" """"""""""""""""""""""" """! "ΐ """"""""! """""""" """""""""""""ΐ """"""""""""""""" """"""""""ΐ """""""""" """""""""""""ΐ " """"""""ΐ  """"" ΐ  """ΐ ΐ "ΐ ΐ ΐ ΐ ΐΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜΜs-- title: abandoned -- author: potato imaginator -- desc: Eye Balls follow the Mouse -- script: lua cos=math.cos sin=math.sin pi=math.pi t=0 -- Time t2=0 -- Woman Hair Line Patterns Timer t3=0 -- Shadow Spinning Timer t4=0 -- Miror Time y=56 -- Woman Y Position *** myv=0 -- mirror y value ml=30 -- mirror length mh=80 -- mirror height ebr=2 -- Eye Ball Radius ev2=10 -- 2nd Eye Offset Varibale mx,my=mouse() p1={} -- Mirror Particles for i=1,30 do p1[i]= {x=math.random(120-40,120+40), y=myv+mh-1, dy=-1/math.random(1,5), t=0, max_t=5*math.random(3,5), c=math.random(11,12)} end function mid(a,b,c) return a+b+c-math.max(a,b,c)-math.min(a,b,c) end function eye(_x,_y,rx,ry) slope=(my-_y)/(mx-_x) ang=math.atan(slope) ex= mid (_x-(rx-ebr)*cos(ang),mx, _x+(rx-ebr)*cos(ang)) ey= mid (_y-(ry-ebr)*sin(ang),my, _y+(ry-ebr)*sin(ang)) elli(_x,_y,rx,ry,2) circ(ex,ey,ebr,1) end function eye2(_x,_y,rx,ry) if mx>=ev2 and my<=136-ev2 then slope=(my-_y)/(mx-_x) ang=math.atan(slope) elseif my>=136-ev2 then ang=0 elseif mx<=ev2 then ang=-pi/2 end ex= mid (_x-(rx-ebr)*cos(ang),mx, _x+(rx-ebr)*cos(ang)) ey= mid (_y-(ry-ebr)*sin(ang),my, _y+(ry-ebr)*sin(ang)) elli(_x,_y,rx,ry,2) circ(ex,ey,ebr,1) end function upd_p1() for i=1,#p1 do p1[i].t=p1[i].t+1/4 p1[i].y=p1[i].y+p1[i].dy if p1[i].t>=p1[i].max_t then p1[i]= {x=math.random(120-40,120+40), y=myv+mh-1, dy=-1/math.random(1,5), t=0, max_t=5*math.random(3,5), c=math.random(11,12)} end end end function draw_p1() for i=1,#p1 do pix(p1[i].x,p1[i].y,p1[i].c) end end for i=1,60 do -- Initial Set Up upd_p1() end function TIC() cls() -- Black BackGround upd_p1() mx,my=mouse() elli(120,68+10,80,50,1) clip(120-ml,0,2*ml,136) elli(120,68+10,80,50,2)--MirrorShade clip() for i=0,2*pi,0.01 do -- Shadow Pattern line (120+81*cos(i+t3), 68+11+51*sin(i+t3), 120 +(80-5*(1+cos(16*i)))*cos(i+t3), 68+11 +(50-5/8*5*(1+cos(16*i)))*sin(i+t3), 0) pix (120 +(80-5*(1+cos(16*i)))*cos(i+t3), 68+11 +(50-5/8*5*(1+cos(16*i)))*sin(i+t3), 2) end rect(120-ml,myv,2*ml,mh,10) -- Mirror clip(120-ml,myv,2*ml,mh) for i=8,-4,-1 do -- Mirror Portal circ(120,myv+mh/2,8*(i+t4),9+i%2) end clip() rectb(120-ml,myv,2*ml,mh,11)-- Mirror draw_p1() line -- Mirror Bottom White Line (120-45,myv+mh-1,120+45,myv+mh-1,12) for i=177,220 do -- Shadow Lines local z=4-3*sin((i-177)/(220-177)*pi) pix (i+z,20+(i-177)/(220-177)*20-z,2) pix (i-z,20+(i-177)/(220-177)*20+z,2) end for i=0,46 do -- Shadow Lines local z=5-3*sin(i/40*pi) line (120+ml+i, (myv+mh/2)*(cos(i/40*pi/2))-z, 120+ml+i, (myv+mh/2)*(cos(i/40*pi/2))+z, 0) pix (120+ml+i, (myv+mh/2)*(cos(i/40*pi/2))-z,2) pix (120+ml+i, (myv+mh/2)*(cos(i/40*pi/2))+z,2) end for i=177,180 do -- Shadow Lines local z=2-1*sin((i-177)/(220-177)*pi) line (i+z,20+(i-177)/(220-177)*20-z, i-z,20+(i-177)/(220-177)*20+z,0) end pix(180,18,0) -- Shadow Line Adjusting pix(179,19,0) -- Shadow Line Adjusting pix(176,23,0) -- Shadow Line Adjusting clip(0,0,120+ml,136) -- Shadow attach circ(120+ml,myv+mh/2,5,0) -- to Mirror clip() tri -- Woman Dress (120,y+12,120-24,y+56,120+24,y+56,6) line(120,y+12,120-24,y+56,7) line(120,y+12,120+24,y+56,7) tri -- Woman Dress (120,y+16,120-16,y+48,120+16,y+48,5) for i=120-24,120+24 do local z= 4*cos((i-120)/24*pi/2) +2*(1+cos((i-120)/24*pi/2*4)) *cos((i-120)/24*pi/2) line(i,y+56,i,y+56+z,6) pix(i,y+56+z,7) end for i=120-16,120+16 do local z= 4*cos((i-120)/16*pi/2) +2*(1+cos((i-120)/16*pi/2*4)) *cos((i-120)/16*pi/2) line(i,y+48,i,y+48+z,5) end line(120-4,y+40,120-5,y+46,6)-- Dress line(120+4,y+40,120+5,y+46,6)-- Lines line(120-8,y+40,120-14,y+52,7) line(120+8,y+40,120+14,y+52,7) circ(120,y,4,0) -- Woman Head for i=0,24 do -- Woman Hair line (120-4-i/2.5+i/10*sin(-t+i/4), y+i, 120+4+i/2.5+i/10*sin(-t+i/4),y+i,0) end elli (120+24/10*sin(-t+6),y+24, 4+24/2.5,6,0) -- Woman Hair clip(120-16,y-8,2*16,40) for i=120-16,120+16,4 do for j=0,4 do -- Woman Hair Pattern for k=0,2*j+t2/10 do if pix(i,y+24*j+t2+k)==0 then pix(i,y+24*j+t2+k,15) end end if (i//4+1)%3==0 then for k=0,4*j+t2/4 do if pix(i,y+24*j+t2+k)==0 then pix(i,y+24*j+t2+k,15) end end end end end clip() eye(30,20,20,12+3*cos(t)) for i=-2,2 do -- Monster Mouth local z=8*cos(i/2*pi/2) elli (30+8*i,40+z, 2, 2+2*cos(i/2*pi/2) +4*(1-cos(t))*cos(i/2*pi/2),2) end clip(ev2,0,240,136-ev2) -- 2nd Eye circ(ev2,136-ev2,20,2) eye2(ev2,136-ev2,20,20) clip() clip(ev2+20,0,240,136) -- 2nd Eye circb(ev2+20,136-ev2+2,2,2) clip() clip(0,0,240,136-ev2-20) -- 2nd Eye circb(ev2-2,136-ev2-20,2,2) clip() for i=-10,50 do -- Right Tentacle local z=5-i/10 line (215-i,72+i/4*cos(i/6-t)-z, 215-i,72+i/4*cos(i/6-t)+z,0) pix(215-i,72+i/4*cos(i/6-t)-z,2) pix(215-i,72+i/4*cos(i/6-t)+z,2) end trib -- Triple Eye Monster (215+10*cos(t/2), 110+10*sin(t/2), 215+10*cos(t/2+2*pi/3), 110+10*sin(t/2+2*pi/3), 215+10*cos(t/2+4*pi/3), 110+10*sin(t/2+4*pi/3), 1) for i=0,2 do -- Triple Eye Monster eye (215+10*cos(t/2+2*pi*i/3), 110+10*sin(t/2+2*pi*i/3),4,4) end rectb(0,0,240,136,12) -- Screen Border t=t+1/24 t2=(t2+1/4)%24 t3=t3+1/120 t4=t4+1/16 if t4>=2 then t4=0 end end