RS232C Communication Kit
16
1280 IF A$="i" OR A$="I" THEN GOSUB *TQUP
1290 IF A$="d" OR A$="D" THEN GOSUB *TQDOWN
1300 IF A$="r" OR A$="R" THEN GOSUB *RESETN
1310 IF A$="+" THEN GOSUB *TQINC
1320 IF A$="-" THEN GOSUB *TQDEC
1330 '
1340 INPUT #1,RX$:IF LEFT$(RX$,1)<>"A" GOTO 970
1350 INPUT #1,RX$:IF LEFT$(RX$,1)<>"A" GOTO 970
1360 *ACTEND
1370 CLOSE
1380 END
1390 *ENTER
1400 LOCATE 6,12:INPUT "ITEM TO BE CHANGED? ",N
1410 LOCATE 6,13:INPUT "VALUE TO BE SET ",A$
1420 IF N=1 GOTO *WRITEAGE 'AGE
1430 IF N=2 GOTO *WRITEPLSLT 'PULSE LIMIT
1440 IF N<>3 GOTO 1510
1450 IF MODE%=1 GOTO *WRITESEX 'AEROBIC POWER
1460 IF MODE%=2 GOTO *WRITETGTQ 'MANUAL
1470 IF MODE%=3 GOTO *WRITEPROF 'HILL PROFILE
1480 IF MODE%=4 GOTO *WRITETLD 'INTERVAL
1490 IF MODE%=5 GOTO *WRITETGWATT'ISOPOWER
1500 IF MODE%=6 GOTO *WRITETGPLS 'AUTO
1510 IF N<>4 GOTO 1540
1520 IF MODE%=1 GOTO *WRITEWT 'AEROBIC POWER
1530 GOTO *WRITETGTM
1540 IF N<>5 GOTO 1570
1550 IF MODE%<>4 GOTO 1570
1560 GOTO *WRITETGTQ
1570 LOCATE 6,12:PRINT SPC(30)
1580 LOCATE 6,12:PRINT SPC(30):GOTO *ENTER
1590 *WRITEWT
1600 IF VAL(A$)>999 OR VAL(A$)<10 THEN GOTO *OVER
1610 TX$="D"+A$:GOTO *WRITEDATA
1620 *WRITEAGE
1630 IF VAL(A$)>99 OR VAL(A$)<10 THEN GOTO *OVER
1640 TX$="A"+A$:GOTO *WRITEDATA
1650 *WRITEPLSLT
1660 IF VAL(A$)>200 OR VAL(A$)<60 THEN GOTO *OVER
1670 TX$="B"+A$:GOTO *WRITEDATA
1680 *WRITESEX
1690 IF VAL(A$)>2 OR VAL(A$)<0 THEN GOTO *OVER
1700 TX$="G"+A$:GOTO *WRITEDATA
With the EC-1500, exercise conditions (watt
value and pedal torque) can be changed while
in training. An example is shown below.
When the training ends by pushing the
operation button on the EC-1500, the personal
computer also ends the current program. This
status is checked twice.
The personal computer tells the EC-1500 the
contents of the change.
Inform the exercise conditions on the current
screen to the EC-1500. This is a simple use of
the exercise condition setting command
described on page 7.