作業五 : Time-1234,forever,refresh 的應用 - 請進

請往箭頭霓虹燈方向，請進

size 300 300
paper 100

repeat a 0 10
{
repeat b 0 300
{
pen (b/2) (a*10)
line 300 300 b 0

pen (b/5) (a+50)
line 300 0 b 300
}
}

期中：數位康丁斯基

size 350 300
paper 70 150 100
load dbngraphics.dbn
fast

Repeat A 20 85
{
pen 80 20 0
line A 100 85 25
}

Repeat A 85 150
{
pen 80 20 0
line A 100 85 25
}

Repeat A 175 90
{
pen 60 0 0
line A 110 90 275
}

Repeat A 30 45
{
pen 100
line A 130 45 100
}

Repeat A 45 60
{
pen 100
line A 130 45 100
}

Repeat A 75 89
{
pen 80 0 0
line A 120 89 110
}

Repeat A 65 89
{
pen 80 150 30
line A 135 89 120
}

Repeat A 142 148
{
pen 0
line 20 A 89 A
}

Repeat A 89 40
{
pen 0 50 0
line A 160 89 185
}

Repeat A 40 89
{
pen 50 0 0
line A 185 40 160
}

Repeat A 89 40
{
pen 0 50 0
line A 160 89 185
}

Repeat A 20 85
{
pen 80 20 0
line A 100 85 25
}

Repeat A 60 55
{
Circle 265 165 A 100
}

Repeat A 55 20
{
Circle 265 165 A 0
}

Repeat A 20 1
{
Circle 265 165 A 100
}

Repeat A 220 265
{
pen 30 0 0
line A 250 265 165
}

Repeat A 265 310
{
pen 30 0 0
line A 250 265 165
}

Repeat A 265 290
{
pen 40 0 0
line A 20 265 165
}

Repeat A 240 265
{
pen 40 0 0
line A 20 265 165
}

Repeat A 130 140
{
pen 80 0 0
line A 220 140 210
}

Repeat A 140 150
{
pen 80 0 0
line A 220 140 210
}

Repeat A 130 140
{
pen 80 0 0
line A 220 140 230
}

Repeat A 140 150
{
pen 80 0 0
line A 220 140 230
}

Repeat A 180 200
{
pen 100
line A 110 200 150
}

Repeat A 200 220
{
pen 100
line A 110 200 150
}

Repeat A 185 200
{
pen 100
line A 75 200 110
}

Repeat A 200 215
{
pen 100
line A 75 200 110
}

Repeat A 190 200
{
pen 100
line A 30 200 75
}

Repeat A 200 210
{
pen 100
line A 30 200 75
}

Repeat A 280 270
{
pen 100 150 30
line 275 A 325 A
}