Archives for Freepascal

AmiTube 0.3 First Release

Posted by ALB42 on 26. November 20219 Comments

Just to finish that (for me the program and services around are now more or less finished) I will publish this AmiTube program which you can use to watch short YouTube videos on your ordinary Amiga 68k.

As one can notice in the last video I changed my setup from MultiView to AGABlaster, which is much better to play the CDXL videos, faster and smoother, also the palette switching works better. (you can change the default player in Preferences)

Download: AmiTube 0.3

If you use that program, remember the conversation is done on my Server, please do not overdo it (try to convert a 2 hour video or convert hundreds of videos) other (and myself) need that Server for other things as well 😉

And please do not share or publish this program, anywhere! If one want to have it, here its free download it from my page. Thanks!

AmiTube on a real Amiga (A1200)

Posted by ALB42 on 26. November 2021No Comments

I tried the YoutTube client now on my real A1200 (with a 68060) and it works nicely, of course the network speed is much slower than that in UAE. But it’s still ok, not too long waiting times. (with that short videos). It depends very much on the video how good they look in 160 px width and only 32 colors, of course such Eric Schwartz videos are nice they had only very little colors. But I also found different ones like this „Seed“ looks very nice even so small.

I played around with different settings and noticed that not the conversation to CDXL is here the slow bit (its only 3-4 seconds, because it’s not HAM but just 32 colors) but the download speed from youtube. It seems that YouTube throttles downloads of the movies… hmm of course they want you to force to watch them on the page. But hey what can you do, it’s just for fun.

m68k Amiga plays YouTube videos

Posted by ALB42 on 24. November 2021No Comments

You thought it would be impossible to let an m68k Amiga play YouTube videos, you are surely mistaken, lets have a look:

You remember the CDXL stuff I showed before? Of course with that you can create a relatively low quality video from an YouTube video, and if you do that on a server and just download the converted video file you can watch youtube videos on your amiga.

The search and downloading is done via youtube_dl the conversation to CDXL using the docker container I showed earlier.

Sorry for the bad sound, but it seems to be my UAE setup is a bit strange in sound settings, never really used the sound there, also other sounds sounds a bit crackly. I should try that video on a real Amiga and with other players than Multiview to see, or better hear, if its better, or the conversation is so weak.

I remember I had some problems with the sound in big bug bunny movie as well, the sound was not loud enough and the 8 bit conversation made it really bad.

Chess GUI

Posted by ALB42 on 16. Oktober 20214 Comments

Maybe you remember when I improved the TProcess implementation for MorphOS using a Chess GUI and an uci chess client. The Author of that chess client contacted me to ask if I could publish the Chess GUI. I did not plan to publish it because it was really just a test, but ok, why not. It also includes the Source (LGPL) and some engines (also the mentioned predateur, which works nicely)

Download MUIeschecs with Source and engines

Bike Statistics

Posted by ALB42 on 15. August 2021No Comments

I use my bicycle regularly, drive every day to work and nearly every day a little round as training just for fun. Having and iPhone and Apple Watch, it’s very easy to record the tracks with that (I use an app called „Trailes“) of course would be even nicer to have some statistics about it, sadly the App does not really have that.

Therefore I coded my own little tool to show some statistics about my last rounds, as always for the last programs I did I coded it with Free Pascal for Amiga and it worked quiet nicely and easy, most of the stuff is already there in MUIMapparium (reading GPX files and calculating track properties)

So here it is:

2 hours of work and it loads the GPX data and shows them in a nice little table with settings to choose the columns and sort them by it. Free Pascal power at its best.

Free Pascal IDE on Workbench 1.3

Posted by ALB42 on 4. August 2021No Comments

Working a little bit on the Workbench 1.x compatibility of Free Pascal compilation. A lot of important calls are missing for 1.x which makes it a bit difficult to compile the same program for OS3.x and 1.x especially all the TagList calls are missing. I implemented some of them by hand (like OpenScreenTags, OpenWindowTags) to make it a bit easier. As a test I chose the Free Pascal IDE, I do not really expect it to be usable, because of the huge DOS mode chars und FreeVision emulation, which is needed. But after some days of coding, finally it somehow works (without any changes inside of the IDE source code). In the DOS Mode emulation I changed it to be always on a own 16 color screen and always use the smaller font, everything is unchanged. so very nice.

A little video:

Sadly I still can’t upload the changes because Free Pascal is still on the move to GitLab and it’s not finished.

Hardware programming on Amiga with Free Pascal

Posted by ALB42 on 17. Juni 2021No Comments

It’s very common on 68k Amiga to turn off the operating system and directly write to hardware registers to get maximum speed. Many games and demos does it this way. Usually they are written in assembler, but of course this is also possible with Free Pascal for Amiga.

I got that idea because Charlie did a little test how small a program in Free Pascal on Amiga can be. (I guess it can be even smaller than that, when replacing the DosWrite(Output()) by PutStr() and compile for 68020).

So I took his source and tried to make a little bit more useful example out of it and remembered my time doing Amiga 68k Assembler (in ASM-One, I was never good with that, but hey I can learn a bit now)

So I did a little copper list example and it’s 700 bytes long, not bad, as second I tried some bit-plane manipulation. The program became around 3kbyte (most of that is because of the huge sinus table included).

And it runs very nicely on my A1200.

The Source with compiled executable is available on Gitub.

Free Pascal 3.2.2 Release

Posted by ALB42 on 20. Mai 2021No Comments

New Release of Free Pascal is done. It’s a bug fix release for 3.2.0 it has also some bug fixes for the Amiga systems, especially structures and functions are checked against official SDKs (especially for MorphOS with its latest SDK Version). For changes that break compatibility you can check official changes document.

Downloads

or you go directly to the Free Pascal home page and download from one of the mirrors. Have Fun.

Hex2 for SinclairQL

Posted by ALB42 on 19. Mai 2021No Comments

Charlie was introducing SinclairQL port of Free Pascal, another platform using m68k processor. To be honest I never heard of it before. It also uses vasm and vlink as on Amiga, so it’s rather easy to create the cross compiler for it, the port is still in a very early stage but some stuff is already working, for example my HEX2 pocket calculator already works nicely (after some tine bugfixes 😉 in the code and in the Free Pascal code). I got a emulator for SinclairQL and it works, very nice.

If you want to try you can download the program here: Hex2-QDOS

Some little facts I should mention, the source was developed for TurboPascal 3.3 for CP/M (for my KC85) I tried a lot o things, all seems to work, but maybe some errors still hidden.

Because it was developed for KC85, so very little RAM available I decided to load the error messages and help messages from file only when needed. But that seems not so easy on SinclairQL. I had to add the „mdv1_“ (representing the first microdrive) before the filename that it can find the help or error file. Until now it seems there is no way to find out at which drive my program is (ParamStr(0) is empty), so I just hard coded that for now.