Add some printing with NSTK features

brewery/gfwtr.txt

@@ -1,24 +1,44 @@
-LBL "GFWtr"
+00 { 189-Byte Prgm }
-INPUT "Asslg l"
+01▸LBL "GFWtr"
-INPUT "Malz kg"
+02 ADV
-2.7
+03 "---GF Wasser---"
-×
+04 PRA
-3.5
+05 CLA
-+
+06 DATE
-STO 01
+07 ADATE
-RCL "Asslg l"
+08 ├" "
-5
+09 TIME
-+
+10 ATIME24
-RCL 01
+11 PRA
--
+12 CLA
-RCL "Malz kg"
+13 DROPN 2
-0.8
+14 INPUT "Asslg l"
-×
+15 INPUT "Malz kg"
-+
+16 2,7
-STO 02
+17 ×
-"H Guss: "
+18 3,5
-ARCL 01
+19 +
-├"[LF]N Guss: "
+20 STO 01
-ARCL 02
+21 RCL "Asslg l"
-AVIEW
+22 5
-END
+23 +
+24 RCL 01
+25 -
+26 RCL "Malz kg"
+27 0,8
+28 ×
+29 +
+30 STO 02
+31 "Ausschlag= "
+32 ARCL "Asslg l"
+33 ├" l[LF]Malz= "
+34 ARCL "Malz kg"
+35 ├" kg"
+36 PRA
+37 "Hauptguss= "
+38 ARCL 01
+39 ├" l[LF]Nachguss= "
+40 ARCL 02
+41 ├" l"
+42 AVIEW
+43 .END.

diving/mod.txt

@@ -1,24 +1,45 @@
-LBL "MOD"
+00 { 140-Byte Prgm }
-100
+01▸LBL "MOD"
-÷
+02 ADV
-STO 01
+03 "----- Nitrox MO"
-1.4
+04 ├"D -----"
-RCL 01
+05 PRA
-÷
+06 CLA
-1
+07 DATE
--
+08 ADATE
-10
+09 TIME
-×
+10 ├" "
-"MOD1,4= "
+11 ATIME24
-ARCL ST X
+12 PRA
-1.6
+13 CLA
-RCL 01
+14 DROPN 2
-÷
+15 ├"[LF]EAN= "
-1
+16 "EAN= "
--
+17 ARCL ST X
-10
+18 ├" %"
-×
+19 PRA
-├"[LF]MOD1,6= "
+20 100
-ARCL ST X
+21 ÷
-AVIEW
+22 STO 01
-END
+23 1,4
+24 RCL 01
+25 ÷
+26 1
+27 -
+28 10
+29 ×
+30 "MOD1,4= "
+31 ARCL ST X
+32 ├" m"
+33 1,6
+34 RCL 01
+35 ÷
+36 1
+37 -
+38 10
+39 ×
+40 ├"[LF]MOD1,6= "
+41 ARCL ST X
+42 ├" m"
+43 AVIEW
+44 END