Admin at 21:33, 11 February 2013

2013-02-11T21:33:12Z

Admin: Created page with "= Action = Writes a byte to the hardware or software UART. Writes data to a file opened in BINARY mode. &nbs..."

2013-02-11T21:31:48Z

Created page with "= Action = Writes a byte to the hardware or software UART. Writes data to a file opened in BINARY mode. &nbs..."

New page

= Action =

Writes a byte to the hardware or software UART.

Writes data to a file opened in BINARY mode.

 

 

= Syntax =

PUT #channel, var

PUT #channel, var ,[pos] [,length]

 

 

= Remarks =

PUT in combination with the software/hardware UART is provided for compatibility with BASCOM-8051. It writes one byte

 

 

PUT in combination with the AVR-DOS file system is very flexible and versatile. It works on files opened in BINARY mode and you can write all data types.
<div style="padding: 0px; margin: 0px 0px 0px 4px;">
{| width="615" cellspacing="0" cellpadding="1" border="1" style="border: 2px solid rgb(0, 0, 0); border-spacing: 0px; border-collapse: collapse;"
|- style="vertical-align: top;"
| valign="top" width="13%" style="width: 76px; border: 1px solid rgb(0, 0, 0);" |
#channel

| valign="top" width="100%" style="width: 530px; border: 1px solid rgb(0, 0, 0);" |
A channel number, which

identifies an opened file. This can be a hard coded constant or a variable.

|- style="vertical-align: top;"
| valign="top" width="13%" style="width: 76px; border: 1px solid rgb(0, 0, 0);" |
Var

| valign="top" width="100%" style="width: 530px; border: 1px solid rgb(0, 0, 0);" |
The variable or variable array that will be written to the file

|- style="vertical-align: top;"
| valign="top" width="13%" style="width: 76px; border: 1px solid rgb(0, 0, 0);" |
Pos

| valign="top" width="100%" style="width: 530px; border: 1px solid rgb(0, 0, 0);" |
This is an optional parameter that may be used to specify the position where the data must be written. This must be a long variable.

|- style="vertical-align: top;"
| valign="top" width="13%" style="width: 76px; border: 1px solid rgb(0, 0, 0);" |
Length

| valign="top" width="100%" style="width: 530px; border: 1px solid rgb(0, 0, 0);" |
This is an optional parameter that may be used to specify how many bytes must be written to the file.

|}
</div>
 

By default you only need to provide the variable name. When the variable is a byte, 1 byte will be written. When the variable is a word or integer, 2 bytes will be written. When the variable is a long or single, 4 bytes will be written. When the variable is a string, the number of bytes that will be written is equal to the dimensioned size of the string. DIM S as string * 10 , would write 10 bytes.

 

Note that when you specify the length for a string, the maximum length is 255. The maximum length for a non-string array is 65535.

 

 

= Example =

PUT #1, var

PUT #1, var , , 2  ' write 2 bytes at default position

PUT #1, var ,PS, 2  ' write 2 bytes at location storied in variable PS

 

 

= See also =

[http://avrhelp.mcselec.com/initfilesystem.htm INITFILESYSTEM] , [http://avrhelp.mcselec.com/open.htm OPEN] , [http://avrhelp.mcselec.com/close.htm CLOSE], [http://avrhelp.mcselec.com/flush.htm FLUSH] , [http://avrhelp.mcselec.com/print.htm PRINT], [http://avrhelp.mcselec.com/line_input.htm LINE INPUT], [http://avrhelp.mcselec.com/loc.htm LOC], [http://avrhelp.mcselec.com/lof.htm LOF] , [http://avrhelp.mcselec.com/eof.htm EOF] , [http://avrhelp.mcselec.com/freefile.htm FREEFILE] , [http://avrhelp.mcselec.com/fileattr.htm FILEATTR] , [http://avrhelp.mcselec.com/seek.htm SEEK] , [http://avrhelp.mcselec.com/bsave.htm BSAVE] ,[http://avrhelp.mcselec.com/bload.htm BLOAD] , [http://avrhelp.mcselec.com/kill.htm KILL] , [http://avrhelp.mcselec.com/diskfree.htm DISKFREE] , [http://avrhelp.mcselec.com/disksize.htm DISKSIZE] , [http://avrhelp.mcselec.com/get.htm GET], [http://avrhelp.mcselec.com/filedate.htm FILEDATE] , [http://avrhelp.mcselec.com/filetime.htm FILETIME] , [http://avrhelp.mcselec.com/filedatetime.htm FILEDATETIME] , [http://avrhelp.mcselec.com/dir.htm DIR] , [http://avrhelp.mcselec.com/filelen.htm FILELEN] , [http://avrhelp.mcselec.com/write.htm WRITE] , [http://avrhelp.mcselec.com/input.htm INPUT], [http://avrhelp.mcselec.com/avr_dos_file_system.htm AVR-DOS File system]

 

 

 

= ASM =

 
<div style="padding: 0px; margin: 0px 0px 0px 4px;">
{| width="628" cellspacing="0" cellpadding="1" border="1" style="border: 2px solid rgb(0, 0, 0); border-spacing: 0px; border-collapse: collapse;"
|- style="vertical-align: top;"
| valign="top" width="100%" style="width: 482px; border: 1px solid rgb(0, 0, 0);" |
current position

| valign="top" width="100%" style="width: 137px; border: 1px solid rgb(0, 0, 0);" |
Goto new position first

|- style="vertical-align: top;"
| valign="top" width="100%" style="width: 482px; border: 1px solid rgb(0, 0, 0);" |
Byte:

| valign="top" width="100%" style="width: 137px; border: 1px solid rgb(0, 0, 0);" |
 

|- style="vertical-align: top;"
| valign="top" width="100%" style="width: 482px; border: 1px solid rgb(0, 0, 0);" |
_FilePutRange_1

Input:

r24: File number

X: Pointer to variable

T-Flag cleared

| valign="top" width="100%" style="width: 137px; border: 1px solid rgb(0, 0, 0);" |
_FilePutRange_1

Input:

r24: File number

X: Pointer to variable

r16-19 (A): New position (1-based)

T-Flag Set

|- style="vertical-align: top;"
| valign="top" width="100%" style="width: 482px; border: 1px solid rgb(0, 0, 0);" |
Word/Integer:

| valign="top" width="100%" style="width: 137px; border: 1px solid rgb(0, 0, 0);" |
 

|- style="vertical-align: top;"
| valign="top" width="100%" style="width: 482px; border: 1px solid rgb(0, 0, 0);" |
_FilePutRange_2

Input:

r24: File number

X: Pointer to variable

T-Flag cleared

| valign="top" width="100%" style="width: 137px; border: 1px solid rgb(0, 0, 0);" |
_FilePutRange_2

Input:

r24: File number

X: Pointer to variable

r16-19 (A): New position (1-based)

T-Flag Set

|- style="vertical-align: top;"
| valign="top" width="100%" style="width: 482px; border: 1px solid rgb(0, 0, 0);" |
Long/Single:

| valign="top" width="100%" style="width: 137px; border: 1px solid rgb(0, 0, 0);" |
 

|- style="vertical-align: top;"
| valign="top" width="100%" style="width: 482px; border: 1px solid rgb(0, 0, 0);" |
_FilePutRange_4

Input:

r24: File number

X: Pointer to variable

T-Flag cleared

| valign="top" width="100%" style="width: 137px; border: 1px solid rgb(0, 0, 0);" |
_FilePutRange_4

Input:

r24: File number

X: Pointer to variable

r16-19 (A): New position (1-based)

T-Flag Set

|- style="vertical-align: top;"
| valign="top" width="100%" style="width: 482px; border: 1px solid rgb(0, 0, 0);" |
String (<= 255 Bytes) with fixed length

| valign="top" width="100%" style="width: 137px; border: 1px solid rgb(0, 0, 0);" |
 

|- style="vertical-align: top;"
| valign="top" width="100%" style="width: 482px; border: 1px solid rgb(0, 0, 0);" |
_FilePutRange_Bytes

Input:

r24: File number

r20: Count of Bytes

X: Pointer to variable

T-Flag cleared

| valign="top" width="100%" style="width: 137px; border: 1px solid rgb(0, 0, 0);" |
_FilePutRange_Bytes

Input:

r24: File number

r20: Count of bytes

X: Pointer to variable

r16-19 (A): New position (1-based)

T-Flag Set

|- style="vertical-align: top;"
| valign="top" width="100%" style="width: 482px; border: 1px solid rgb(0, 0, 0);" |
Array (> 255 Bytes) with fixed length

| valign="top" width="100%" style="width: 137px; border: 1px solid rgb(0, 0, 0);" |
 

|- style="vertical-align: top;"
| valign="top" width="100%" style="width: 482px; border: 1px solid rgb(0, 0, 0);" |
_FilePutRange

Input:

r24: File number

r20/21: Count of Bytes

X: Pointer to variable

T-Flag cleared

| valign="top" width="100%" style="width: 137px; border: 1px solid rgb(0, 0, 0);" |
_FilePutRange

Input:

r24: File number

r20/21: Count of bytes

X: Pointer to variable

r16-19 (A): New position (1-based)

T-Flag Set

|}
</div>
 

Output from all kind of usage:

r25: Error Code

C-Flag on Error

 

 

= Example =

 <source lang="bascomavr">
'for the binary file demo we need some variables of different types
Dim B AsByte, W AsWord, L AsLong, Sn AsSingle, Ltemp AsLong
Dim Stxt AsString* 10
B = 1 : W = 50000 : L = 12345678 : Sn = 123.45 : Stxt ="test"

'open the file in BINARY mode
Open "test.biN" For Binary As#2
Put#2 , B ' write a byte
Put#2 , W ' write a word
Put#2 , L ' write a long
Ltemp =Loc(#2)+ 1 ' get the position of the next byte
Print Ltemp ;" LOC"' store the location of the file pointer
Print Seek(#2);" = LOC+1"

PrintLof(#2);" length of file"
PrintFileattr(#2);" file mode"' should be 32 for binary
Put#2 , Sn ' write a single
Put#2 , Stxt ' write a string

Flush#2 ' flush to disk
Close#2

'now open the file again and write only the single
Open "test.bin" For Binary As #2
L = 1 'specify the file position
B =Seek(#2 , L)' reset is the same as using SEEK #2,L
Get#2 , B ' get the byte
Get#2 , W ' get the word
Get#2 , L ' get the long
Get#2 , Sn ' get the single
Get#2 , Stxt ' get the string
Close#2
</source> {{Languages}}

[[Category:BASCOM Language Reference]]

@@ Line 88: / Line 88: @@
 = <span class="f_Header">See also</span> =
-[http://avrhelp.mcselec.com/initfilesystem.htm INITFILESYSTEM]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/open.htm OPEN]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/close.htm CLOSE],&nbsp;[http://avrhelp.mcselec.com/flush.htm FLUSH]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/print.htm PRINT],&nbsp;[http://avrhelp.mcselec.com/line_input.htm LINE INPUT],&nbsp;[http://avrhelp.mcselec.com/loc.htm LOC],&nbsp;[http://avrhelp.mcselec.com/lof.htm LOF]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/eof.htm EOF]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/freefile.htm FREEFILE]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/fileattr.htm FILEATTR]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/seek.htm SEEK]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/bsave.htm BSAVE]&nbsp;,[http://avrhelp.mcselec.com/bload.htm BLOAD]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/kill.htm KILL]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/diskfree.htm DISKFREE]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/disksize.htm DISKSIZE]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/get.htm GET],&nbsp;[http://avrhelp.mcselec.com/filedate.htm FILEDATE]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/filetime.htm FILETIME]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/filedatetime.htm FILEDATETIME]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/dir.htm DIR]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/filelen.htm FILELEN]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/write.htm WRITE]&nbsp;,&nbsp;[http://avrhelp.mcselec.com/input.htm INPUT],&nbsp;[http://avrhelp.mcselec.com/avr_dos_file_system.htm AVR-DOS File system]
+[[INITFILESYSTEM]] , [[OPEN]] , [[CLOSE]], [[FLUSH]] , [[PRINT]], [[LINE INPUT]], [[LOC]], [[LOF]] , [[EOF]] , [[FREEFILE]] , [[FILEATTR]] , [[SEEK]] , [[BSAVE]] ,[[BLOAD]] , [[KILL]] , [[DISKFREE]] , [[DISKSIZE]] , [[GET]], [[FILEDATE]] , [[FILETIME]] , [[FILEDATETIME]] , [[DIR]] , [[FILELEN]] , [[WRITE]] , [[INPUT]], [[AVR-DOS_File_System|AVR-DOS File system]]
 <span style="font-family: Arial;">&nbsp;</span>

PUT - Revision history

Admin at 21:33, 11 February 2013

Admin: Created page with "= Action = Writes a byte to the hardware or software UART. Writes data to a file opened in BINARY mode. &nbs..."