Picaxe AXE171, Руководство пользователя, Страница: 24 / 25

www.picaxe.com/products/axe171
AXE171 PICAXE-14 Audio Kit © Revolution Education Ltd 2015 v1.1 May be copied for educational use. 24
BASIC
Symbol TX = B.4
Symbol RX = C.3
Symbol BUSY_PIN = pinC.2
Symbol BAUD_FREQ = M8
Symbol BAUD = T9600_8
Symbol cmd = b0
Symbol arg = w1 ; b3:b2
Symbol arg.lsb = b2
Symbol arg.msb = b3
Symbol varA = w2
High TX ; set TX pin high for idle high serial
Pause 2000
SerTxd ( "Starting" , CR , LF )
SerTxd ( "Select microSD Card" , CR , LF )
cmd = $09 : arg = $0002 : Gosub Send
Pause 4000
SerTxd ( "Set volume 20" , CR , LF )
cmd = $06 : arg = 20 : Gosub Send
Pause 1000
For varA = 1 To 9
SerTxd ( "Play MP3 folder song 000" , #varA, CR , LF )
cmd = $12 : arg = varA : Gosub Send
Pause 1000
Do While BUSY_PIN = 0
Pause 100
Loop
Next
Sertxd ( "Done" , CR , LF )
Stop
Send:
SetFreq BAUD_FREQ
Pause 10
SerOut TX, BAUD, ( $7E , $FF , $06 , cmd, $00 , arg.msb, arg.lsb, $EF )
SetFreq MDEFAULT
Return