12 lines
215 B
Text
12 lines
215 B
Text
window 1, @"Pinstripe/Display", (0,0,800,484), NSWindowStyleMaskTitled
|
|
|
|
double x, y = 0, w
|
|
for w = 1 to 4
|
|
pen w
|
|
for x = w * 1.5 to 800 step w * 2
|
|
line x, y to x, y + 121
|
|
next
|
|
y += 121
|
|
next
|
|
|
|
HandleEvents
|