Sorry your browser is not supported!

set display mode 800,600,16
load image "b1.png", 1
paste image 1, 0, 0
load image "sqa.bmp", 2
set text size 30
sync
SET TEXT FONT "Arial",0
ink rgb(255,255,255),0

Start:
Center Text 380,150,"Welcome to Blue Sqauae"

set cursor 210,250;
set text size 25
sync
Center Text 380,350, "spacebar to continue"

wait 500
suspend for key
paste image 1, 0, 0

set cursor 10,10
  print "Score:";score;" "

score = 100

rem Varible
Square = 10


paste image 2, 380, 150
do

if mouseclick()=1

inc square

endif
loop

EntX = RND(SCREEN WIDTH() - EntWitdth)
EntY = RND(SCREEN HEIGHT() - EntHeight)

` Outside loop, set initial timer
tmr = TIMER()

DO
   `Game etc. etc.
   IF TIMER() - tmr > 5000   `5000 = 5 seconds
      `Trigger event
      `Do whatever
      tmr = TIMER()
   ENDIF
LOOP

imgXsize = IMAGE WIDTH(image_number)
imgYsize = IMAGE HEIGHT(image_number)

mx = MOUSEX()
my = MOUSEY()
IF mx > Image_Location_X - 1 AND mx < Image_Location_X + imgXsize + 1
`^Check if mouse is within image columns
   IF my > Image_Location_Y - 1 AND my < Image_Location_Y + imgYsize + 1
   `^Check if mouse is within row
       `Do something
   ENDIF
ENDIF
`Image_Location_[X/Y] refer to the position you pasted the image at.
`When you paste an image you paste it by the top-left hand side
`and that's why we add the image's dimensions to get the bottom-right
`corner.
`Also, we subtract 1 from the left and add 1 to the right because we're
`using < and > so without that we'd clip the image collision area by
`a pixel.