21.33FF kernel version string interface (Developers)
Hello rosegondon,
> > 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?
The above implementation under MS-DOS will return a null pointer (0:0) — which in general may not point to an empty string. You probably want to check that the returned pointer is not a null pointer.
Thank you!
---
https://gitlab.com/tkchia · https://codeberg.org/tkchia · 😴 "MOV AX,0D500H+CMOS_REG_D+NMI"
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