PRINT

Top  Previous  Next

Action

Send output to the RS-232 port.

Writes a string to a file.

 

 

Syntax

PRINT [#channel , ] var ; " constant"

 

 

Remarks

Var

The variable or constant to print.

 

You can use a semicolon (;) to print more than one variable at one line.

When you end a line with a semicolon, no linefeed and carriage return will be added.

 

The PRINT routine can be used when you have a RS-232 interface on your uP.

The RS-232 interface can be connected to a serial communication port of your computer.

This way you can use a terminal emulator as an output device.

You can also use the build in terminal emulator.

 

AVR-DOS

The AVR-DOS file system also supports PRINT. But in that case, only strings can be written to disk.

When you need to print to the second hardware UART, or to a software UART, you need to specify a channel : PRINT #1, "test"

The channel must be opened first before you can print to it. Look at OPEN and CLOSE for more details about the optional channel. For the first hardware UART, there is no need to use channels.

PRINT " test" will always use the first hardware UART.

 

 

See also

INPUT,OPEN , CLOSE , SPC

 

 

Example

'-----------------------------------------------------------------------------------------

'name                     : print.bas

'copyright                : (c) 1995-2005, MCS Electronics

'purpose                  : demo: PRINT, HEX

'micro                    : Mega48

'suited for demo          : yes

'commercial addon needed  : no

'-----------------------------------------------------------------------------------------

 

$regfile = "m48def.dat"                                   ' specify the used micro

$crystal = 4000000                                         ' used crystal frequency

$baud = 19200                                               ' use baud rate

$hwstack = 32                                               ' default use 32 for the hardware stack

$swstack = 10                                               ' default use 10 for the SW stack

$framesize = 40                                             ' default use 40 for the frame space

 

Dim A As Byte , B1 As Byte , C As Integer , S As String * 4

A = 1

Print "print variable a " ; A

Print                                                     'new line

Print "Text to print."                                     'constant to print

 

 

B1 = 10

Print Hex(b1)                                             'print in hexa notation

C = &HA000                                                 'assign value to c%

Print Hex(c)                                               'print in hex notation

Print C                                                     'print in decimal notation

 

C = -32000

Print C

Print Hex(c)

Rem Note That Integers Range From -32767 To 32768

 

Print "You can also use multiple" _

; "lines using _"

Print "use it for long lines"

'From version 1.11.6.4 :

A = &B1010_0111

Print Bin(a)

S = "1001"

A = Binval(s)

Print A                                                     '9 dec

End