well, it was a fifty-fifty shot for me... so We'll drop the #2... /***********************************************************************/ _Frank ="NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR" 'Pipe ( End ΒΌ ) ', /* */ 'Literal '_Frank'| ', /* */ 'Specs ', /* /NICDEF/ */ ' s: w2 . ', /* Starting address */ ' z: w6 . ', /* Count, NNx or NN? */ ' Set ( #0:=0 ; #1:=x2d(s) ) ', /* start with... */ ' While z>#0 Do ', /* Loop for... */ ' Print #1 d2x 01.04 Right ', /* */ ' W1-* nW ', /* */ ' Write ', /* */ ' Set ( #0+=1 ; #1+=1 ) ', /* */ ' Done |', /* */ ' Console ', /* */ ; /******************************/
On Tue, Sep 25, 2012 at 11:17 AM, Frank M. Ramaekers <[email protected]>wrote: > When I ran this I got 6 extra: > > 1F80 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F81 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F82 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F83 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F84 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F85 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F86 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F87 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F88 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F89 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F8A NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F8B NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F8C NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F8D NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F8E NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F8F NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F90 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F91 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F92 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F93 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F94 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F95 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F96 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F97 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > 1F98 NICDEF 1F80 TYPE HIPER DEV 19 LAN SYSTEM TORCHMAR > > Oh, the DEV specification is decimal not HEX. > > > Frank M. Ramaekers Jr. > -- > Gregg Reed > "No Plan, survives execution" >
