From 2d04cacc5322951f187bb17e017c12920ac8ebe2 Mon Sep 17 00:00:00 2001
From: Mark Zbikowski
Date: Thu, 25 Apr 2024 21:24:10 +0100
Subject: MZ is back!

---
 v4.0/src/CMD/FDISK/FDISK.SKL | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 v4.0/src/CMD/FDISK/FDISK.SKL

(limited to 'v4.0/src/CMD/FDISK/FDISK.SKL')

diff --git a/v4.0/src/CMD/FDISK/FDISK.SKL b/v4.0/src/CMD/FDISK/FDISK.SKL
new file mode 100644
index 0000000..b50bb13
--- /dev/null
+++ b/v4.0/src/CMD/FDISK/FDISK.SKL
@@ -0,0 +1,18 @@
+:util FDISK                ;utility name
+:class A                   ;system messages
+;
+:use 1 COMMON1             ;"Incorrect DOS version"
+:use 2 COMMON2             ;"Insufficient Memory"
+:use 3 COMMON3             ;"Internal error loading messages"
+:use 8 EXTEND87            ;"Invalid parameter"
+:def 9  "Y",0              ;"Y"
+:def 10 "N",0              ;"N"
+;
+:class B
+:def 4 "Cannot FDISK with network loaded",CR,LF
+:def 5 "No fixed disks present",CR,LF
+:def 6 "Error reading fixed disk",CR,LF
+:def 7 "Error writing fixed disk",CR,LF
+;
+;
+:end
-- 
cgit v1.2.3