SmartBASIC - A Coleco Adam Forum

Re: Turbo Pascal 3 bitmap graphics extensions

2021-10-29T02:21:15-04:00

Hi Wmaalouli, 3Q so much, (3=Than=Taiwanese Sound, Q=You)

Statistics: Posted by wanghanche — Fri Oct 29, 2021 2:21 am

Re: Turbo Pascal 3 bitmap graphics extensions

2021-10-27T08:24:34-04:00

Sure. Here you go. The source code is formatted for 40 columns because I used my own Adamed editor on the Adam computer directly to program the extensions. Also there is a lot of inline 8080 assembly in the code to access the various functions of the Adam.
Please feel free to ask any questions you may have.

TP3 extensions source with demo.zip

Statistics: Posted by Wmaalouli — Wed Oct 27, 2021 8:24 am

Re: Turbo Pascal 3 bitmap graphics extensions

2021-10-25T19:56:53-04:00

Hi Sir, May I have plain source code from TP3BITMAP.ZIP? which I could download and explore to AdamTP3.DSK and BMPDEMO.DSK, but after that, I have no way to open them by any tools that I can find, I saw demo on the youtube and like to study it for learning to write console game for fun, thank you very much.

Statistics: Posted by wanghanche — Mon Oct 25, 2021 7:56 pm

Re: Turbo Pascal 3 bitmap graphics extensions

2021-05-24T15:17:23-04:00

Here's a brief demo of using the bitmap mode. It's a program that procedurally generates a "fedora" via a mathematical function.

Hat.zip

Statistics: Posted by Wmaalouli — Mon May 24, 2021 3:17 pm

Re: Turbo Pascal 3 bitmap graphics extensions

2020-07-06T19:32:43-04:00

As for the joystick extensions, it seems I gave you an older listing for the sound and controller demo. Attached is the updated listing where the Joyst and Pad functions were consolidated into a single function called CONTROLLER. Sorry about that.

Awesome, thanks! Too bad about TDOS but at least now I understand why it won’t work.

Statistics: Posted by joltguy — Mon Jul 06, 2020 7:32 pm

Re: Turbo Pascal 3 bitmap graphics extensions

2020-07-06T13:07:51-04:00

Is it odd that these extensions don't work under T-DOS? The demo programs compile fine but when you run the resulting .com file the system just freezes up. I thought T-DOS it was 99% CP/M compatible but maybe this falls into that 1%? If these could work in T-DOS it'd be awesome mainly because its support for more drives and disks larger than 160K sure gives a lot more breathing room. And... the TP editor actually seems to work halfway decent in T-DOS.

Also, I can't seem to find the Joyst() and Pad() procedures that are called in the SndTest demo program. I looked in control.pas but there is only a Controller() procedure defined there.

As Milli stated, TDOS messes up the VRAM, which is why the extensions will not work as they rely on the bitmap mode which consumes large swaths of the VRAM. As for the TP3 editor, I never had any luck getting it to work properly with the Adam, which was partly one of the reasons I wrote ADAMED, a 40 column text editor (you can find it under this section). https://youtu.be/oPghkOnewaE

As for the joystick extensions, it seems I gave you an older listing for the sound and controller demo. Attached is the updated listing where the Joyst and Pad functions were consolidated into a single function called CONTROLLER. Sorry about that.

Sound and controller demo program.zip

Statistics: Posted by Wmaalouli — Mon Jul 06, 2020 1:07 pm

Re: Turbo Pascal 3 bitmap graphics extensions

2020-07-04T22:41:47-04:00

TDOS uses the VRAM to save a copy of the CCP so that may be the problem

Ahh! That’s probably it.

Statistics: Posted by joltguy — Sat Jul 04, 2020 10:41 pm

Re: Turbo Pascal 3 bitmap graphics extensions

2020-07-04T12:32:59-04:00

TDOS uses the VRAM to save a copy of the CCP so that may be the problem

Statistics: Posted by Milli — Sat Jul 04, 2020 12:32 pm

Re: Turbo Pascal 3 bitmap graphics extensions

2020-07-04T08:43:46-04:00

Is it odd that these extensions don't work under T-DOS? The demo programs compile fine but when you run the resulting .com file the system just freezes up. I thought T-DOS it was 99% CP/M compatible but maybe this falls into that 1%? If these could work in T-DOS it'd be awesome mainly because its support for more drives and disks larger than 160K sure gives a lot more breathing room. And... the TP editor actually seems to work halfway decent in T-DOS.

Also, I can't seem to find the Joyst() and Pad() procedures that are called in the SndTest demo program. I looked in control.pas but there is only a Controller() procedure defined there.

Statistics: Posted by joltguy — Sat Jul 04, 2020 8:43 am

Re: Turbo Pascal 3 bitmap graphics extensions

2020-06-22T13:05:05-04:00

Here you go. Feel free to ask any questions.

Thank you!!

Statistics: Posted by joltguy — Mon Jun 22, 2020 1:05 pm

Re: Turbo Pascal 3 bitmap graphics extensions

2020-06-22T08:57:48-04:00

Here's a complete bitmap package for the Turbo Pascal 3 compiler under CP/M which will allow you to take advantage of the Adam's graphic capabilities using the power of a compiled Pascal environment.
I’d like to play around with this on my Adam. Wmaalouli could you please post the source code for the BmpDemo program and the sound & controller demos that you showed on YouTube? They don’t seem to be included on the disk image.

Here you go. Feel free to ask any questions.

TP3 extensions demo programs.zip

Statistics: Posted by Wmaalouli — Mon Jun 22, 2020 8:57 am

Re: Turbo Pascal 3 bitmap graphics extensions

2020-06-20T09:21:23-04:00

Here's a complete bitmap package for the Turbo Pascal 3 compiler under CP/M which will allow you to take advantage of the Adam's graphic capabilities using the power of a compiled Pascal environment.

I’d like to play around with this on my Adam. Wmaalouli could you please post the source code for the BmpDemo program and the sound & controller demos that you showed on YouTube? They don’t seem to be included on the disk image.

Statistics: Posted by joltguy — Sat Jun 20, 2020 9:21 am

Re: Turbo Pascal 3 bitmap graphics extensions

2019-10-26T08:18:36-04:00

I programmed the modules straight into Turbo Pascal, so there is no master Z80 source. However, most of the modules have inline 8080 assembly code for the critical sections and it should give you most of what you need. The format of the inline code is opcode/LSB/MSB (if applicable). Here's a link to a handy conversion table: http://pastraiser.com/cpu/i8080/i8080_opcodes.html
That sounds like a great project which will open up the Adam to the Basic programmer. I'll be very interested in seeing how you progress and feel free to reach out with any questions.

Statistics: Posted by Wmaalouli — Sat Oct 26, 2019 8:18 am

Re: Turbo Pascal 3 bitmap graphics extensions

2019-10-25T08:33:57-04:00

I just tried to copy the BMPDRAW.PAS from the image to my PC so I can look at the source and discovered that Eric Pearson's ADAM Image Manager corrupted it badly

Wmaalouli do you have just the Z80 source code for the routines? I would like to try and implement them in some pure Z80 code. Mainly need the initialization and single pixel routines, the rest I can make as necessary.

Milli

Statistics: Posted by Milli — Fri Oct 25, 2019 8:33 am

Re: Turbo Pascal 3 bitmap graphics extensions

2019-08-27T07:23:41-04:00

Definitely need to try this out. Are you open to making sound and controller modules, too?

Funny, I was just looking at the technical data on this in the Hacker's Guide. The short answer is yes.

Statistics: Posted by Wmaalouli — Tue Aug 27, 2019 7:23 am