Revision as of 22:29, 18 May 2020 (view source) M2000 (talk \| contribs) (→‎{{header\|M2000 Interpreter}}) ← Older edit		Revision as of 22:40, 18 May 2020 (view source) M2000 (talk \| contribs) (→‎{{header\|M2000 Interpreter}}) Newer edit →
Line 1,713: If exist(k,Left$(b$, 10)) then m++ : where=eval(k) exp$=format$("Duplicate for {0} at {1}",iwhere, ~~where~~i)+nl$ Else Append k, Left$(b$, 10):=i Line 1,735: <pre> Records: 5471 Duplicate for 8584 at 8485 Duplicate for ~~456~~455 at ~~455~~456 Duplicate for ~~820~~819 at ~~819~~820 Duplicate for ~~1184~~1183 at ~~1183~~1184 Duplicate for ~~1911~~1910 at ~~1910~~1911 Duplicates 5 Valid Records 5017 </pre>

Text processing/2 (view source)