ÎÌÌÌ̈ˆˆ¬ªªª¬ˆˆˆ¬ÌÌ̬ÌÀ̬ÌÀ̬ÌÀÌÌÌìÌÀÀî̬ÀÌÀ¬ÀÀÀ¬ÀÀÀ¬ÀÀÎÌÌÌ̈ˆˆ¬ªªª¬ˆˆˆ¬ÌÌ̬ÌÌ̬ÌÀ̬ÌÀÌÌÌìÌÀÀî̬ÀÌ̬ÀÀÀ¬ÀÀÀ¬ÀÀ¬ÌÌ̬ªªª¬ª¬ª¬ªÊ̬ªªªŒˆˆˆÌÀÌÎÌÌÎ̬̪ªÀ쬪ÀÀÀÌîÀìîÌÌîî¬ÌÌ̬ªªª¬ª¬ª¬ªÊ̬ªªªŒˆˆˆÌÀÌÎÌÌÎ̬̪ªÀ쬪ÀÀÀÌîÀìîÌÌîî =000000000000000000000000000000‘?""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""ÂÌ"ÂÌ"Ì",ÌÌ,ÌÌ""""ÂÌ,ÌÂ,ÂÌ"ÂÌ,ÌÌ,"""ÂÌ,ÂÌ"Ì",ÌÌ,ÌÌ""""Â,"Â""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""Ì",Ì",Ì",Ì""Ì",""""Ì"ÌÌ,Ì",Ì""Ì"""""Ì,"Ì",Ì",Ì""Ì","""Â,"","""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""Ì""Ì",Ì",ÌÌ"Ì",""""Ì"ÌÌ,Ì",ÌÂ,ÌÌ""""ÂÌ"Ì",Ì",ÌÌ"Ì",""""""","""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""Ì",Ì",ÂÌ"Ì""ÌÌ"""""Ì",,,ÌÌ,Ì",Ì""""""Ì,ÌÌ,ÂÌ"Ì""Ì","""Â,"","""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""ÂÌ"ÂÌ"","ÌÌ,Ì","""ÂÌ,,",Ì",ÂÌ,ÌÌ,"""ÌÌ"Ì",","ÌÌ,ÌÌ""""Â,"Â"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" À À ÀÀ À ÀÀ ÀÀÀÀÀÌÌÌÀÌ ÀÀÀÌÌÌÀÌÌ ÀÀÀ ÌÌÌ ÀÌ ÀÌ ÀÀÌÌ ÀÀ Ì ÀÌÀÀ ÀÀÌÀÀÀÌÀÌÀÀÀÌ À À À À Ì ÀÀÀÀ À ÌÀÀ ÀÀÀ ÀÀÀ À À À À À À ÀÌÀÀÀÀÀÀ ÀÀÀÀÀÀ À ÀÀ À ÀÀ ÀÀ ÀÀÀÀ ÀÀÀ À ÀÀÀ À ÀÀÀÀ À ÌÀ À ÀÀ ÀÀÀÀ ÀÀ ÀÀ Ì À ÀÀl`fÀÆlffÀflffÌÆlffÀ`f`fÀÌÀÀÀÀ ÀÀÀÀ ÀÀÀ À À ÀÀÀ ÀÀÀÀÌ À À ÀÀ ÀÀÀÀ À ÀÀ À ÀÀÀ ÀÀ ÀÀÀ ÀÀ ÀÀ À À Ì À À ÀÀÀÀÀÀ À ÀÀ ÀÀÀÀ ÀÀ À ÀÌ ÀÀÀ ÀÀ ÀÀ ÀÀ ÀÌÀÀÀÀ À ÀÀ ÀÀÀÌ Ì ÌÀ Ì À Ì À À Ì ÀÌÀÌ Ì ÀÀÌ À ÌÀÌÌ À ÌÌÌÀÀÌÌ ÌÌÌÀÌ ÀÀÀÀÀÀÀÀÀÀ À À À ÀÀ ÀÀÀÀÀÀÀ À à-- title: Trisectrix of Maclaurin -- author: commensalism -- desc: folium got me acting a tad silly -- license: MIT License -- version: 0.1 -- script: lua local function line_inter(x1, y1, x2, y2, x3, y3, x4, y4) local ix = ((x1 * y2 - y1 * x2) * (x3 - x4) - (x1 - x2) * (x3 * y4 - y3 * x4))/((x1 - x2) * (y3 - y4) - (y1 - y2) * (x3 - x4)) local iy = ((x1 * y2 - y1 * x2) * (y3 - y4) - (y1 - y2) * (x3 * y4 - y3 * x4))/((x1 - x2) * (y3 - y4) - (y1 - y2) * (x3 - x4)) return ix, iy end local t = 0 local pxs = {} local dist = 80 function TIC() if btn(2) then dist = dist - 1 end if btn(3) then dist = dist + 1 end if btn(4) then pxs = {} end if btn(5) then t = 0 end cls(0) local x1, y1, x2, y2 = math.cos(t)*250+120-dist/2, math.sin(t)*250+68, -math.cos(t)*250+120-dist/2, -math.sin(t)*250+68 local x3, y3, x4, y4 = math.cos(t*3)*250+120+dist/2, math.sin(t*3)*250+68, -math.cos(t*3)*250+120+dist/2, -math.sin(t*3)*250+68 line(x1, y1, x2, y2, 12) line(x3, y3, x4, y4, 12) circ(120 - dist/2, 68, 2, 6) circ(120 + dist/2, 68, 2, 6) local ix, iy = line_inter(x1, y1, x2, y2, x3, y3, x4, y4) table.insert(pxs, {ix, iy}) for _, i in ipairs(pxs) do pix(i[1], i[2], 12) end circ(ix, iy, 1, 2) t = t + math.pi / 180 / 2.5 end