Steam Community :: Left the game (Disconnected)

Left the game (Disconnected)

apan bakom ratten

Sweden

"Man pissar med den kuk man har" - Bert Karlsson, 1983
https://www.youtube.com/watch?v=AizStjbSg0w

View more info

"Man pissar med den kuk man har" - Bert Karlsson, 1983
https://www.youtube.com/watch?v=AizStjbSg0w

View more info

Currently Offline

Sven Co-op

50,190 Members

Adrenaline Gamer

2,351 Members

Space-Zone Game Portal

61 Members

Friends 42

RustyTea
Offline

mezy
Offline

Project Void
Offline

ShiningHappySmiling
Offline

Cheech
Offline

Ben
Offline

Idk what to put here

w=tonumber(({...})[1] or 200);h=2*w;for x=1,w do;for y=1,h do;b=(x/w-0.5)*2.5;a=(y/h-0.8)*2.5;ca,cb=a,b;i=0;for n=0,99 do;aa=a*a-b*b;bb=2*a*b;a=aa+ca;b=bb+cb;if math.abs(a+b)>16 then;break;end;i=n;end;s=({" ","░","▒","▓","█"})[5-i%5];io.write(s);end;print();end;

module Main where
w = 200
l' n a b ca cb | n >= 99 = 99 | True = if abs (a'+b') > 16 then n else l' (n+1) a' b' ca cb where
{--}a' = (a*a-b*b)+ca
{--}b' = (2*a*b)+cb
l n a b = l' n a b a b
r x y ac | y == 0 = ac | True = r x (y-1) ((" ░▒▓█" !! (4 - l 0 ((y/(2*w)-0.8)*2.5) ((x/w-0.5)*2.5) `mod` 5)):ac)
c x ac | x == 0 = ac | True = c (x-1) (ac ++ r x (w*2) "\n")
m = c w ""
main :: IO ()
main = putStr m

Recent Activity

79.7 hours past 2 weeks