QL Tinkering
-
- Aurora
- Posts: 863
- Joined: Mon Nov 24, 2014 2:03 pm
Re: QL Tinkering
Hi Qbits,
After some experiments, I find that using filled_arcs instead of 45°dashes still produces a lot of odd jaggedness on most enlarged characters..... Steve.
After some experiments, I find that using filled_arcs instead of 45°dashes still produces a lot of odd jaggedness on most enlarged characters..... Steve.
Re: QL Tinkering
Hi Stev,
Yes I'm having similar problems exploring this route...
Derick - Importing 8x8 bitmaps - trying to keep it simple perhaps you will check out the code below
Copy paste code to QL_bas file and Delete the REMark of relative ALCHP memory allocations.
LOAD and action the PROCedure
MBQLFont Fzx$,zx% :REMark fzx$ being the bitmap plus suffix '_fzx' file and zx% being the QL Font Grp
Then LOAD into QBITS_FontEditSE_bas to display
QBITS Code for Porting 8x8 Bitmap files to QL 8x9 Font files
3050 REMark 8x8 to QL Font Conversion (i.e ZX Spectrum)
3052 DEFine PROCedure BMQLFont(Fzx$,zx%)
3053 REMark Prepare 8x8 Bitmap File Strip any Headers and check Size
3054 REMark Dev$='win1_' Default Device : Suffix Fzx$ Filename with '_fzx'
3055 REMark Select appropriate QL Font Grp zx%=[ 1,2,3,4 ]
3056 REMark FBaseA=ALCHP(1100) :POKE FBaseA, 0,127 :REMark [Grp 1 CHR$( 0-127)]
3057 REMark FBase1=ALCHP(876) :POKE FBase1, 32, 96 :REMark [Grp 2 CHR$( 32-127)]
3058 REMark FBase2=ALCHP(588) :POKE FBase2,127, 64 :REMark [Grp 3 CHR$(]28-191)]
3059 REMark FBaseB=ALCHP(1100) :POKE FBaseB,127,127 :REMark [Grp 4 CHR$(128-255)]
3060 :
3061 BMAddr=ALCHP(2048) :REMark 8x8 Bitmap Conversion to QL 8x9 Font
3062 LBYTES Dev$&Fzx$,BMAddr:fl%=('_fzx' INSTR Fzx$)-1
3063 SELect ON zx%
3064 =1:addr=FBaseA:cm%=127:fntsize=1100
3065 =2:addr=FBase1:cm%= 96:fntsize= 876
3066 =3:addr=FBase2:cm%= 64:fntsize= 588
3067 =4:addr=FBaseB:cm%=127:fntsize=1100
3068 END SELect
3069 FOR cn=0 TO cm%
3070 QLBase=addr+2+cn*9:BMBase=BMAddr+cn*8
3071 FOR r=0 TO 7:POKE QLBase+r,PEEK(BMBase+r):END FOR r:POKE QLBase+8,0
3072 END FOR cn
3073 SBYTES Dev$&Fzx$(1 TO fl%)&'T1_fnt',addr,fntsize:RECHP BMAddr
3074 END DEFine
I guess Andrew has already written similar code for his ZX conversions.
QBITS
Yes I'm having similar problems exploring this route...
Derick - Importing 8x8 bitmaps - trying to keep it simple perhaps you will check out the code below
Copy paste code to QL_bas file and Delete the REMark of relative ALCHP memory allocations.
LOAD and action the PROCedure
MBQLFont Fzx$,zx% :REMark fzx$ being the bitmap plus suffix '_fzx' file and zx% being the QL Font Grp
Then LOAD into QBITS_FontEditSE_bas to display
QBITS Code for Porting 8x8 Bitmap files to QL 8x9 Font files
3050 REMark 8x8 to QL Font Conversion (i.e ZX Spectrum)
3052 DEFine PROCedure BMQLFont(Fzx$,zx%)
3053 REMark Prepare 8x8 Bitmap File Strip any Headers and check Size
3054 REMark Dev$='win1_' Default Device : Suffix Fzx$ Filename with '_fzx'
3055 REMark Select appropriate QL Font Grp zx%=[ 1,2,3,4 ]
3056 REMark FBaseA=ALCHP(1100) :POKE FBaseA, 0,127 :REMark [Grp 1 CHR$( 0-127)]
3057 REMark FBase1=ALCHP(876) :POKE FBase1, 32, 96 :REMark [Grp 2 CHR$( 32-127)]
3058 REMark FBase2=ALCHP(588) :POKE FBase2,127, 64 :REMark [Grp 3 CHR$(]28-191)]
3059 REMark FBaseB=ALCHP(1100) :POKE FBaseB,127,127 :REMark [Grp 4 CHR$(128-255)]
3060 :
3061 BMAddr=ALCHP(2048) :REMark 8x8 Bitmap Conversion to QL 8x9 Font
3062 LBYTES Dev$&Fzx$,BMAddr:fl%=('_fzx' INSTR Fzx$)-1
3063 SELect ON zx%
3064 =1:addr=FBaseA:cm%=127:fntsize=1100
3065 =2:addr=FBase1:cm%= 96:fntsize= 876
3066 =3:addr=FBase2:cm%= 64:fntsize= 588
3067 =4:addr=FBaseB:cm%=127:fntsize=1100
3068 END SELect
3069 FOR cn=0 TO cm%
3070 QLBase=addr+2+cn*9:BMBase=BMAddr+cn*8
3071 FOR r=0 TO 7:POKE QLBase+r,PEEK(BMBase+r):END FOR r:POKE QLBase+8,0
3072 END FOR cn
3073 SBYTES Dev$&Fzx$(1 TO fl%)&'T1_fnt',addr,fntsize:RECHP BMAddr
3074 END DEFine
I guess Andrew has already written similar code for his ZX conversions.
QBITS
-
- Aurora
- Posts: 863
- Joined: Mon Nov 24, 2014 2:03 pm
Re: QL Tinkering
Hi Tinkerers,
Here is the final (I hope) version of the font-enlarger program.
UNZIP, LRESPR chans_code, and LRUN the demo, Tested OK on QPC, SGC and QDOS.
Fits words onto the chosen screen, splits them if too long. Fills randomly here.
Should be OK with any font ?
Modify line 150 for your own text, or Line 160 for your own window needs.
If your enlargement won't fit the screen, you get an out of range error. Steve.
Here is the final (I hope) version of the font-enlarger program.
UNZIP, LRESPR chans_code, and LRUN the demo, Tested OK on QPC, SGC and QDOS.
Fits words onto the chosen screen, splits them if too long. Fills randomly here.
Should be OK with any font ?
Modify line 150 for your own text, or Line 160 for your own window needs.
If your enlargement won't fit the screen, you get an out of range error. Steve.
-
- Aurora
- Posts: 863
- Joined: Mon Nov 24, 2014 2:03 pm
Re: QL Tinkering
Hi Qbits,
This is the sort of enlarged character I achieve using ARCS, CIRCLEs and oblongs.
It uses masses of code to produce unsatisfactory results. (eg: no aspect control).
And FILLing using ARCs is cumbersome. Every Character would need its own routine...
I shan't experiment any further down that road... Regards, Steve.
This is the sort of enlarged character I achieve using ARCS, CIRCLEs and oblongs.
It uses masses of code to produce unsatisfactory results. (eg: no aspect control).
And FILLing using ARCs is cumbersome. Every Character would need its own routine...
I shan't experiment any further down that road... Regards, Steve.
-
- Aurora
- Posts: 863
- Joined: Mon Nov 24, 2014 2:03 pm
Re: QL Tinkering
MERRY CHRISTMAS
Well QBITS_FontEditSEPlus has the option to scale the Bitmap in Pixel or Vector Graphics. The later using a version derived from Steves QL Bitmap converter. You can increase the thickness of the outline and switch On/Off the Frame fill to more appreciate it construction. Speed of execution will depend on your platform.
A busy time of year hope you all have a good time with your own festivities.
QBITS
Well QBITS_FontEditSEPlus has the option to scale the Bitmap in Pixel or Vector Graphics. The later using a version derived from Steves QL Bitmap converter. You can increase the thickness of the outline and switch On/Off the Frame fill to more appreciate it construction. Speed of execution will depend on your platform.
A busy time of year hope you all have a good time with your own festivities.
QBITS
- Attachments
-
- FontFiles.zip
- (6.79 KiB) Downloaded 40 times
-
- QB02_FontEditSEPlus.pdf
- (2.27 MiB) Downloaded 42 times
-
- QBITS_FontEditSEPlus_bas.zip
- (20.48 KiB) Downloaded 44 times
Re: QL Tinkering
Hi All,
Well, my Broadband has now been upgraded to full Fibre. A guaranteed 100MB which on testing the best so far has been 57.2MB. But a vast improvement on my previous 3.2Mb.
The New Year has me returning to QBITS QLSounds and the QPC2 and AY3 emulation. I have a Mode to change the 14 register settings, which I’ve used POKE_AY and LIST_AY to create sound outputs but results so far don’t seem to give much variation.
Help: If possible, I would like the AY3 Register settings to obtain the scale of musical notes created when using the PLAY command.
QBITS
Well, my Broadband has now been upgraded to full Fibre. A guaranteed 100MB which on testing the best so far has been 57.2MB. But a vast improvement on my previous 3.2Mb.
The New Year has me returning to QBITS QLSounds and the QPC2 and AY3 emulation. I have a Mode to change the 14 register settings, which I’ve used POKE_AY and LIST_AY to create sound outputs but results so far don’t seem to give much variation.
Help: If possible, I would like the AY3 Register settings to obtain the scale of musical notes created when using the PLAY command.
QBITS
Re: QL Tinkering
Hi,
QBITS Project 2025 Utilising QPC2’s AY3 emulation.
QBITS QLSoundAY3_WIP provides an AY3 Register Settings Mode.
Step One:
Accessing and changing the AY Registers the output actioned with Enter key [End with Spacebar].
The functionality might be described as similar to changing the Attributes in BEEP Mode except the AY3 emulate has three Tone channels and volume control settings or defined wave shapes. Plus, a white Noise component.
Step Two:
Unfortunately, my limited exploring of variation in generated output has not proved very rewarding and hence a request for register setting or calculating thereof for the keyboard Notes so I can add them as defaults.
Step Three:
Plan for output sounds to be added to a scrolling list for Playback similar to the Tracker in BEEP Mode.
Progs: QBITSBoot_bas used to generate QBITSConfig which is used by QBITS_QLSoundAY3_WIP to identify accessible Drives:
Note: Run QBITSBoot_bas from default Drive - Check and set Drives accessible for your set up
Test Files for TRACK SCORE Modes: TrackDemo_qbs : ScoreNotes_qbs : SFPT1_qbs : SEPT2_qbs
QBITS
QBITS Project 2025 Utilising QPC2’s AY3 emulation.
QBITS QLSoundAY3_WIP provides an AY3 Register Settings Mode.
Step One:
Accessing and changing the AY Registers the output actioned with Enter key [End with Spacebar].
The functionality might be described as similar to changing the Attributes in BEEP Mode except the AY3 emulate has three Tone channels and volume control settings or defined wave shapes. Plus, a white Noise component.
Step Two:
Unfortunately, my limited exploring of variation in generated output has not proved very rewarding and hence a request for register setting or calculating thereof for the keyboard Notes so I can add them as defaults.
Step Three:
Plan for output sounds to be added to a scrolling list for Playback similar to the Tracker in BEEP Mode.
Progs: QBITSBoot_bas used to generate QBITSConfig which is used by QBITS_QLSoundAY3_WIP to identify accessible Drives:
Note: Run QBITSBoot_bas from default Drive - Check and set Drives accessible for your set up
Test Files for TRACK SCORE Modes: TrackDemo_qbs : ScoreNotes_qbs : SFPT1_qbs : SEPT2_qbs
QBITS