Merge telemon24 and telemon30 into telestrat target.

Cleaning, and replace tab to spaces
Converting hex lowercase value into uppercase char.
Changing := and = when it was needed

libsrc/telestrat/read.s

@@ -0,0 +1,43 @@
+;
+; jede jede@oric.org 2017-01-22
+;
+
+
+        .FEATURE 		c_comments,labels_without_colons,pc_assignment, loose_char_term
+        .export         _read
+        
+        .import         popax
+        
+        .include        "zeropage.inc"
+        .include        "telestrat.inc"
+		
+;		int read (int fd, void* buf, unsigned count);
+
+.proc   _read
+    sta     ptr1 ; count
+    stx     ptr1+1 ; count
+    jsr     popax ; get buf
+
+    sta     PTR_READ_DEST
+    stx     PTR_READ_DEST+1
+    sta     ptr2 ; in order to calculate nb of bytes read
+    stx     ptr2+1 ;
+    
+    ; jsr popax ; fp pointer don't care in this version
+
+    lda     ptr1 ; 
+    ldy     ptr1+1 ;
+    BRK_TELEMON     XFREAD ; calls telemon30 routine
+    ;  compute nb of bytes read
+    lda     PTR_READ_DEST+1
+    sec
+    sbc     ptr2+1
+    tax			
+    lda     PTR_READ_DEST
+    sec
+    sbc     ptr2
+    ; Here A and X contains number of bytes read
+    rts
+.endproc
+
+