home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The World of Computer Software
/
World_Of_Computer_Software-02-385-Vol-1of3.iso
/
u
/
uc31.zip
/
LINES.SCR
< prev
next >
Wrap
Text File
|
1992-12-28
|
199b
|
13 lines
; lines.scr
;GdiSetWindow(WinGetDesktop())
i=0
GdiCreatePen(1,1,255,0,0)
while (i<640)
GdiMoveTo(0,0)
GdiLineTo(i,480)
GdiMoveTo(640,480)
GdiLineTo(i,0)
i = i+4
endwhile
exit