I wrote Pascal for 8080 in 1976 and Finnish Army even paid some money for it.
I was truly disappointed that Turbo Pascal did not copy my handy PORT-metavariable. You can write & read IO-ports without any extra hässle:
I wrote Pascal for 8080 in 1976 and Finnish Army even paid some money for it.
I was truly disappointed that Turbo Pascal did not copy my handy PORT-metavariable. You can write & read IO-ports without any extra hässle:
Turbo Pascal supported port array though: https://archive.org/details/bitsavers_borlandturVersion3.0Re...
Here is the first function of your example in TP3: procedure DataOut; begin while (Port[$f5] and 1) = 0 do; port[$f4] := Data; end,
Must be later improvement, because I whined about it in Usenet.
Originally you had to write inline assembly.