   	>                                                                z+                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               PUU                                                                                                                   UUUUU                                                                                                                  UUUUUU                                                                                                                 UUUUUUU                                                                                                                PUUUUUU                                                                                                                UUUUU                                                                                                                  PUUUU                                                                                                                   UUUU                                                                                                                   PUUU                                                                                                                    UUU                                                                                                                   PUUU                                                                                                PU                  UUU                                                                                                UU                 UUU                                                                                                 UU                PUUU                                                                                                 UU                PUU                                                                                                 UU                UUU                                                                                                 UU                UUU                                                                                                  UU                UUU                                                                                                  UU                UU                                                                                                  UU                UU                                                                                                  UU                UU                     PU     PUUUU               PUUUU                  PUUUU                    UU  UU            UU                     UU   PUUUUU             PUUUUUU                PUUUUUU                   UU PUU           UU                     UU  PUUUUUU            PUUUUUUUU              PUUUUUUUU                  UU UUU           UU                     UU PUUUUUUU            UUUUUUUUUU              UUUUUUUUUU                  UUPUUU           UU                     UU UUUUUUUU             UUUUUUUUUU              UUUUUUUUUU                  UUUUUU            UU                     UUUUUUU                PUUU    UUU            PUUU    UUU                 UUUUUU            UU                     UUUUUUU                 PUU      UU            PUU      UU                 UUUUUU             UUU                     UUUUUU                  UUU      UUU            UUU      UUU                 UUUUU             UUU                     UUUUU                  UU      PUU            UU      PUU                 UUUUU              PUU                    UUUU                   UU      PUU            UU      PUU                 UUUU              PUU                    UUUU                   UU      PUU            UU      PUU                 UUUU                UUU                    UUUU                    UU      PUU           UU      PUU                UUU                UUU                   UUU                    UU      PUU           UU      PUU                UUU                 PUUU                   UUU                    UU      PUU           UU      PUU                UUU                PUUU                  UUU                     UU      PUU            UU      PUU                UUUU                 UUUU                  UUU                     UU      PUU            UU      PUU                UUUU                PUUU                 UU                     UUU      UUU            UUU      UUU                UUUUU                 UUUU                UU                     PUU      UU            PUU      UUU                UUUUU                PUUUU               UU                     PUUU    UUU            PUUU    UUUU                UUUUUU                 UUUUUU              UU                      UUUUUUUUUU              UUUUUUUUUUU                UUUUU                PUUUUUUU            UU                      UUUUUUUUUU              UUUUUUUUUUU                UUPUUU                 PUUUUUU           UU                      PUUUUUUUU              PUUUUUUUUUU                UU UUU                 PUUUUU           UU                       PUUUUUU                PUUUUUUUU                UU PUU                  PUUUU           UU                        PUUUU                  PUUUU UU                UU  UU                     PU            PU                           PU                      PU   UU                PU   PU                                                                                              UU                                                                                                                     PUY -- title: frogs croak
-- author: potato imaginator
-- desc: Frogs Croak text morphing
-- script: lua

function BOOT()
 cos=math.cos
 sin=math.sin
 pi=math.pi
 max=math.max
 min=math.min
 r=20
 t=-1/2
end

function mid(a,b,c)
 return a+b+c-max(a,b,c)-min(a,b,c)
end

function draw(tim,rad,c)
 local t4=11*tim/16
 for i=0,r,1/2 do
  circ
  (24+r/2-r*cos(pi*i/r/2)^0.5,
   68-i,rad,c)--1st
  circ
  (24-r/2+r*sin(pi*tim/2)
   -r*sin(pi*tim/2)*sin(pi*i/r/2)^0.5,
   68-i+r,rad,c)--1st
  circ(24+48-r/2,68+i,rad,c)--2nd
 end
 for i=0,r-r*tim do
  circ(24-r+i+r/2,68,rad,c)--1st
 end
 for i=0,1,1/16 do
  circ
  (24+48+r-r*cos(i*pi/2)-r/2,
   68+r-r*sin(i*pi/2),rad,c)-- 2nd
  if tim<1/2 then
   local zt=1-2*tim
   for i=0,r/2*zt do
    circ(24+48*4+i,68,rad,c)--5th
    circ(24+48*4-i,68+r,rad,c)--5th
   end
	  circ
	  (24+48*4-zt*r/2*sin(i*pi),
	   68+r/4-r/4*cos(i*pi),rad,c)--5th
	  circ
	  (24+48*4+zt*r/2*sin(i*pi),
	   68+3*r/4-r/4*cos(i*pi),rad,c)--5th
		else
		 local zt=2*tim-1
		 for i=0,r*zt do
			 circ(24+48*4,68-i/2,rad,c)--5th
				circ(120+48*2+i/2,68+r/2-i/2,rad,c)
				circ(120+48*2+i/2,68+r/2+i/2,rad,c)
			end
		 circ(24+48*4,68+r*i,rad,c)--5th
		end
 end
 for i=0,1,1/32 do
  circ
  (24+48*2+r/2-r/2*cos(2*i*pi)-r/2,
   68+r/2-r/2*sin(2*i*pi),rad,c)--3rd
  circ
  (24+48*3+r/2-r/2*cos(2*i*pi)-r/2,
   68+r/2-r/2*sin(2*i*pi),rad,c)--4th
  local zt=0
  if t4<1/2 then
   zt=1-2*t4
  else
   zt=0
  end
  if t4<1/4 then
   for i=0,2*r*(1/4-t4) do--4th
    circ(24+48*3+r/2,68+r/2-i,rad,c)
   end--4th
  end
  if t4<1/2 then
	  circ
	  (24+48*3+r/2+r/2*cos(i*pi*zt)
	   -r/2,
	   68+3*r/2+r/2*sin(i*pi*zt),
	   rad,c)--4th
			for i=0,r do--4th
			 circ(24+48*3+r/2,68+i+r/2,rad,c)
			end--4th
		else
		 for i=0,r-2*r*(t4-1/2) do
			 circ(24+48*3+r/2,68+i+r/2,rad,c)
			end--4th
		end
 end
end

function TIC()
 cls()
 t=t+1/60
 tz=sin(t)+1/2
 draw(mid(0,tz,1),2,5)
end
