Image.bbc 1.02 04-Jun-2005 1 Access various information from image files ) v1.02 Only does JPEGs at the moment (: $2img_Info(A$): header%,length% H<img_width%=-1:img_height%=-1:img_depth%=-1:img_size%=-1:img_type$="" Fin%=(A$):in%=0: $Pimg_size%=#in%:img_type$=A$,4) Z lc(img_type$) d ".jpg",".jpeg": nA%=#in%+#in% x header%=256*#in%+#in% length%=256*#in%+#in% , header%<>&FFC0 #in%=#in%+length%-2 header%=&FFC0 #in% #in% A%=#in% img_depth%=24 img_height%=256*#in%+#in% img_width% =256*#in%+#in%  img_type$="JPEG" ".bmp": img_type$=""  img_type$=""  "#in%:in%=0 , 6: