電子工作日記、その他

趣味の電子工作製作の記録、その他思った事

ARMマイコンLPC1343

2011-11-17 14:06:51 | 日記
ようやくGPIO P0.7(1bit)のLED/OFFが出来た

1000 REM P0.7 LED BLINK
1010 Q=$50008000 Q(0)=Q(0) | $80 'Page0 b7 output mode
1015 P=$50000200 'Data bit Address 1000 0000 sl,2 10 0000 0000 (0x200)
1016 '
1020 D=$80 P:0)=D GOSUB 2000 'b7 Set
1030 '
1050 D=0 P:0)=D GOSUB 2000 'b7 Reset
1060 '
1080 GOTO 1020
1095 '
1096 '== 150msSUB ==
2000 I=0
2010 I=I+1 IF I<1000 GOTO .
2020 RETURN