From 0f35ae663b256a187a3ab139a2d5dcfa2a53abc8 Mon Sep 17 00:00:00 2001
From: Leo C <erbl259-lmu@yahoo.de>
Date: Sun, 9 Dec 2018 21:50:32 +0100
Subject: [PATCH] Remove vars $, Z, fix var T

---
 ddt180.z80            | 12 ++----------
 doc/ddt180-ref-cb.txt | 15 ++++++++-------
 2 files changed, 10 insertions(+), 17 deletions(-)

diff --git a/ddt180.z80 b/ddt180.z80
index 386bad7..4f167f6 100644
--- a/ddt180.z80
+++ b/ddt180.z80
@@ -108,7 +108,6 @@ reg.iff:
 	db	0f3h
 	db	0c3h
 reg.pc:	dw	TPA
-var.$:	dw	0000h
 
 cmd_rpt:dw	mainloop
 
@@ -213,7 +212,6 @@ p_msg_error:
 mainloop:
 	ld sp,stack
 	ld hl,(reg.pc)
-	ld (var.$),hl
 	call bp_clr_temporary
 	ld hl,(cmd_rpt)
 	ld de,mainloop
@@ -944,7 +942,7 @@ do_factor:
 	call get.number
 	ret nc
 	inc de
-	ld hl,(BDOS+1)
+	ld hl,ddtz_base-1
 	cp 'T'
 	ret z
 	ld hl,(high_load)
@@ -956,12 +954,6 @@ do_factor:
 	ld hl,TPA
 	cp 'L'
 	ret z
-	ld hl,(var.$)
-	cp '$'
-	ret z
-	ld hl,ddtz_base
-	cp 'Z'
-	ret z
 	cp '-'
 	jr z,fact_factneg
 	cp '~'
@@ -2388,7 +2380,7 @@ p_max_high:
 	call out_hl
 	call pstr_inl
 	DC	'  Top = '
-	ld hl,(BDOS+1)
+	ld hl,ddtz_base-1
 	call out_hl
 	jp crlf
 
diff --git a/doc/ddt180-ref-cb.txt b/doc/ddt180-ref-cb.txt
index e96b124..248ede1 100644
--- a/doc/ddt180-ref-cb.txt
+++ b/doc/ddt180-ref-cb.txt
@@ -221,13 +221,14 @@ Benutzer angepaßt werden können.
 
 Adr   Default      Bedeutung
 --------------------------------------------------------------------
-Z3    'RST30'      Opcode für Breakpoint (RST8 - RST38 möglich)
-Z4    'NOP'        Wird beim Entritt in DDTZ ausgeführt. Kann durch
+Z4    'RST30'      Opcode für Breakpoint (RST8 - RST38 möglich)
+Z5    'NOP'        Wird beim Entritt in DDTZ ausgeführt. Kann durch
                    EI oder DI Opcode (FB/F3) ersetzt werden.
-Z5    'RET'        Nicht ändern!
-Z6    'JP BDOS'    Nicht ändern!                                        |
-Z9    80  (50H)    Bildschirmbreite                                     |
-ZA    16  (10H)    Maximal erlaubte Symbol-Länge                        |
-ZB    00           Bit 0=1: Gross/Kleinschrift von Symbolen beachten    |
+Z6    'RET'        Nicht ändern!
+Z7    'JP BDOS'    Nicht ändern!                                        |
+ZA    80  (50H)    Bildschirmbreite                                     |
+ZB    16  (10H)    Maximal erlaubte Symbol-Länge                        |
+ZC    00           Bit 0=1: Gross/Kleinschrift von Symbolen beachten    |
                    Bit 1=1: Symbole beim Laden konvertieren             |
                    Bit 2=1: In Kleinbuchstaben konvertieren             |
+
-- 
2.39.2