CoMmAnD-格子花紋

有圖有真相

_____________________________________________________________________________________

城市馬

size 184 400
paper 50 10 45
fast
command square x y s c
{
pen ((s*x)+10) (x/2) c
line x y x c
line x (y+(50*s)) x (c+(50*s))
}

repeat a 0 400
{
pen 100
line 0 a 10 a
line 13 a 33 a
line 36 a 56 a
line 59 a 79 a
line 82 a 102 a
line 105 a 125 a
line 128 a 148 a
line 151 a 171 a
line 174 a 194 a
}

repeat g 105 125
{
repeat e 59 79
{
repeat z 1 7
{
square g 5 z 30
square e 5 z 30
}
}
}

repeat d 36 56
{
repeat h 128 148
{
repeat z 1 7
{
square d 10 z 35
square h 10 z 35
}
}
}

repeat c 13 33
{
repeat i 151 171
{
repeat z 1 7
{
square c 15 z 40
square i 15 z 40
}
}
}

repeat j 174 184
{
repeat b 0 10
{
repeat z 1 7
{
square j 20 z 45
square b 20 z 45
}
}
}

repeat f 82 102
{
repeat z 1 7
{
square f 2 z 27
}
}
____________________________________________________________________________________