Yamaha CEmarking RCX221, User Manual

Page: 141 / 468

4-73
Chapter
4
OPERA
TION
10. "PROGRAM" mode
[Sample program listing]
*** <FUNCTION> SAMPLE PROGRAM ****
'*You can change any statements
*
'*as you like. *
'*<FUNCTION> will help you in *
'*MANUAL and PROGRAM mode. *
'*********************************************************
*M_F1:'DO(20)ALTERNATE
DO(20)=~DO(20)
*M_F2:'DO(21)ALTERNATE
DO(21)=~DO(21)
*M_F3:'DO(22)ALTERNATE
DO(22)=~DO(22)
*M_F4:'DO(23)ALTERNATE
DO(23)=~DO(23)
*M_F5:'DO(24)ALTERNATE
DO(24)=~DO(24)
*M_F6:'DO(25)MOMENTARY
DO(25)=1
DO(25)=0
*M_F7:'DO(26)MOMENTARY
DO(26)=1
DO(26)=0
*M_F8:'DO(27)MOMENTARY
DO(27)=1
DO(27)=0
*M_F9:'DO2()ON
DO2()=255
*M_F10:'DO2()OFF
DO2()=0
*M_F11:'OPEN
DO3(0)=&B1
*M_F12:'CLOSE
DO3(0)=O
*M_F13:'AND
DO3(1)=1 & DO3(0)
*M_F14:'DI4 –> DO4
DO4()=DI4()
*M_F15:'DO5INC
DO5()=DO5()+1
'**********************************
*P_F1:'MOVE P,P
*P_F2:'MOVE L,P
*P_F3:'GOTO *
*P_F4:'DELAY
*P_F5:'WAIT
*P_F6:'GOSUB *
*P_F7:'RETURN
*P_F8:'PRINT
*P_F9:'SPEED
*P_F10:'HALT
*P_F11:'IF THEN
*P_F12:'ELSE
*P_F13:'ENDIF
*P_F14:'FOR = TO
*P_F15:'NEXT