home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Programming Tool Box
/
SIMS_2.iso
/
libbasic
/
pie.bas
< prev
next >
Wrap
BASIC Source File
|
1992-08-28
|
378b
|
18 lines
nomainwin
open "pie" for graphics as #1
print #1, "home ; down"
print #1, "backcolor red"
print #1, "piefilled 100 100 315 -315"
print #1, "north ; turn 67 ; up ; go 20 ; down"
print #1, "backcolor yellow"
print #1, "pieFilled 100 100 315 45"
print #1, "flush"
input r$
close #1