Thank you. Just out of interest, can you give me an idea how long it takes to convert a 1024x512 picture on Q40 or Q60 (whichever you use)? -- Dilwyn Jones
----- Original Message ----- From: "Duncan Neithercut" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Wednesday, January 04, 2006 9:18 PM Subject: Re: [ql-users] screenshoots > Hi Dilwyn > > Below is my adaption of the Qx0 part of your pic to bmp converter. > It seems to work as I have used it on occasion & its what I sent to > Michael Grunditz. > > 1900 DEFine PROCedure Q40colours > 1905 FOR X = 0 TO pw%-1 > 1910 blue = (PEEK(qlad+1)&&62) DIV 2 > 1920 red = (4*(PEEK(qlad)&&7))||((PEEK(qlad+1)&&192) DIV 64) > 1930 green = ((PEEK(qlad)&&248) DIV 8) > 1940 intensity = (PEEK(qlad+1)&&1) : REMark 0 or 1 > 1950 POKE pcad,(8*(blue))+intensity*7 > 1960 POKE pcad+1,(8*(green))+intensity*7 > 1970 POKE pcad+2,(8*(red))+intensity*7 > 1972 qlad = qlad + 2 > 1975 pcad = pcad +3 > 1978 END FOR X > 1980 END DEFine Q40colours > > Duncan Neithercut -- No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.1.371 / Virus Database: 267.14.12/220 - Release Date: 03/01/2006 _______________________________________________ QL-Users Mailing List http://www.q-v-d.demon.co.uk/smsqe.htm