2020-09-30 16:53:55 +02:00

153 lines
5.4 KiB
Plaintext
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

:util MEM
:class 1
:class A
:use COMMON1 ;Incorrect DOS version
:def 10 CR,LF
:def 11 " Address Name Size Type ",CR,LF
:def 12 " ÄÄÄÄÄÄÄ ÄÄÄÄÄÄÄÄ ÄÄÄÄÄÄ ÄÄÄÄÄÄ",CR,LF
:def 13 " Handle EMS Name Size ",CR,LF
:def 14 " ÄÄÄÄÄÄÄ ÄÄÄÄÄÄÄÄ ÄÄÄÄÄÄ ",CR,LF
:def 15 " %1 %2 %3 %4",CR,LF
:def 16 " %1 %2 %3 ",CR,LF
:def 17 " %1 %2 ",CR,LF ;fix in usa
:def 18 "%1 bytes total conventional memory",CR,LF
:def 19 "%1 bytes available for MS-DOS",CR,LF
:def 20 "%1 largest executable program size",CR,LF
:def 21 "%1 bytes total EMS memory",CR,LF
:def 22 "%1 bytes free EMS memory",CR,LF
:def 23 "%1 bytes total contiguous extended memory",CR,LF
:def 24 "Interrupt Vector",0
:def 25 "ROM Communication Area",0
:def 26 "DOS Communication Area",0
:def 27 "IBMBIO",0
:def 28 "IBMDOS",0
:def 29 "System Data",0
:def 30 "System Program",0
:def 31 "System Device Driver",0
:def 32 "Installed Device Driver",0
:def 33 "%1:",0
:def 34 "%1: - %2:",0
:def 35 "BUFFERS=",0
:def 36 "FILES=",0
:def 37 "FCBS=",0
:def 38 "STACKS=",0
:def 39 "DEVICE=",0
:def 40 "IFS=",0
:def 45 "INSTALL=",0
:def 56 "IBMBIO",0 ;*EGH
:def 57 "IBMDOS",0 ;*EGH
:def 59 "Memory below 640K (Conventional Message)"
:def 60 "Memory above 640K (Upper Memory Blocks)"
:def 61 " Total FREE: "
:def 63 "Name size in decimal size in hex",CR,LF
:def 64 "-------- --------------- -----------",CR,LF
:def 65 "Total bytes avail to programs (Conv + UMB) : %1 %2",CR,LF
:def 66 "Largest executable program size : %1 %2",CR,LF
:def 67 "Largest Loadhigh executable program size : %1 %2",CR,LF
:def 68 "Too much of memory fragmentation; MEM /C cannot be done",CR,LF
:def 69 "SYSTEM"
:def 70 "Total bytes avail to programs : %1 %2",CR,LF
; 300 - 399 reserved for options help messages
:def 300 MEM /?
:def 301 MEM /?
:def 302 MEM /?
:def 303 MEM /?
:def 304 MEM /?
:use 8001 COMMON39 ;Incorrect DOS version
:def 8010 CR,LF
:def 8011 " Address Name Size Type ",CR,LF
:def 8012 " ÄÄÄÄÄÄÄ ÄÄÄÄÄÄÄÄ ÄÄÄÄÄÄ ÄÄÄÄÄÄ",CR,LF
:def 8013 " Handle EMS Name Size ",CR,LF
:def 8014 " ÄÄÄÄÄÄÄ ÄÄÄÄÄÄÄÄ ÄÄÄÄÄÄ ",CR,LF
:def 8015 " %1 %2 %3 %4",CR,LF
:def 8016 " %1 %2 %3 ",CR,LF
:def 8017 " %1 %2 ",CR,LF ;fix in usa
:def 8018 "%1 bytes total conventional memory",CR,LF
:def 8019 "%1 bytes available for MS-DOS",CR,LF
:def 8020 "%1 largest executable program size",CR,LF
:def 8021 "%1 bytes total EMS memory",CR,LF
:def 8022 "%1 bytes free EMS memory",CR,LF
:def 8023 "%1 bytes total contiguous extended memory",CR,LF
:def 8024 "Interrupt Vector",0
:def 8025 "ROM Communication Area",0
:def 8026 "DOS Communication Area",0
:def 8027 "IBMBIO",0
:def 8028 "IBMDOS",0
:def 8029 "System Data",0
:def 8030 "System Program",0
:def 8031 "System Device Driver",0
:def 8032 "Installed Device Driver",0
:def 8033 "%1:",0
:def 8034 "%1: - %2:",0
:def 8035 "BUFFERS=",0
:def 8036 "FILES=",0
:def 8037 "FCBS=",0
:def 8038 "STACKS=",0
:def 8039 "DEVICE=",0
:def 8040 "IFS=",0
:def 8045 "INSTALL=",0
:def 8056 "IBMBIO",0 ;*EGH
:def 8057 "IBMDOS",0 ;*EGH
:def 8059 "Memory below 640K (Conventional Message)"
:def 8060 "Memory above 640K (Upper Memory Blocks)"
:def 8061 " Total FREE: "
:def 8063 "Name size in decimal size in hex",CR,LF
:def 8064 "-------- --------------- -----------",CR,LF
:def 8065 "Total bytes avail to programs (Conv + UMB) : %1 %2",CR,LF
:def 8066 "Largest executable program size : %1 %2",CR,LF
:def 8067 "Largest Loadhigh executable program size : %1 %2",CR,LF
:def 8068 "Too much of memory fragmentation; MEM /C cannot be done",CR,LF
:def 8069 "SYSTEM"
:def 8070 "Total bytes avail to programs : %1 %2",CR,LF
:def 8300 MEM /?
:def 8301 MEM /?
:def 8302 MEM /?
:def 8303 MEM /?
:def 8304 MEM /?
:class B
:def 41 "LASTDRIVE=",0
:def 42 "----------",0
:def 43 " ",0
:def 44 " %1 %2 %3",CR,LF
:def 46 "%1 bytes available contiguous extended memory",CR,LF
:def 47 "System Stacks",0
:def 48 "-- Free --",0
:def 49 "Program",0
:def 50 "Environment",0
:def 51 "Data",0
:def 52 "%1 bytes available XMS memory",0
:def 53 " 64Kb High Memory Area available",CR,LF
:def 54 " High Memory Area in use",CR,LF
:def 55 " MS-DOS resident in High Memory Area",CR,LF
:def 58 " MS-DOS resident in ROM using High Memory Area",CR,LF
:def 62 "FREE",0
:def 400 "ADDDRV",0
:def 8041 "LASTDRIVE=",0
:def 8042 "----------",0
:def 8043 " ",0
:def 8044 " %1 %2 %3",CR,LF
:def 8046 "%1 bytes available contiguous extended memory",CR,LF
:def 8047 "System Stacks",0
:def 8048 "-- Free --",0
:def 8049 "Program",0
:def 8050 "Environment",0
:def 8051 "Data",0
:def 8052 "%1 bytes available XMS memory",0
:def 8053 " 64Kb High Memory Area available",CR,LF
:def 8054 " High Memory Area in use",CR,LF
:def 8055 " MS-DOS resident in High Memory Area",CR,LF
:def 8058 " MS-DOS resident in ROM using High Memory Area",CR,LF
:def 8062 "FREE",0
:def 8400 "ADDDRV",0
:end