Added blinking LED 3.

BLED3.BAS

@@ -0,0 +1,21 @@
+10 CLS
+20 A=1
+30 LOCATE 1,1
+40 IF A=1 THEN B=255
+50 IF A=2 THEN B=176
+60 IF A=3 THEN B=177
+70 IF A=4 THEN B=178
+80 IF A=5 THEN B=219
+90 FOR X=0 TO 2500:NEXT
+100 REM FOR Z=1 TO 24
+110 IF INKEY$="" THEN GOTO 120 ELSE END
+120 PRINT STRING$(80,B);
+130 REM NEXT Z
+140 IF C=0 THEN GOTO 180
+150 A=A-1
+160 IF A=0 THEN A=1:C=0
+170 GOTO 30
+180 A=A+1
+190 IF A=6 THEN C=1:A=4
+200 GOTO 30
+