QL Tinkering

Helpful tips and guides, also new users can ask for help here.
User avatar
dilwyn
Mr QL
Posts: 2753
Joined: Wed Dec 01, 2010 10:39 pm

Re: QL Tinkering

Post by dilwyn »

Wow, looks amazing!
I look forward to making time over Christmas to play this!


User avatar
QLvsJAGUAR
Gold Card
Posts: 455
Joined: Tue Feb 15, 2011 8:42 am
Location: Lucerne, Switzerland
Contact:

Re: QL Tinkering

Post by QLvsJAGUAR »

qbits wrote:Seasonal Greetings - Merry Christmas and a Happy New Year to you all.
Thank you, QBITS. I'm looking forward to try out you various programs which you published in this thread.


QL forever!
https://www.sinclairql.net/ - Go and get THE DISTRIBUTION & QL/E!
https://www.youtube.com/QLvsJAGUAR/community - Blog
https://www.youtube.com/QLvsJAGUAR - Dedicated QL videos
Sinclair, QL, ATARI, JAGUAR, NUON, APPLE, NeXT, MiST & much more...
Videos, pictures & information
qbits
Trump Card
Posts: 171
Joined: Sun Dec 11, 2016 3:32 pm

Re: QL Tinkering

Post by qbits »

Hi All,
Thanks for all your comments.
Taking the present circumstances our family have been minimising social contact since early February the last time we visited my Mother who’s in a care home. Our adult children, one is managing to work from home; the other two are having to attend their work place, one being a key worker and the other having to look after specialised equipment. We all keep in contact, but with choir, drama activities and other outings put on hold, I find myself with a few more hours to explore QL SuperBASIC.

To that end another QL Forum Topic has sent me reviewing and revising an old Prog! QBITS Organiser. More of which I hope to be uploading in the coming weeks. Partly due to that and the use of Bitmaps and or Vector graphics left me having an afternoon doodling with my QBITS Bitmap Design. The result of which I have upload for others to view and extend.

QBITS
Attachments
QBITS Organiser 04.jpg
Bitmap04.jpg
QBPData36x32_2.zip
(5.27 KiB) Downloaded 109 times
QBBMDesign_QL.zip
(24.28 KiB) Downloaded 104 times


qbits
Trump Card
Posts: 171
Joined: Sun Dec 11, 2016 3:32 pm

Re: QL Tinkering

Post by qbits »

Hi all,
This coronavirus lockdown has certainly curtailed the family’s activities in Choir and Theatre work. My latest contribution was some stage Sets built for one-act plays, which now lie languishing in my garage. But that’s another life.

What I have had is time on my hands, so after gardening - great weather we’ve been having, anyway I’ve been pursuing my interest in SuperBASIC and I am happy to announce a working version of a revamped, revised and basically rewritten QBITS Organiser which comes with my usual pdf.

The code was developed using QPC2 and tried out with QL2K emulators, the later at speed 1 equivalent to a BBQL. So long as you have extended memory and as a minimum a floppy or better as your default storage device, I’m hoping the Prog won’t fall over on its first roll out and run Ok. Anyone with such a BBQL setup I will be interested to hear you views.

SuperBASIC has given me the opportunity to write a simple page Text Editor in less than 100 lines a currency Calculator in even less and even the semblance of accounts mini-spreadsheet although I guess I’m cheating a bit on that one. The Organiser Calendar has been revamped from the eighties code and I think I’ve halved the number of lines. I’ve added a number of Vector and Bitmap images to enhance the pages and that was probably my down fall. The target I was aiming to achieve was within a 1000 lines. As it stands its 1010 but in my defence there are over 130 lines covering the image graphics?

Not that it’s of any interest, but for my recent birthday I was bought a model to assemble of the Star Trek Enterprise. The eighties have given me such good memories, so live long and prosper QL people!

QBITS signing off…

Update - QBOrg_v02BBQLBeat & QBOrg_v02QPC2Beat have been edited
both have default dr%=1 see line 1003 i.e flp1_ change as required!

A further update with Norman's suggestion.
Attachments
QBOrganiser_v02Beta.pdf
(1.87 MiB) Downloaded 92 times
QBOrg_v02QPC2Beta.zip
(28.49 KiB) Downloaded 91 times
QBOrganiser_v02Beta.pdf
(1.86 MiB) Downloaded 96 times
Last edited by qbits on Fri May 22, 2020 11:40 am, edited 5 times in total.


User avatar
Chr$
QL Wafer Drive
Posts: 1304
Joined: Mon May 27, 2019 10:03 am
Location: Sachsen, Germany
Contact:

Re: QL Tinkering

Post by Chr$ »

That looks very well made and I like the pdf write-up. You've put a lot of effort into that.

I just tried it on my GC BBQL running from flp1_ but with absolutely no boot file, so no extensions, just Minerva and TK2 from ROM (and the Qubata and floppy drive bits).

It trips up with a 'not found', here (currently my display is b/w):
qbits.jpg
I didn't look into it further.


https://QXL.WIN
Collector of QL related computers, accessories and QL games/software.
Ask me about felt pads - I can cut them to size and they have proved excellent for mdv data recovery.
qbits
Trump Card
Posts: 171
Joined: Sun Dec 11, 2016 3:32 pm

Re: QL Tinkering

Post by qbits »

Thanks Chris for trying it out :-
First problem did you set the default drive in line 1003 to dr%=1 ie. ‘flp1_’
Second problem my error line 1083 CSIZE #ch% there should not be a space i.e CSIZE#ch%
Hopefully more success next time you try!

QBITS


User avatar
Chr$
QL Wafer Drive
Posts: 1304
Joined: Mon May 27, 2019 10:03 am
Location: Sachsen, Germany
Contact:

Re: QL Tinkering

Post by Chr$ »

qbits wrote:Thanks Chris for trying it out :-
First problem did you set the default drive in line 1003 to dr%=1 ie. ‘flp1_’
Second problem my error line 1083 CSIZE #ch% there should not be a space i.e CSIZE#ch%
Hopefully more success next time you try!

QBITS
Ah yes, that's better. It was too large for the BBQL screen (tv mode) so I had to switch to mode 4 to fit it all in.

Trying it on Qemulator just now, it doesn't like the syntax of lines 1150 to 1153. It prefixes them with 'MISTake' (seems to do that during loading, it certainly took ages) and won't let me put them back to how they should be, I get 'bad line'.


https://QXL.WIN
Collector of QL related computers, accessories and QL games/software.
Ask me about felt pads - I can cut them to size and they have proved excellent for mdv data recovery.
qbits
Trump Card
Posts: 171
Joined: Sun Dec 11, 2016 3:32 pm

Re: QL Tinkering

Post by qbits »

Hi Chris,
Lines 1150-53 SELect On yr% :They may require END SELect to close line I’ve added it in.
and up loaded the corrected Progs see updates.
QBITS


User avatar
NormanDunbar
Forum Moderator
Posts: 2251
Joined: Tue Dec 14, 2010 9:04 am
Location: Leeds, West Yorkshire, UK
Contact:

Re: QL Tinkering

Post by NormanDunbar »

Chr$ wrote:Trying it on Qemulator just now, it doesn't like the syntax of lines 1150 to 1153. It prefixes them with 'MISTake' (seems to do that during loading, it certainly took ages) and won't let me put them back to how they should be, I get 'bad line'.
Change this:

Code: Select all

1150 SELect ON yr%= 1700 TO 1799:yc%=4
1151 SELect ON yr%= 1800 TO 1899:yc%=2
1152 SELect ON yr%= 1900 TO 1999:yc%=0
1153 SELect ON yr%= 2000 TO 2099:yc%=6
to this:

Code: Select all

1150 SELect ON yr% : = 1700 TO 1799:yc%=4
1151 SELect ON yr% : = 1800 TO 1899:yc%=2
1152 SELect ON yr% : = 1900 TO 1999:yc%=0
1153 SELect ON yr% : = 2000 TO 2099:yc%=6
Colons missing in a single line SELect. The END SELect is implied by the end of the line.

Personally, I'd have gone for:

Code: Select all

1150 SELect ON yr% 
1151    = 1700 TO 1799:yc%=4
1152    = 1800 TO 1899:yc%=2
1153    = 1900 TO 1999:yc%=0
1154    = 2000 TO 2099:yc%=6
1155 END SELect
To save re-evaluating yr% each time.


HTH

Cheers,
Norm.


Why do they put lightning conductors on churches?
Author of Arduino Software Internals
Author of Arduino Interrupts

No longer on Twitter, find me on https://mastodon.scot/@NormanDunbar.
User avatar
Chr$
QL Wafer Drive
Posts: 1304
Joined: Mon May 27, 2019 10:03 am
Location: Sachsen, Germany
Contact:

Re: QL Tinkering

Post by Chr$ »

It (qemulator) doesn't like the new version either. Nor does it seem to like Norman's suggestions, although I didn't try the last option yet because I'd have to renum and then also spotted MISTake lines for the same issue at lines 1127 and 1640 - 1643.


https://QXL.WIN
Collector of QL related computers, accessories and QL games/software.
Ask me about felt pads - I can cut them to size and they have proved excellent for mdv data recovery.
Post Reply