mirror of https://github.com/mrkite/regs.git
63 lines
1.1 KiB
Plaintext
63 lines
1.1 KiB
Plaintext
GetLInfoPB struct {
|
|
sfile: ^int8;
|
|
dfile: ^int8;
|
|
parms: ^int8;
|
|
istring: ^int8;
|
|
merr: int8;
|
|
merrf: int8;
|
|
lops: int8;
|
|
kflag: int8;
|
|
mflags: uint32;
|
|
pflags: uint32;
|
|
org: uint32;
|
|
}
|
|
|
|
Shell_GET_LINFO(pb: ^GetLInfoPB) {
|
|
-1, 4, $101
|
|
}
|
|
Shell_SET_LINFO(pb: ^GetLInfoPB) {
|
|
-1, 4, $102
|
|
}
|
|
Shell_GET_LANG(): uint16 {
|
|
-1, 4, $103
|
|
}
|
|
Shell_SET_LANG(lang: uint16) {
|
|
-1, 4, $104
|
|
}
|
|
Shell_ERROR(errnum: uint16) {
|
|
-1, 4, $105
|
|
}
|
|
Shell_SET_VAR(varname: ^int8, value: ^int8) {
|
|
-1, 4, $106
|
|
}
|
|
Shell_VERSION(): uint32 {
|
|
-1, 4, $107
|
|
}
|
|
Shell_READ_INDEXED(varname: ^int8, value: ^int8, index: int16) {
|
|
-1, 4, $108
|
|
}
|
|
Shell_INIT_WILDCARD(file: ^int8, flags: int16) {
|
|
-1, 4, $109
|
|
}
|
|
Shell_NEXT_WILDCARD(nextfile: ^int8) {
|
|
-1, 4, $10a
|
|
}
|
|
Shell_GET_VAR(varname: ^int8, value: ^int8) {
|
|
-1, 4, $10b
|
|
}
|
|
Shell_EXECUTE(flag: int16, comm: ^int8) {
|
|
-1, 4, $10d
|
|
}
|
|
Shell_DIRECTION(device: int16, direct: ^int16) {
|
|
-1, 4, $10f
|
|
}
|
|
Shell_REDIRECT(device: int16, app: int16, file: ^int8) {
|
|
-1, 4, $110
|
|
}
|
|
Shell_STOP(): int16 {
|
|
-1, 4, $113
|
|
}
|
|
Shell_WRITE_CONSOLE(ochar: int16) {
|
|
-1, 4, $11a
|
|
}
|