Page 1 of 1

xz_0.01

Posted: Sat Jan 10, 2009 2:55 pm
by goglus
можно не спрашивать что это, просто градиентами баловался

Code: Select all

//goglus xz_0.01

tv="
......77877
12345677877654321
......77877
"
tvo="
1357531
"
tttv="
1
2
3
4
5
6
7
8
7
6
5
4
3
2
1
"
tolk="
22222222222
22222222222
16161616161
+
16161616161
22222222222
22222222222
"
make_pixi(tolk)
make_pixi(tttv)
make_pixi(tvo)
make_pixi(tv)
x=-19
x1=-19
y=-200
w=1
w1=2
clear(SNEG)
ss:
pixi(tvo,-90,x1,1,1)
pixi(tttv,y,40,1,1)
pixi(tvo,90,x1,1,1)
pixi(tv,-40,-91+x,1,2)
pixi(tv,40,-91+x,1,2)
pixi(tv,0,91+x,4,2)
pixi(tv,0,-91+x,4,2)
pixi(tv,0,71+x,7,2)
pixi(tv,0,-71+x,7,2)
pixi(tv,0,x1,10,2)
pixi(tolk,0,-51,4,2)

y=y+w
x=x+w
x1=x1+w1
if x=5{w=0}
if x1=55 {w1=0}
frame(100)
go ss