Page 140 - Learn to Program - Basic-256
P. 140
Chapter 9: Custom Graphics – Creating Your Own Shapes. Page 124
10 stamp graphwidth/2, graphheight/2, 2, r, {0, 0, 5,
20, 0, 25, -5, 20}
11 next r
12
13 color rgb(128,128,255)
14 for r = 0 to 2*pi step pi/5
15 stamp graphwidth/2, graphheight/2, 1, r, {0, 0, 5,
20, 0, 25, -5, 20}
16 next r
17
18 message = "A flower for you."
19
20 color darkyellow
21 font "Tahoma", 14, 50
22 text 10, 10, message
23 say message
Program 57: Big Program - A Flower For You
Sample Output 57: Big Program - A Flower For You
© 2019 James M. Reneau (CC BY-NC-SA 3.0 US)
