Archives for OS4

MCAmiga 0.4

Posted by ALB42 on 15. Mai 20203 Comments

Worked a little bit on the mouse control for MCAmiga, the mouse/video unit combination makes it very easy, exactly the same mechanisms than the keyboard events. So now you can also use the mouse to click on buttons or select files. The search and jump function was already included in the last version but I did not show them in a video, so I included them here.

The second part was to activate app window functionality, that you can drag and drop a file onto one of the two panels and the program will automatically jump to that directory and file. I did give me some headache though, because initially it did not work on Classic Amiga and MorphOS, and I found out that the FreePascal workbench unit had a big bug. The syscall offset of the needed Function AddAppWindowA was wrong. Now thats fixed as well.

Download as always for all Amiga systems on the programs page.

MCAmiga 0.2

Posted by ALB42 on 10. Mai 20204 Comments

MCAmiga work continues, move now completely works (also with the fast move when source and destination are on the same harddisk). I build in a little text viewer also with hex display which I use very often, and for editor you can define yourself which editor you want to use, ed, editpad or what else you like. Already works very nicely and I use it frequently now, and hopefully that motivates me to improve it further. 😉

MCAmiga 0.2

There where some little changes needed to make it compile for other Amiga Systems (AROS, MorphOS, AmigaOS4) but not serious changes, but I did not try them, so be careful when using it.

Download: for all Systems: MCAmiga (867K)

  • Amiga 68k: 3.x+, 68020 or AROS m68k
  • AROS: i386 ABIv0, ARM ABIv0, x86_64 Non-SMP
  • MorphOS: 3.x
  • AmigaOS4: 4.x (except X5000)

Playing around with FreePascals Video unit

Posted by ALB42 on 2. Mai 2020No Comments

Playing around with the video unit, really easy to write a norton/midnight commander style application with it. Not really seriously plan to make such app, but to be fair, Amiga is lacking a good norton/midnight commander style app which is fully controllable via keyboard (typical amiga application are more mouse centered, like dopus 4/5, filemaster and so on)

Source under CC0: https://github.com/alb42/MCAmiga

Where is the Lion

Posted by ALB42 on 8. Februar 2020One Comment

Implemented basic sorting and search function including replace, very basic but working, also the sorting close to the LibreOffice sorting, multi key sorting (up to 3 but in principle could make more, but is more than 3 really useful?) Together with the Format options this should be enough for a new LEU Version release Leu 0.08.

Download: LEU Download Page

Leu 0.08 with sort and search requester

Formatted Leu

Posted by ALB42 on 31. Januar 2020No Comments

Fixed a little bug in Leu regarding number format. If no number format was selected the output format was one char too long, resulting in very ugly rounding errors. Already long time before I started to implement a solution to set the number format for a cell. But it was very crude and not ready to release, so I deactivated it for Leu 0.07. But this bug got me back to work. 😉 I started to implement a format settings window, a little bit inspired by the LibreOffice one. Finally its working, not perfect but already usable.

Also fixed some small problems with the color blending on selection for RTG systems (for <15bit screens it will just use a fixed color for the selection) and new now the fixed col/row will show where the selected cell is. much easier to find, especially if it is out of scroll area.

CRT Online

Posted by ALB42 on 8. Januar 2020No Comments

Updated Online Amiga FPC Compiler again with the latest CRT unit and also tried a bunch of console based games using CRT units, all work more or less (some need some adjustments in the code) some of them are even single file pascal source files, so can be used in the online compiler.

SourceNotice
DeadColdrouge-like unfinished game (no win)
Gruesomenice rouge like game
tetris-pascalinsert a TextBackground(DarkGray); at start
Top-snek-dotpas tetrisinsert a TextBackground(Black); CursorOff(); at start
BitTetris No exit from game
Snake Game in TPcomment the two port[] lines at start
Snake
Pascal Snake
Serpent Snake
Tic-Tac-Toe
Pascal Threes
Pascal Torchnice tech demo, replace line 257: i := xxx error with Break; or compile with fpc -Mtp
Pascal PETTamagothi
Symbol Game strange gfx, replace chars #xxx Values with some better chars
Gomoku5 in a row
Word guessing gameadjust pathes ‘\’ to ‘/’ wordlist only contains apple
Countdown game
My almost FPStech demo figure movement
Snail race insert a TextBackground(DarkGray); ClrScr; at start
Tank Game
Memory Game

Status CRT unit (feat. DeadCold)

Posted by ALB42 on 1. Januar 2020One Comment

Someone might ask how the crt is going, and how useful this is already. I want to answer it with a little screenshot:

DeadCold on AROS

That is a nice little rouge-like game called DeadCold, written in FreePascal for the console. As you can see it runs and the picture looks right. (it’s not perfectly right, but somehow usable). And because a little video tells much more about how this game runs here is also a little video about it:

There are some drawing problems, especially on the messages and sometimes some of the map disappear but not bad I would say. There are also some messages about removing critter failed… but that seems some error in the game code.

The colors is badly hacked for now, and only works for AROS, I’m not sure if I can upload that this status to the official repository, I will work on it a bit more.

CRT Unit

Posted by ALB42 on 29. Dezember 2019No Comments

Most Tutorials about Pascal use the CRT unit in a very early Lesson. They use it only for ReadKey() to wait for a key at end of Program. It would be of course the same to just use a ReadLn and wait for an Enter.

I tried already to implement CRT before using an old implementation, but exactly this ReadKey implementation does not work at all when KingCON or other console replacements is used.

Now I got a hint in MorphOS Forum (always a very good Source for Implementation hints) to set the console in RAW: mode (using SetMode()) and then just read from the console the pressed keys. If console in raw mode, one can read cursor keys and F keys from the console.

I tried that and on MorphOS and AmigaOS3 it works well, Read blocks until a Button is pressed. But AROS of course is different again 😉 it always returns a Value sometimes 185, sometimes 184, not really know what that means. I thought about some kind of timer event but this should look different.

But finally it works, mapped some keys like F-keys and cursor. Also worked on the output gotoxy and colors, the colors are a little bit tricky, because the Amiga console only supports the first 8 pens (as far as I see it) so I cannot just ObtainBestPen, and the first 8 Pens are usually fixed and not the colors I need. I try to change them with ObtainPen but when they are already taken I just try to find one which has a close color, which does not work very well. Solution unknown.

I compile the example of ReadKey as example3.pas and compiled a little RPG-Game I found which is console based, which is a good testcase for colors and GotoXY. Of course looks not the same as in the DOS console but it is usable.