DRDOSLIB-TP/MSDOS.PAS at main · gladir/DRDOSLIB-TP · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
{ @author: Sylvain Maltais (support@gladir.com)
  @created: 2023
  @website(https://www.gladir.com/CODER/DRDOSLIB-TP)
  @abstract(Target: Turbo Pascal 7)
}

Unit MSDOS;

INTERFACE

Const
 MS_P_TERMCPM=$00;
 MS_C_READ=$01;
 MS_C_WRITE=$02;
 MS_A_READ=$03;
 MS_A_WRITE=$04;
 MS_L_WRITE=$05;
 MS_C_RAWIO=$06;
 MS_C_RAWIN=$07;
 MS_C_NOECHO=$08;
 MS_C_WRITESTR=$09;
 MS_C_READSTR=$0A;
 MS_C_STAT=$0B;
 MS_C_FLUSH=$0C;
 MS_DRV_ALLRESET=$0D;
 MS_DRV_SET=$0E;
 MS_F_OPEN=$0F;
 MS_F_CLOSE=$10;
 MS_F_SFIRST=$11;
 MS_F_SNEXT=$12;
 MS_F_DELETE=$13;
 MS_F_READ=$14;
 MS_F_WRITE=$15;
 MS_F_MAKE=$16;
 MS_F_RENAME=$17;
 MS_DRV_GET=$19;
 MS_F_DMAOFF=$1A;
 MS_DRV_ALLOC=$1B;
 MS_DRV_ALLOCSPEC=$1C;
 MS_F_READRAND=$21;
 MS_F_WRITERAND=$22;
 MS_F_SIZE=$23;
 MS_F_RANDREC=$24;
 MS_S_SETINT=$25;
 MS_P_MKPSP=$26;
 MS_F_READBLK=$27;
 MS_F_WRITEBLK=$28;
 MS_F_PARSE=$29;
 MS_T_GETDATE=$2A;
 MS_T_SETDATE=$2B;
 MS_T_GETTIME=$2C;
 MS_T_SETTIME=$2D;
 MS_F_VERIFY=$2E;
 MS_F_DMAGET=$2F;
 MS_S_BDOSVER=$30;
 MS_P_TERMKEEP=$31;
 MS_S_BREAK=$33;
 MS_S_GETINT=$35;
 MS_DRV_SPACE=$36;
 MS_S_COUNTRY=$38;
 MS_X_MKDIR=$39;
 MS_X_RMDIR=$3A;
 MS_X_CHDIR=$3B;
 MS_X_CREAT=$3C;
 MS_X_OPEN=$3D;
 MS_X_CLOSE=$3E;
 MS_X_READ=$3F;
 MS_X_WRITE=$40;
 MS_X_UNLINK=$41;
 MS_X_LSEEK=$42;
 MS_X_CHMOD=$43;
 MS_X_IOCTL=$44;
 MS_X_DUP=$45;
 MS_X_DUP2=$46;
 MS_X_CURDIR=$47;
 MS_M_ALLOC=$48;
 MS_M_FREE=$49;
 MS_M_SETBLOCK=$4A;
 MS_X_EXEC=$4B;
 MS_X_EXIT=$4C;
 MS_X_WAIT=$4D;
 MS_X_FIRST=$4E;
 MS_X_NEXT=$4F;
 MS_F_GETVERIFY=$54;
 MS_F_DATETIME=$56;
 MS_F_ERROR=$59;
 MS_X_MKTEMP=$5A;
 MS_X_MKNEW=$5B;
 MS_F_LOCK=$5C;
 MS_P_GETPSP=$62;
 MS_X_GETCP=$6601;
 MS_X_SETCP=$6602;


IMPLEMENTATION

END.