Displays a simple popup using a box and text centered in the middle of the box.

                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    `Created By David Kramer
`FireIndy

Remstart
Example use: 
PopupMessage(200, 40, 45, 400, "HI THis Is really cool!", rgb(255,255,255),rgb(0,0,0))
Remend
Function PopupMessage(x as integer, y as integer, height as integer, width as integer, message as string, colorBox as DWORD, colorText as DWORD)

box x,y,x+width,y+height,colorBox
ink colorText,colorText
text x + (width/2) - (text width(message)/2), y + (height/2) - (text height(message)/2), message

EndFunction