Microsoft Small Basic

Program Listing: BWX579

List Program

'Hint: you will need to use the ProgramWindow & ShapeMaker objects.
'PrepareColorPalette (recipe below) --#10

'Set the CreateBubble recipe (below) to be called when the mouse is clicked --#3


'------------- Recipe for PrepareColorPalette --#9

' Add alice blue to the color wheel --#5

' Add blue to the color wheel --#6

' Add dark blue to the color wheel --#7

' Add purple to the color wheel --#8

'------------- End of PrepareColorPalette recipe --#9


'------------- Recipe for CreateBubble --#2

' Remove the current bubble --#11

' Change the color for the next circle to the next color from the color wheel --#4

' Set the radius for the circle to a random number between 10 and 50 --#1.2

' Create the bubble --#1.1

' Move the center of the bubble to the current position of the mouse on the window --#1.0 (Fake at 20,20) &#

'------------- End of CreateBubble recipe --#2