Re: [ql-users] mode 16 to mode 32
On Tue, 15 Jul 2003 23:27:17 +0200, Marcel Kilgus wrote: Phoebus Dokos wrote: Haha, I haven't sold one yet ;-) However I assumed it's the price you told me :-) (USA show) Probably surrounded by lots of words like "probably", "perhaps", "we're considering xyz"? ;-) We're currently in the process of fixing the details. Marcel Ah well no harm done anyway :-) Nonetheless, it's working great.. never let me down since the show It has been on for 20 days now (thank God for fans) and thanks to that little program on Tony's site (the module creator), with superHermes extensions built in... ;-) Moreover it works great with Conqueror SE :-) Redefinition of colours is a blast... like having an IBM PC/XT with EGA :-) Phoebus -- Phoebus Dokos - Undergrad in MIS Eberly College of Business - Indiana U. of PA
Re: [ql-users] mode 16 to mode 32
Phoebus Dokos wrote: > Haha, I haven't sold one yet ;-) However I assumed it's the price > you told me :-) (USA show) Probably surrounded by lots of words like "probably", "perhaps", "we're considering xyz"? ;-) We're currently in the process of fixing the details. Marcel
Re: [ql-users] (Announce) SuperBasic syntax highlighter for free...
On Tue, 15 Jul 2003 21:21:09 +0100, Lau <[EMAIL PROTECTED]> wrote: Jimmy MONTESINOS wrote: Hi all, For who want to edit or print highlighted and colorized SuperBasic source code, Phoebus and I have released Superbasic language extensions for SourceEdit. Funny thing is... I released a similar thing back in March for TextPad (which I quite like - even if I had to pay for it!). It's up on their site (and mine). It isn't very clever and just does the ROM keywords (I only spent a hour or so on it). I wonder if it would be a lot of effort to combine them? (Or really, I gues I'm wondering if you could adapt you one to replace my TextPad one. (I hate changing editors). Send it over and I will give it a shot :-) -Or at least give me your url again :-) (And TextPad's won't be bad either) I haven't tried SourceEdit - free is nice, but I'd like to find a good source file editor for Linux (I know there are millions of them, but I tend to just stick with vi(m)). I liked KEdit... I think btw, that SourceEdit's code is available... just in case :-) Phoebus -- Phoebus Dokos - Undergrad in MIS Eberly College of Business - Indiana U. of PA
Re: [ql-users] mode 16 to mode 32
On Tue, 15 Jul 2003 22:24:16 +0200, Marcel Kilgus wrote: Phoebus Dokos wrote: Aurora drivers ARE out. I've been using them for quite awhile and I have them available for sale as well (with SMSQ/E v.3.00). Huh, they are NOT yet official on sale! How can you sell them if you don't even know what my fee is? Marcel Haha, I haven't sold one yet ;-) However I assumed it's the price you told me :-) (USA show) Never be on a rush when you're quoting prices ;-) Gotcha! Phoebus :-P -- Phoebus Dokos - Undergrad in MIS Eberly College of Business - Indiana U. of PA
Re: [ql-users] mode 16 to mode 32
- Original Message -
From: Marcel Kilgus <[EMAIL PROTECTED]>
To: ql-users <[EMAIL PROTECTED]>
Sent: Tuesday, July 15, 2003 8:44 PM
Subject: Re: [ql-users] mode 16 to mode 32
>
> Dilwyn Jones wrote:
> > Any suggestions on improving this welcome.
>
> A table (array) would be much faster and probably more accurate.
> The values are these (bytes must be swapped, SMSQ needs $ at
beginning
> instead of h at the end).
>
Here is the Marcel Method version of the program.
First time I noticed that string coercion doesn't extend to the $
operator:
You can't do LET table$(a)='$':LET value=table$(a)
So I didn't include the $ symbol in the lookup table in the DATA
statements as Marcel suggested.
I used HEX keyword instead.
Would probably be much faster with the data held in a 256 element
integer array instead so as not to have to do so many HEX('abcd')
conversions. ANyway, heres the listing for you to tinker with.
100 REMark convert mode 16 picture to mode 32
110 REMark modified to use the Marcel Method (look-up table)
120 :
130 CLS : CLS #0
140 DIM table$(255,6)
150 RESTORE
160 FOR a = 0 TO 255 : READ table$(a)
170 :
180 INPUT #0,'Filename of MODE 16 screen > ';ip$
190 INPUT #0,'Filename of MODE 32 conversion > ';op$
200 fl = FLEN(\ip$)
210 IF fl <= 0 THEN STOP
220 base = ALCHP(3*fl) : REMark Mode 32 equivalent is twice as long
230 LBYTES ip$,base
240 :
250 addr32 = base+fl
260 FOR a = base TO base+fl-1
270 byte = PEEK(a) : REMark pixel from mode 16 screen
280 POKE_W addr32,HEX(table$(byte))
290 addr32 = addr32+2
300 END FOR a
310 :
320 SBYTES op$,base+fl,2*fl
330 :
340 RECHP base : REMark release heap area used
350 PRINT #0,'Program finished'
360 STOP
370 :
380 DATA
'','0020','2001','2021','0900','0D00','2901','2D01','0048','0068',
'2049','2069','0948','0D68','2949','2D69'
390 DATA
'4002','4022','6003','6023','4902','4D02','6903','6D03','404A','406A',
'604B','606B','494A','4D6A','694B','6D6B'
400 DATA
'1200','1600','3201','3601','1B00','1F00','3B01','3F01','1248','1668',
'3249','3669','1B48','1F68','3B49','3F69'
410 DATA
'5202','5602','7203','7603','5B02','5F02','7B03','7F03','524A','566A',
'724B','766B','5B4A','5F6A','7B4B','7F6B'
420 DATA
'0090','00B0','2091','20B1','0990','0DB0','2991','2DB1','00D8','00F8',
'20D9','20F9','09D8','0DF8','29D9','2DF9'
430 DATA
'4092','40B2','6093','60B3','4992','4DB2','6993','6DB3','40DA','40FA',
'60DB','60FB','49DA','4DFA','69DB','6DFB'
440 DATA
'1290','16B0','3291','36B1','1B90','1FB0','3B91','3FB1','12D8','16F8',
'32D9','36F9','1BD8','1FF8','3BD9','3FF9'
450 DATA
'5292','56B2','7293','76B3','5B92','5FB2','7B93','7FB3','52DA','56FA',
'72DB','76FB','5BDA','5FFA','7BDB','7FFB'
460 DATA
'8004','8024','A005','A025','8904','8D04','A905','AD05','804C','806C',
'A04D','A06D','894C','8D6C','A94D','AD6D'
470 DATA
'C006','C026','E007','E027','C906','CD06','E907','ED07','C04E','C06E',
'E04F','E06F','C94E','CD6E','E94F','ED6F'
480 DATA
'9204','9604','B205','B605','9B04','9F04','BB05','BF05','924C','966C',
'B24D','B66D','9B4C','9F6C','BB4D','BF6D'
490 DATA
'D206','D606','F207','F607','DB06','DF06','FB07','FF07','D24E','D66E',
'F24F','F66F','DB4E','DF6E','FB4F','FF6F'
500 DATA
'8094','80B4','A095','A0B5','8994','8DB4','A995','ADB5','80DC','80FC',
'A0DD','A0FD','89DC','8DFC','A9DD','ADFD'
510 DATA
'C096','C0B6','E097','E0B7','C996','CDB6','E997','EDB7','C0DE','C0FE',
'E0DF','E0FF','C9DE','CDFE','E9DF','EDFF'
520 DATA
'9294','96B4','B295','B6B5','9B94','9FB4','BB95','BFB5','92DC','96FC',
'B2DD','B6FD','9BDC','9FFC','BBDD','BFFD'
530 DATA
'D296','D6B6','F297','F6B7','DB96','DFB6','FB97','FFB7','D2DE','D6FE',
'F2DF','F6FF','DBDE','DFFE','FBDF',''
RE : [ql-users] (Announce) SuperBasic syntax highlighter for free...
Hi Lau, With SourceEdit you can export Keywords easily in text format in order To reimport it. I will not using Textpad more as it is not more freeware... I haven't enough money ;-) Jimmy. -Message d'origine- De : [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] De la part de Lau Envoyé : mardi 15 juillet 2003 22:21 À : [EMAIL PROTECTED] Objet : Re: [ql-users] (Announce) SuperBasic syntax highlighter for free... Jimmy MONTESINOS wrote: > Hi all, > > For who want to edit or print highlighted and colorized SuperBasic > source code, Phoebus and I have released Superbasic language > extensions for SourceEdit. > Funny thing is... I released a similar thing back in March for TextPad (which I quite like - even if I had to pay for it!). It's up on their site (and mine). It isn't very clever and just does the ROM keywords (I only spent a hour or so on it). I wonder if it would be a lot of effort to combine them? (Or really, I gues I'm wondering if you could adapt you one to replace my TextPad one. (I hate changing editors). I haven't tried SourceEdit - free is nice, but I'd like to find a good source file editor for Linux (I know there are millions of them, but I tend to just stick with vi(m)). -- Lau http://www.bergbland.info Get a domain from http://oneandone.co.uk/xml/init?k_id=5165217 and I'll get the commission!
Re: [ql-users] mode 16 to mode 32
Phoebus Dokos wrote: > Aurora drivers ARE out. I've been using them for quite awhile and I > have them available for sale as well (with SMSQ/E v.3.00). Huh, they are NOT yet official on sale! How can you sell them if you don't even know what my fee is? Marcel
Re: [ql-users] (Announce) SuperBasic syntax highlighter for free...
Jimmy MONTESINOS wrote: Hi all, For who want to edit or print highlighted and colorized SuperBasic source code, Phoebus and I have released Superbasic language extensions for SourceEdit. Funny thing is... I released a similar thing back in March for TextPad (which I quite like - even if I had to pay for it!). It's up on their site (and mine). It isn't very clever and just does the ROM keywords (I only spent a hour or so on it). I wonder if it would be a lot of effort to combine them? (Or really, I gues I'm wondering if you could adapt you one to replace my TextPad one. (I hate changing editors). I haven't tried SourceEdit - free is nice, but I'd like to find a good source file editor for Linux (I know there are millions of them, but I tend to just stick with vi(m)). -- Lau http://www.bergbland.info Get a domain from http://oneandone.co.uk/xml/init?k_id=5165217 and I'll get the commission!
Re: [ql-users] mode 16 to mode 32
thanks, this might well come in useful. Dilwyn - Original Message - From: Marcel Kilgus <[EMAIL PROTECTED]> To: ql-users <[EMAIL PROTECTED]> Sent: Tuesday, July 15, 2003 8:44 PM Subject: Re: [ql-users] mode 16 to mode 32 > > Dilwyn Jones wrote: > > Any suggestions on improving this welcome. > > A table (array) would be much faster and probably more accurate. > The values are these (bytes must be swapped, SMSQ needs $ at beginning > instead of h at the end). > > 0h, 02000h, 00120h, 02120h, 9h, Dh, 00129h, 0012Dh, 04800h, 06800h, 04920h, 06920h, 04809h, 0680Dh, 04929h, 0692Dh > 00240h, 02240h, 00360h, 02360h, 00249h, 0024Dh, 00369h, 0036Dh, 04A40h, 06A40h, 04B60h, 06B60h, 04A49h, 06A4Dh, 04B69h, 06B6Dh > 00012h, 00016h, 00132h, 00136h, 0001Bh, 0001Fh, 0013Bh, 0013Fh, 04812h, 06816h, 04932h, 06936h, 0481Bh, 0681Fh, 0493Bh, 0693Fh > 00252h, 00256h, 00372h, 00376h, 0025Bh, 0025Fh, 0037Bh, 0037Fh, 04A52h, 06A56h, 04B72h, 06B76h, 04A5Bh, 06A5Fh, 04B7Bh, 06B7Fh > 09000h, 0B000h, 09120h, 0B120h, 09009h, 0B00Dh, 09129h, 0B12Dh, 0D800h, 0F800h, 0D920h, 0F920h, 0D809h, 0F80Dh, 0D929h, 0F92Dh > 09240h, 0B240h, 09360h, 0B360h, 09249h, 0B24Dh, 09369h, 0B36Dh, 0DA40h, 0FA40h, 0DB60h, 0FB60h, 0DA49h, 0FA4Dh, 0DB69h, 0FB6Dh > 09012h, 0B016h, 09132h, 0B136h, 0901Bh, 0B01Fh, 0913Bh, 0B13Fh, 0D812h, 0F816h, 0D932h, 0F936h, 0D81Bh, 0F81Fh, 0D93Bh, 0F93Fh > 09252h, 0B256h, 09372h, 0B376h, 0925Bh, 0B25Fh, 0937Bh, 0B37Fh, 0DA52h, 0FA56h, 0DB72h, 0FB76h, 0DA5Bh, 0FA5Fh, 0DB7Bh, 0FB7Fh > 00480h, 02480h, 005A0h, 025A0h, 00489h, 0048Dh, 005A9h, 005ADh, 04C80h, 06C80h, 04DA0h, 06DA0h, 04C89h, 06C8Dh, 04DA9h, 06DADh > 006C0h, 026C0h, 007E0h, 027E0h, 006C9h, 006CDh, 007E9h, 007EDh, 04EC0h, 06EC0h, 04FE0h, 06FE0h, 04EC9h, 06ECDh, 04FE9h, 06FEDh > 00492h, 00496h, 005B2h, 005B6h, 0049Bh, 0049Fh, 005BBh, 005BFh, 04C92h, 06C96h, 04DB2h, 06DB6h, 04C9Bh, 06C9Fh, 04DBBh, 06DBFh > 006D2h, 006D6h, 007F2h, 007F6h, 006DBh, 006DFh, 007FBh, 007FFh, 04ED2h, 06ED6h, 04FF2h, 06FF6h, 04EDBh, 06EDFh, 04FFBh, 06FFFh > 09480h, 0B480h, 095A0h, 0B5A0h, 09489h, 0B48Dh, 095A9h, 0B5ADh, 0DC80h, 0FC80h, 0DDA0h, 0FDA0h, 0DC89h, 0FC8Dh, 0DDA9h, 0FDADh > 096C0h, 0B6C0h, 097E0h, 0B7E0h, 096C9h, 0B6CDh, 097E9h, 0B7EDh, 0DEC0h, 0FEC0h, 0DFE0h, 0FFE0h, 0DEC9h, 0FECDh, 0DFE9h, 0FFEDh > 09492h, 0B496h, 095B2h, 0B5B6h, 0949Bh, 0B49Fh, 095BBh, 0B5BFh, 0DC92h, 0FC96h, 0DDB2h, 0FDB6h, 0DC9Bh, 0FC9Fh, 0DDBBh, 0FDBFh > 096D2h, 0B6D6h, 097F2h, 0B7F6h, 096DBh, 0B6DFh, 097FBh, 0B7FFh, 0DED2h, 0FED6h, 0DFF2h, 0FFF6h, 0DEDBh, 0FEDFh, 0DFFBh, 0h > > > Oh, and I hope Marcel is happy someone's actually using the 256 > > colour mode. If I'm right, this should work on Aurora 256 colour > > screens as well since if I'm right Marcel wrote the QPC2 256 colour > > driver to be compatible with Aurora 256 colour modes > > I implemented the 256 colour mode into QPC in order to develop the > Aurora driver. And as the code was there in the end anyway I just left > it in, so to say ;-) > > > (once Aurora colour drivers are out that is!) > > We're working on it (and no, the code is finished). > > Marcel > >
Re: [ql-users] OnT (Finally)
That will be excellent. I don't actually have soql though (was waiting for it to be finished!). I have tried to put a few code hooks in Launchpad which might prove useful when it comes to adding some email etc functionality - like it can be integrated into one of the menus for rapid launching. Hope you ain't been too clever and put pictures, html etc into it. I rarely use anything but plain text for my emails, and if I'm emailing from the QL side all i'll need is plain text and the facility to attach zipped files. -- Dilwyn Jones - Original Message - From: Phoebus Dokos <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Tuesday, July 15, 2003 5:42 PM Subject: Re: [ql-users] OnT (Finally) > > On Tue, 15 Jul 2003 16:52:50 +0100, Dilwyn Jones <[EMAIL PROTECTED]> > wrote: > > > And have just remembered that after talking about missiles etc, I'm > > the one writing the program called LAUNCHPAD :-) > > > > Just remember, when SOQL comes out I'll put a feature in Launchpad > > that I can dial you up and destroy your QL files, OK??? > > Just around the corner... preliminary tests with my mailer work just > fine... and soQL as it stands provides a very stable platform anyway... > > Phoebus > > P.S. I will send it over your way so you can try it as it stands and then > the mailer so you may even incorporate its functionality in Launchpad (now > how about that huh?) > > > > -- > Phoebus Dokos - Undergrad in MIS > Eberly College of Business - Indiana U. of PA > >
Re: [ql-users] OnT (Finally)
> Quoting Phoebus Dokos <[EMAIL PROTECTED]>: > > > P.S. I will send it over your way so you can try it as it stands and then > > the mailer so you may even incorporate its functionality in Launchpad (now > > how about that huh?) > > Will you be releasing this as freeware or shareware, or as a commercial product? > > Mark Commercial (price undecided yet) and a demo version: useable, but limited by the number of program icons which can be set up. -- Dilwyn Jones
Re: [ql-users] OT
> Dilwyn, remember what you accused me of the other day about naughty bits of > code in my programs to spy on Ql-ers. May I advise you to double check the > bits of code I sent you for use in Launchpad? You never know what my > Whitehall masters have secretly slipped into it! > > BTW, just because you are paranoid, it doesn't mean that they aren't out to > get you. > > Geoff I knew something odd was going on when I tried your code. Dohh, I should have known. And it was you who sabotaged my attempts at a QL virus a few years ago!!! (damned QXL...) -- Dilwyn Jones
Re: [ql-users] mode 16 to mode 32
On Tue, 15 Jul 2003 20:22:16 +0100, Dilwyn Jones <[EMAIL PROTECTED]> wrote: I've been playing a little with Marcel's 256 colour mode 16 on QPC2. Not only does it work, most programs seem to run quite happily in it. Including (I'm pleased to say) my Launchpad and Screen Snatcher programs! My old Graphics Viewer program does not because it guesses the screen sizes from file sizes, and some screens in different modes and resolutions may well end up by coincidence having the same file size. I've been tinkering with some graphics routines as my recent message regarding mode 32 to bmp conversion suggested. One of the routines I came up with which has been useful for me is a mode 16 to mode 32 screen converter. It's rather slow, but the need doesn't really arise that often, so it's OK. Simply enter the filename of a 256 colour (mode 16) file, and the filename to save the converted mode 32 file. I've put REMs in showing the bit layouts, and converted basically by doubling up the bits which is a bit of a dirty method but it seems to work reasonably well. Obviously, as 16-bit graphics need twice the number of bits per pixel, converted screens are twice the size of the original. 100 REMark convert mode 16 picture to mode 32 110 CLS : CLS #0 120 INPUT #0,'Filename of MODE 16 screen > ';ip$ 130 INPUT #0,'Filename of MODE 32 conversion > ';op$ 140 fl = FLEN(\ip$) 150 IF fl <= 0 THEN STOP 160 base = ALCHP(3*fl) : REMark Mode 32 equivalent is twice as long 170 LBYTES ip$,base 180 addr16 = base 190 addr32 = base+fl 200 FOR a = base TO base+fl-1 210 byte = PEEK(a) : REMark pixel from mode 16 screen 220 REMark 128 64 32 16 8 4 2 1 230 REMark g r b g r b g x (x=rb) 240 : 250 REMark byte1 byte 2 260 REMark 128 64 32 16 8 4 2 1 128 64 32 16 8 4 2 1 270 REMark g g g b b b b br r r r r g g g 280 : 290 REMark do the BLUE bits 300 byte1 = 16*((byte&&32)>0)+12*((byte&&4)>0)+3*((byte&&1)>0) 310 REMark do the RED 320 byte2 = 128*((byte&&64)>0)+96*((byte&&8)>0)+24*((byte&&1)>0) 330 REMark do the GREEN bits 340 byte1 = byte1+128*((byte&&16)>0)+96*((byte&&2)>0) 350 byte2 = byte2+6*((byte&&128)>0)+((byte&&16)>0) 360 : 370 POKE addr32,byte1 : POKE addr32+1,byte2 380 addr32 = addr32+2 390 END FOR a 400 SBYTES op$,base+fl,2*fl 410 RECHP base : REMark release heap area used 420 PRINT #0,'Program finished' Any suggestions on improving this welcome. Oh, and I hope Marcel is happy someone's actually using the 256 colour mode. If I'm right, this should work on Aurora 256 colour screens as well since if I'm right Marcel wrote the QPC2 256 colour driver to be compatible with Aurora 256 colour modes (once Aurora colour drivers are out that is!) -- Dilwyn Jones Aurora drivers ARE out. I've been using them for quite awhile and I have them available for sale as well (with SMSQ/E v.3.00). Q-Word btw supports mode 16 :-) (And it's pretty impressive too :-) Phoebus -- Phoebus Dokos - Undergrad in MIS Eberly College of Business - Indiana U. of PA
Re: [ql-users] mode 16 to mode 32
Dilwyn Jones wrote: > Any suggestions on improving this welcome. A table (array) would be much faster and probably more accurate. The values are these (bytes must be swapped, SMSQ needs $ at beginning instead of h at the end). 0h, 02000h, 00120h, 02120h, 9h, Dh, 00129h, 0012Dh, 04800h, 06800h, 04920h, 06920h, 04809h, 0680Dh, 04929h, 0692Dh 00240h, 02240h, 00360h, 02360h, 00249h, 0024Dh, 00369h, 0036Dh, 04A40h, 06A40h, 04B60h, 06B60h, 04A49h, 06A4Dh, 04B69h, 06B6Dh 00012h, 00016h, 00132h, 00136h, 0001Bh, 0001Fh, 0013Bh, 0013Fh, 04812h, 06816h, 04932h, 06936h, 0481Bh, 0681Fh, 0493Bh, 0693Fh 00252h, 00256h, 00372h, 00376h, 0025Bh, 0025Fh, 0037Bh, 0037Fh, 04A52h, 06A56h, 04B72h, 06B76h, 04A5Bh, 06A5Fh, 04B7Bh, 06B7Fh 09000h, 0B000h, 09120h, 0B120h, 09009h, 0B00Dh, 09129h, 0B12Dh, 0D800h, 0F800h, 0D920h, 0F920h, 0D809h, 0F80Dh, 0D929h, 0F92Dh 09240h, 0B240h, 09360h, 0B360h, 09249h, 0B24Dh, 09369h, 0B36Dh, 0DA40h, 0FA40h, 0DB60h, 0FB60h, 0DA49h, 0FA4Dh, 0DB69h, 0FB6Dh 09012h, 0B016h, 09132h, 0B136h, 0901Bh, 0B01Fh, 0913Bh, 0B13Fh, 0D812h, 0F816h, 0D932h, 0F936h, 0D81Bh, 0F81Fh, 0D93Bh, 0F93Fh 09252h, 0B256h, 09372h, 0B376h, 0925Bh, 0B25Fh, 0937Bh, 0B37Fh, 0DA52h, 0FA56h, 0DB72h, 0FB76h, 0DA5Bh, 0FA5Fh, 0DB7Bh, 0FB7Fh 00480h, 02480h, 005A0h, 025A0h, 00489h, 0048Dh, 005A9h, 005ADh, 04C80h, 06C80h, 04DA0h, 06DA0h, 04C89h, 06C8Dh, 04DA9h, 06DADh 006C0h, 026C0h, 007E0h, 027E0h, 006C9h, 006CDh, 007E9h, 007EDh, 04EC0h, 06EC0h, 04FE0h, 06FE0h, 04EC9h, 06ECDh, 04FE9h, 06FEDh 00492h, 00496h, 005B2h, 005B6h, 0049Bh, 0049Fh, 005BBh, 005BFh, 04C92h, 06C96h, 04DB2h, 06DB6h, 04C9Bh, 06C9Fh, 04DBBh, 06DBFh 006D2h, 006D6h, 007F2h, 007F6h, 006DBh, 006DFh, 007FBh, 007FFh, 04ED2h, 06ED6h, 04FF2h, 06FF6h, 04EDBh, 06EDFh, 04FFBh, 06FFFh 09480h, 0B480h, 095A0h, 0B5A0h, 09489h, 0B48Dh, 095A9h, 0B5ADh, 0DC80h, 0FC80h, 0DDA0h, 0FDA0h, 0DC89h, 0FC8Dh, 0DDA9h, 0FDADh 096C0h, 0B6C0h, 097E0h, 0B7E0h, 096C9h, 0B6CDh, 097E9h, 0B7EDh, 0DEC0h, 0FEC0h, 0DFE0h, 0FFE0h, 0DEC9h, 0FECDh, 0DFE9h, 0FFEDh 09492h, 0B496h, 095B2h, 0B5B6h, 0949Bh, 0B49Fh, 095BBh, 0B5BFh, 0DC92h, 0FC96h, 0DDB2h, 0FDB6h, 0DC9Bh, 0FC9Fh, 0DDBBh, 0FDBFh 096D2h, 0B6D6h, 097F2h, 0B7F6h, 096DBh, 0B6DFh, 097FBh, 0B7FFh, 0DED2h, 0FED6h, 0DFF2h, 0FFF6h, 0DEDBh, 0FEDFh, 0DFFBh, 0h > Oh, and I hope Marcel is happy someone's actually using the 256 > colour mode. If I'm right, this should work on Aurora 256 colour > screens as well since if I'm right Marcel wrote the QPC2 256 colour > driver to be compatible with Aurora 256 colour modes I implemented the 256 colour mode into QPC in order to develop the Aurora driver. And as the code was there in the end anyway I just left it in, so to say ;-) > (once Aurora colour drivers are out that is!) We're working on it (and no, the code is finished). Marcel
[ql-users] mode 16 to mode 32
I've been playing a little with Marcel's 256 colour mode 16 on QPC2. Not only does it work, most programs seem to run quite happily in it. Including (I'm pleased to say) my Launchpad and Screen Snatcher programs! My old Graphics Viewer program does not because it guesses the screen sizes from file sizes, and some screens in different modes and resolutions may well end up by coincidence having the same file size. I've been tinkering with some graphics routines as my recent message regarding mode 32 to bmp conversion suggested. One of the routines I came up with which has been useful for me is a mode 16 to mode 32 screen converter. It's rather slow, but the need doesn't really arise that often, so it's OK. Simply enter the filename of a 256 colour (mode 16) file, and the filename to save the converted mode 32 file. I've put REMs in showing the bit layouts, and converted basically by doubling up the bits which is a bit of a dirty method but it seems to work reasonably well. Obviously, as 16-bit graphics need twice the number of bits per pixel, converted screens are twice the size of the original. 100 REMark convert mode 16 picture to mode 32 110 CLS : CLS #0 120 INPUT #0,'Filename of MODE 16 screen > ';ip$ 130 INPUT #0,'Filename of MODE 32 conversion > ';op$ 140 fl = FLEN(\ip$) 150 IF fl <= 0 THEN STOP 160 base = ALCHP(3*fl) : REMark Mode 32 equivalent is twice as long 170 LBYTES ip$,base 180 addr16 = base 190 addr32 = base+fl 200 FOR a = base TO base+fl-1 210 byte = PEEK(a) : REMark pixel from mode 16 screen 220 REMark 128 64 32 16 8 4 2 1 230 REMark g r b g r b g x (x=rb) 240 : 250 REMark byte1 byte 2 260 REMark 128 64 32 16 8 4 2 1 128 64 32 16 8 4 2 1 270 REMark g g g b b b b br r r r r g g g 280 : 290 REMark do the BLUE bits 300 byte1 = 16*((byte&&32)>0)+12*((byte&&4)>0)+3*((byte&&1)>0) 310 REMark do the RED 320 byte2 = 128*((byte&&64)>0)+96*((byte&&8)>0)+24*((byte&&1)>0) 330 REMark do the GREEN bits 340 byte1 = byte1+128*((byte&&16)>0)+96*((byte&&2)>0) 350 byte2 = byte2+6*((byte&&128)>0)+((byte&&16)>0) 360 : 370 POKE addr32,byte1 : POKE addr32+1,byte2 380 addr32 = addr32+2 390 END FOR a 400 SBYTES op$,base+fl,2*fl 410 RECHP base : REMark release heap area used 420 PRINT #0,'Program finished' Any suggestions on improving this welcome. Oh, and I hope Marcel is happy someone's actually using the 256 colour mode. If I'm right, this should work on Aurora 256 colour screens as well since if I'm right Marcel wrote the QPC2 256 colour driver to be compatible with Aurora 256 colour modes (once Aurora colour drivers are out that is!) -- Dilwyn Jones
RE : [ql-users] OnT (Finally)
Just take care to include an anti-spam and an anti-virus control in your mailer as if it use with Launchpad and QPC on a PC to control a missile to avoid hack attacks from Guys like Oussama or Ben ;-) Jimmy. -Message d'origine- De : [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] De la part de Phoebus Dokos Envoyé : mardi 15 juillet 2003 18:43 À : [EMAIL PROTECTED] Objet : Re: [ql-users] OnT (Finally) On Tue, 15 Jul 2003 16:52:50 +0100, Dilwyn Jones <[EMAIL PROTECTED]> wrote: > And have just remembered that after talking about missiles etc, I'm > the one writing the program called LAUNCHPAD :-) > > Just remember, when SOQL comes out I'll put a feature in Launchpad > that I can dial you up and destroy your QL files, OK??? Just around the corner... preliminary tests with my mailer work just fine... and soQL as it stands provides a very stable platform anyway... Phoebus P.S. I will send it over your way so you can try it as it stands and then the mailer so you may even incorporate its functionality in Launchpad (now how about that huh?) -- Phoebus Dokos - Undergrad in MIS Eberly College of Business - Indiana U. of PA
Re: [ql-users] OT
- Original Message - From: "Dilwyn Jones" <[EMAIL PROTECTED]> Subject: Re: [ql-users] OT > And have just remembered that after talking about missiles etc, I'm > the one writing the program called LAUNCHPAD :-) > > Just remember, when SOQL comes out I'll put a feature in Launchpad > that I can dial you up and destroy your QL files, OK??? > Dilwyn, remember what you accused me of the other day about naughty bits of code in my programs to spy on Ql-ers. May I advise you to double check the bits of code I sent you for use in Launchpad? You never know what my Whitehall masters have secretly slipped into it! BTW, just because you are paranoid, it doesn't mean that they aren't out to get you. Geoff
Re: [ql-users] OnT (Finally)
Quoting Phoebus Dokos <[EMAIL PROTECTED]>: > P.S. I will send it over your way so you can try it as it stands and then > the mailer so you may even incorporate its functionality in Launchpad (now > how about that huh?) Will you be releasing this as freeware or shareware, or as a commercial product? Mark - This mail sent through IMP: http://horde.org/imp/
Re: [ql-users] OnT (Finally)
On Tue, 15 Jul 2003 16:52:50 +0100, Dilwyn Jones <[EMAIL PROTECTED]> wrote: And have just remembered that after talking about missiles etc, I'm the one writing the program called LAUNCHPAD :-) Just remember, when SOQL comes out I'll put a feature in Launchpad that I can dial you up and destroy your QL files, OK??? Just around the corner... preliminary tests with my mailer work just fine... and soQL as it stands provides a very stable platform anyway... Phoebus P.S. I will send it over your way so you can try it as it stands and then the mailer so you may even incorporate its functionality in Launchpad (now how about that huh?) -- Phoebus Dokos - Undergrad in MIS Eberly College of Business - Indiana U. of PA
Re: [ql-users] OT
> No. "Friendly fire" is where bombs/gunfire/schrapnel aimed for the enemy > ends up hitting and/or killing one of our own troops. > > Ridiculous name for it... I always thought, not that is should ever > happen anyway. Seems to happen all to often though, Reminds me a lot of this list. We used to have a lot of carping about PCs and other subjects and ended up shooting ourselves in the foot as QLers .Remember the emails between Peter Graf and others for example, nobody in particular at fault, just it was in danger of getting out of hand and led to phrases like "rattles getting thrown out of prams" and so on. -- Dilwyn Jones
Re: [ql-users] OT
> > Anyway, you'll never get hit by anything British, not because British > > bombs and bullets are accurate but our poor soldiers end up having to > > borrow and scrouunge American kit and bullets while overseas... > > Is that the newspeak for "friendly fire"? ;-)) Best solution is: put a PC inside every missile, add a QPC to control it all. Now there's pure destructive power for you. The excellence of QPC, the sheer destructive power of a PC and above all it brings this silly thread back on topic! (OK, I know you'll ask "why?") And have just remembered that after talking about missiles etc, I'm the one writing the program called LAUNCHPAD :-) Just remember, when SOQL comes out I'll put a feature in Launchpad that I can dial you up and destroy your QL files, OK??? -- Dilwyn Jones
Re: [ql-users] OT
No. "Friendly fire" is where bombs/gunfire/schrapnel aimed for the enemy ends up hitting and/or killing one of our own troops. Ridiculous name for it... I always thought, not that is should ever happen anyway. Seems to happen all to often though, Darren Branagh, Bank of Ireland - Cards And Loans Business, Nassau House, 33/35 Nassau Street, Dublin 2. Ireland. Tel: 1850-530-530 Fax: 01-6706813. "Wolfgang Lenerz" To: [EMAIL PROTECTED] <[EMAIL PROTECTED] cc: >Subject: Re: [ql-users] OT Sent by: [EMAIL PROTECTED] g.uk 15/07/2003 14:40 Please respond to ql-users On 15 Jul 2003, at 12:05, Dilwyn Jones wrote: > Anyway, you'll never get hit by anything British, not because British > bombs and bullets are accurate but our poor soldiers end up having to > borrow and scrouunge American kit and bullets while overseas... Is that the newspeak for "friendly fire"? Wolfgang - www.wlenerz.com This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify us immediately at [EMAIL PROTECTED] and delete this E-mail from your system. Thank you. It is possible for data transmitted by email to be deliberately or accidentally corrupted or intercepted. For this reason, where the communication is by email, the Bank of Ireland Group does not accept any responsibility for any breach of confidence which may arise through the use of this medium. This footnote also confirms that this email message has been swept for the presence of known computer viruses.
Re: [ql-users] OT
On 15 Jul 2003, at 12:05, Dilwyn Jones wrote: > Anyway, you'll never get hit by anything British, not because British > bombs and bullets are accurate but our poor soldiers end up having to > borrow and scrouunge American kit and bullets while overseas... Is that the newspeak for "friendly fire"? Wolfgang - www.wlenerz.com
[ql-users] WANTED - PRINTERS
I know this is a long shot, but does anyone know of any stocks of working Epson Stylus Colour 980 printers anywhere - I have customers looking for at least 4 of the beasts... On a QL note, if anyone is looking for an 850, I do have two here :-) -- Rich Mellor RWAP Services 35 Chantry Croft, Kinsley, Pontefract, West Yorkshire, WF9 5JH TEL: 01977 610509 http://hometown.aol.co.uk/rwapsoftware
RE : [ql-users] New(er) SourceEdit SuperBasic Language file
SourceEdit is a free windows editor that can be download from http://www.sourceedit.com As well as SuperBasic language extension can be reach at http://www.brixoft.com/tnr.asp And for the lastest version by email from me or Phoebus. Cheers, Jimmy. -Message d'origine- De : [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] De la part de Dilwyn Jones Envoyé : lundi 14 juillet 2003 10:55 À : [EMAIL PROTECTED] Objet : Re: [ql-users] New(er) SourceEdit SuperBasic Language file Would be nice to hear a bit more about this - just what is SourceEdit (must have missed something somewhere about this)? -- Dilwyn Jones > Jimmy and I prepared a newer version of the SuperBasic Language File for > SourceEdit.We sent it already to SourceEdit.com (not available yet though). > Until it is, contact me or Jimmy for a copy. > > Among other new things in the newest release is inclusion of ALL operators > (some were missing previously), new (previously missing) keywords for the > (Super)Gold Card and removal of the FOR...NEXT construct (as Next is not > really the formal end of the looping mechanism, just a "jumper" like > RETurn. These two have been moved to the "operators" section, thus allowing > for different colour that will attract your attention. > > All my best, > > Phoebus
Re: [ql-users] Quanta Workshop in Norwich
> > > > Expect a wayward American missile to fly low over you soon... > > (just > > > > pray it has a QL controlling it not a PC!) > > > > > > No, no, let it have a PC by all means -it'll probably go down > > > somewhere in the ocean (a blue screen of death...) > > > > > > Wolfgang > > Didn't you know, that's why the Americans call them missiles. Or > > Miss-iles (they miss their targets) > > OK, that's reassuring for you (they'll "miss" the "isles") - but I'lm on > the continent Dohh, never thought of that. Anyway, you'll never get hit by anything British, not because British bombs and bullets are accurate but our poor soldiers end up having to borrow and scrouunge American kit and bullets while overseas... -- Dilwyn Jones
Re: [ql-users] New(er) SourceEdit SuperBasic Language file
Would be nice to hear a bit more about this - just what is SourceEdit (must have missed something somewhere about this)? -- Dilwyn Jones > Jimmy and I prepared a newer version of the SuperBasic Language File for > SourceEdit.We sent it already to SourceEdit.com (not available yet though). > Until it is, contact me or Jimmy for a copy. > > Among other new things in the newest release is inclusion of ALL operators > (some were missing previously), new (previously missing) keywords for the > (Super)Gold Card and removal of the FOR...NEXT construct (as Next is not > really the formal end of the looping mechanism, just a "jumper" like > RETurn. These two have been moved to the "operators" section, thus allowing > for different colour that will attract your attention. > > All my best, > > Phoebus
Re: [ql-users] Quanta Workshop in Norwich
> missiles at one radar installation. The story goes that eventually the RAF > fired one Alarm which destroyed the installation. > > The jokes about using the QL are not far off the mark. > Alarm is powered by 68008 - all the original code was prototyped on a QL. > > Jeremy He he, when the QL first came out, I remember reading that the 68008 was originally used in military applications, though at the time I assumed it was probably in communications and other more traditional computer based electronics etc rather than bombs as such. -- Dilwyn Jones
