V309

[fast-forth/master.git] / config / SendFile.ttl

diff --git a/config/SendFile.ttl b/config/SendFile.ttl
index eb4e62e..84cf92a 100644 (file)
--- a/config/SendFile.ttl
+++ b/config/SendFile.ttl
@@ -22,12 +22,13 @@ showtt 0            ; close teraterm windows
 ; DEVICE ID TEST
 ; ==============
 
-sendln 'CODE ?ID';                              CODE ?ID
-sendln 'CMP #0,R14 0<> IF SUB &$1A04,R14 THEN'; CMP #0,TOS 0<> IF SUB &DEVICEID,TOS THEN
-sendln 'COLON ';                                COLON
-sendln '$1B EMIT $63 EMIT';                     $1B EMIT $63 EMIT   \ send 'ESC c' (clear screen)
-sendln 'CR ABORT" Device'39's ID mismatch!" ' ; CR ABORT" Device's ID mismatch!"
-sendln 'PWR_STATE ;' ;                          PWR_STATE ; 
+sendln 'CODE ?ID'                               ; CODE ?ID
+sendln 'CMP #0,R14 0<> IF SUB &$1A04,R14 THEN'  ; CMP #0,TOS 0<> IF SUB &DEVICEID,TOS THEN
+sendln 'COLON '                                 ; COLON
+sendln '$1B EMIT $63 EMIT'                      ; $1B EMIT $63 EMIT   \ send 'ESC c' (clear screen)
+;sendln '13 EMIT $10 EMIT'                      ; CR
+sendln ' ABORT" Device'39's ID mismatch!" '     ; ABORT" Device's ID mismatch!"
+sendln 'RST_RET ;'                              ; RST_RET ; 
 
 sendln param5 ' ?ID NOECHO'    ; send: %deviceID% ?ID NOECHO