21.33FF kernel version string interface (Developers)
> > How to get this version string in Pascal?
>
> :)
>
> function GetFreeDosVer : pchar; assembler;
> asm
> > > mov ax,$33ff ; get FreeDOS version string pointer
> > > xor dx, dx
> > > int $21 ; returns DX AX
> > > test dx, dx
> > > jnz @gotname
> xor ax, ax
> mov dx, ax
> @gotname:
> end;
Uses Strings;
Begin
Writeln(StrPas(GetFreeDosVer));
End.
Under MS-DOS this function returns a string of random characters. Shouldn't it return empty result under DOS other than FreeDOS?
---
echo g=ffff:0|debug>nul
Complete thread:
- How to detect FreeDOS kernel from Turbo Pascal program? - rosegondon, 14.01.2022, 22:39 (Developers)
- How to detect FreeDOS kernel from Turbo Pascal program? - mceric, 15.01.2022, 00:22
- How to detect FreeDOS kernel from Turbo Pascal program? - rosegondon, 15.01.2022, 16:20
- How to detect FreeDOS kernel from Turbo Pascal program? - Rugxulo, 19.01.2022, 01:05
- 21.33FF kernel version string interface - ecm, 15.01.2022, 17:32
- 21.33FF kernel version string interface - rosegondon, 17.01.2022, 20:06
- 21.33FF kernel version string interface - DosWorld, 18.01.2022, 02:54
- 21.33FF kernel version string interface - rosegondon, 18.01.2022, 09:06
- 21.33FF kernel version string interface - Laaca, 18.01.2022, 14:25
- 21.33FF kernel version string interface - tkchia, 18.01.2022, 15:30
- 21.33FF kernel version string interface - DosWorld, 18.01.2022, 16:44
- 21.33FF kernel version string interface - rosegondon, 18.01.2022, 19:14
- 21.33FF kernel version string interface - rosegondon, 18.01.2022, 09:06
- 21.33FF kernel version string interface - DosWorld, 18.01.2022, 02:54
- 21.33FF kernel version string interface - rosegondon, 17.01.2022, 20:06
- How to detect FreeDOS kernel from Turbo Pascal program? - Laaca, 18.01.2022, 19:06
- How to detect FreeDOS kernel from Turbo Pascal program? - Rugxulo, 19.01.2022, 00:57
- How to detect FreeDOS kernel from Turbo Pascal program? - Laaca, 19.01.2022, 10:33
- How to detect FreeDOS kernel from Turbo Pascal program? - Rugxulo, 19.01.2022, 00:57
- How to detect FreeDOS kernel from Turbo Pascal program? - rosegondon, 15.01.2022, 16:20
- How to detect FreeDOS kernel from Turbo Pascal program? - Oso2k, 15.01.2022, 00:24
- How to detect FreeDOS kernel from Turbo Pascal program? - Laaca, 15.01.2022, 11:09
- How to detect FreeDOS kernel from Turbo Pascal program? - mceric, 15.01.2022, 12:29
- How to detect FreeDOS kernel from Turbo Pascal program? - mceric, 15.01.2022, 00:22