1.txt

来自「简单绘图语言」· 文本 代码 · 共 22 行

//rot is 0;
origin is(380,240);
for T from 0 to 300 step 1 draw(t,0);
for t from 0 to 300 step 1 draw(0,-t);
for t from 0 to 300 step 1 draw(t,-t);
--scale is (2,0.1);
//for t from 0 to 300 step 1 draw(t,-(t*t));
--scale is (10,5);
//for t from 0 to 300 step 1 draw(t,-sqrt(t));
--scale is (20,0.1);
//for t from 0 to 300 step 1 draw(t,-exp(t));
scale is (80,80/3);
rot is pi/2+0*pi/3;
for t from -pi to pi step pi/50 draw(cos(t),sin(t));
rot is pi/2+2*pi/3;
for t from -pi to pi step pi/50 draw(cos(t),sin(t));
rot is pi/2-2*pi/3;
for t from -pi to pi step pi/50 draw(cos(t),sin(t));