I use this code to receive string longer then 255 chars
Code:FOR i=0 TO 799 HSEERIN 1, TimeOutLabel,[Chr] ' get char IF Chr="@" THEN GOTO Done 'End of data ELSE DAT[i]=Chr ' put char in array ENDIF NEXT i Done: DAT[i]=0 'End of string
|
Re: Hserin amount
I use this code to receive string longer then 255 chars
Code:FOR i=0 TO 799 HSEERIN 1, TimeOutLabel,[Chr] ' get char IF Chr="@" THEN GOTO Done 'End of data ELSE DAT[i]=Chr ' put char in array ENDIF NEXT i Done: DAT[i]=0 'End of string
Members who have read this thread : 0You do not have permission to view the list of names.
Posting Permissions
Bookmarks