!Program obtained by Elisabeth M Vance Trup from support@truebasic 9 Feb 2002

LET x=.5

LET y=.5

!center the image

CALL Read_image("JPEG",image$,"test.jpg")

!where test.jpg is the name of the jpg file

! image$ is a string of data

!to display the image in test.jpg:

BOX SHOW image$ at x,y

!shows the jpg image

END