From d80736ab6e8e3cad2f1a30c6eaba2d6883dbe967 Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Sat, 26 Aug 2017 20:31:40 +0200 Subject: Remove AmForth --- .../common/lib/hardware/1wire-crc8-test.frt | 54 ---------------------- 1 file changed, 54 deletions(-) delete mode 100644 amforth-6.5/common/lib/hardware/1wire-crc8-test.frt (limited to 'amforth-6.5/common/lib/hardware/1wire-crc8-test.frt') diff --git a/amforth-6.5/common/lib/hardware/1wire-crc8-test.frt b/amforth-6.5/common/lib/hardware/1wire-crc8-test.frt deleted file mode 100644 index 1c628d6..0000000 --- a/amforth-6.5/common/lib/hardware/1wire-crc8-test.frt +++ /dev/null @@ -1,54 +0,0 @@ -\ 2013-01-21 EW - -marker --start-- - -include ewlib/1wire_crc8.fs - -\ testdata from Dallas Application Note 27 -\ A2 00 00 00 01 B8 1C 02 -\ ^^crc fam.code^^ - -: run_test - $A2 \ crc - $00 $00 $00 $01 $B8 $1C $02 \ rom id - #7 \ N - .s - 1w.crc8? if - ." crc ok" - else - ." crc error" - then - cr - $A2 1+ \ WRONG CRC! - $00 $00 $00 $01 $B8 $1C $02 \ rom id - #7 \ N - .s - 1w.crc8? if - ." crc ok" - else - ." crc error" - then - cr - - \ reverse test - $02 $1C $B8 $01 $00 $00 $00 $A2 - #7 .s - 1w.crc8.rev? if - ." crc ok" - else - ." crc error" - then - cr - - $02 $1C $B8 $01 $00 $00 $00 $A2 1+ \ WRONG CRC! - #7 .s - 1w.crc8.rev? if - ." crc ok" - else - ." crc error" - then - cr - - -; - -- cgit v1.2.3