[Turbo Pascal] Q&A official thread

As far as I remember, arrays in Pascal have the size in element 0 and are thus not zero-based, but 1-based for indexing.

Sorry to interrupt thread flow ... but ...
since AdlibTrackerII is coded on Free Pascal FPC Pascal, can some of good will do a port for MSX + OPL4?

Hi...

The laamasari libs define 0 as the first index in the array:
sprite.inc file:
{This code contains sprite handling routines and variables etc.}
{Kari Lammassaari 1997
- Type Sprite8Type = Array[0..7] Of Byte;

anyways i'll keep on working ... Thanks for answer...

I think I found the problem: somehow the compiler cannot handle the hexadecimal values you are assigning. However, the error.txt it creates, mixes up the line number and the error number, therefore it seems a nonsense error. Somehow a compiler bug it seems, as far as I know it is perfectly legitimate code. There are 2 solutions you can try:
1) convert the hex to decimal in the code
2) some better programming. It is much quicker and robust to put all the unique sprite strings in constants like so:
CONST FighterType1: Sprite8Type=($FF,$FF,$7e,$7e,$7e,$7e,$FF,$FF);
and initialize with:
setspritepattern(0, FighterType1);

Or assign to an array member:
EnemySprite[15]:=FighterType1;
...

I feel your pain. That's why I started out with working on existing code that I could actually compile. And the reliability of many libraries is questionable. The samples/demo's that are included: none of them could compile. Only snowfighter. Kind of depressing, as there's lot of things possible.
The last possibility with your code: try it with turbo pascal 3.3 compiler in MSX-DOS itself. Than we know it's a bug in 3.3f (which is a hacked version after all)