;---------------------------------------------------------- ; Code Produced by the Proton 3.5.0.6 ; Copyright Rosetta Technologies/Crownhill Associates Ltd ; Written by Les Johnson. June 2010 ;---------------------------------------------------------- ; #DEFINE CONFIG_REQ 1 #DEFINE DEBUG@REQ 1 LIST P = 18F25K20, F = INHX32, W = 2, X = ON, R = DEC, MM = ON, N = 0, C = 255, T=ON SSPMSK EQU 0X0F77 SLRCON EQU 0X0F78 CM2CON1 EQU 0X0F79 CM2CON0 EQU 0X0F7A CM1CON0 EQU 0X0F7B WPUB EQU 0X0F7C IOCB EQU 0X0F7D ANSEL EQU 0X0F7E ANSELH EQU 0X0F7F PORTA EQU 0X0F80 PORTB EQU 0X0F81 PORTC EQU 0X0F82 PORTE EQU 0X0F84 LATA EQU 0X0F89 LATB EQU 0X0F8A LATC EQU 0X0F8B DDRA EQU 0X0F92 TRISA EQU 0X0F92 DDRB EQU 0X0F93 TRISB EQU 0X0F93 DDRC EQU 0X0F94 TRISC EQU 0X0F94 OSCTUNE EQU 0X0F9B PIE1 EQU 0X0F9D PIR1 EQU 0X0F9E IPR1 EQU 0X0F9F PIE2 EQU 0X0FA0 PIR2 EQU 0X0FA1 IPR2 EQU 0X0FA2 EECON1 EQU 0X0FA6 EECON2 EQU 0X0FA7 EEDATL EQU 0X0FA8 EEDATA EQU 0X0FA8 EEDAT EQU 0X0FA8 EEADR EQU 0X0FA9 RCSTA EQU 0X0FAB TXSTA EQU 0X0FAC TXREG EQU 0X0FAD RCREG EQU 0X0FAE SPBRG EQU 0X0FAF SPBRGH EQU 0X0FB0 T3CON EQU 0X0FB1 TMR3L EQU 0X0FB2 TMR3LH EQU 0X0FB3 TMR3H EQU 0X0FB3 CVRCON2 EQU 0X0FB4 CVRCON EQU 0X0FB5 ECCP1AS EQU 0X0FB6 PWM1CON EQU 0X0FB7 BAUDCON EQU 0X0FB8 BAUDCTL EQU 0X0FB8 PSTRCON EQU 0X0FB9 CCP2CON EQU 0X0FBA CCPR2 EQU 0X0FBB CCPR2L EQU 0X0FBB CCPR2LH EQU 0X0FBC CCPR2H EQU 0X0FBC CCP1CON EQU 0X0FBD CCPR1 EQU 0X0FBE CCPR1L EQU 0X0FBE CCPR1LH EQU 0X0FBF CCPR1H EQU 0X0FBF ADCON2 EQU 0X0FC0 ADCON1 EQU 0X0FC1 ADCON0 EQU 0X0FC2 ADRES EQU 0X0FC3 ADRESL EQU 0X0FC3 ADRESLH EQU 0X0FC4 ADRESH EQU 0X0FC4 SSPCON2 EQU 0X0FC5 SSPCON1 EQU 0X0FC6 SSPSTAT EQU 0X0FC7 SSPADD EQU 0X0FC8 SSPBUF EQU 0X0FC9 T2CON EQU 0X0FCA PR2 EQU 0X0FCB TMR2 EQU 0X0FCC T1CON EQU 0X0FCD TMR1L EQU 0X0FCE TMR1LH EQU 0X0FCF TMR1H EQU 0X0FCF RCON EQU 0X0FD0 WDTCON EQU 0X0FD1 HLVDCON EQU 0X0FD2 LVDCON EQU 0X0FD2 OSCCON EQU 0X0FD3 T0CON EQU 0X0FD5 TMR0L EQU 0X0FD6 TMR0LH EQU 0X0FD7 TMR0H EQU 0X0FD7 STATUS EQU 0X0FD8 FSR2L EQU 0X0FD9 FSR2LH EQU 0X0FDA FSR2H EQU 0X0FDA PLUSW2 EQU 0X0FDB PREINC2 EQU 0X0FDC POSTDEC2 EQU 0X0FDD POSTINC2 EQU 0X0FDE INDF2 EQU 0X0FDF BSR EQU 0X0FE0 FSR1L EQU 0X0FE1 FSR1LH EQU 0X0FE2 FSR1H EQU 0X0FE2 PLUSW1 EQU 0X0FE3 PREINC1 EQU 0X0FE4 POSTDEC1 EQU 0X0FE5 POSTINC1 EQU 0X0FE6 INDF1 EQU 0X0FE7 WREG EQU 0X0FE8 FSR0L EQU 0X0FE9 FSR0LH EQU 0X0FEA FSR0H EQU 0X0FEA PLUSW0 EQU 0X0FEB PREINC0 EQU 0X0FEC POSTDEC0 EQU 0X0FED POSTINC0 EQU 0X0FEE INDF0 EQU 0X0FEF INTCON3 EQU 0X0FF0 INTCON2 EQU 0X0FF1 INTCON EQU 0X0FF2 PRODL EQU 0X0FF3 PRODLH EQU 0X0FF4 PRODH EQU 0X0FF4 TABLAT EQU 0X0FF5 TBLPTRL EQU 0X0FF6 TBLPTRLH EQU 0X0FF7 TBLPTRH EQU 0X0FF7 TBLPTRU EQU 0X0FF8 TBLPTRLHH EQU 0X0FF8 PC EQU 0X0FF9 PCL EQU 0X0FF9 PCLATH EQU 0X0FFA PCLATU EQU 0X0FFB STKPTR EQU 0X0FFC TOS EQU 0X0FFD TOSL EQU 0X0FFD TOSLH EQU 0X0FFE TOSH EQU 0X0FFE TOSU EQU 0X0FFF _I2C_SCL_PORT = TRISC _I2C_SCL_PIN = 3 _I2C_SDA_PORT = TRISC _I2C_SDA_PIN = 4 MSK0=0 MSK1=1 MSK2=2 MSK3=3 MSK4=4 MSK5=5 MSK6=6 MSK7=7 SLRA=0 SLRB=1 SLRC=2 SLRD=3 SLRE=4 C2RSEL=4 C1RSEL=5 MC2OUT=6 MC1OUT=7 C2CH0=0 C2CH1=1 C2R=2 C2SP=3 C2POL=4 C2OE=5 C2OUT_CM2CON0=6 C2ON=7 C1CH0=0 C1CH1=1 C1R=2 C1SP=3 C1POL=4 C1OE=5 C1OUT_CM1CON0=6 C1ON=7 WPUB0=0 WPUB1=1 WPUB2=2 WPUB3=3 WPUB4=4 WPUB5=5 WPUB6=6 WPUB7=7 IOCB4=4 IOCB5=5 IOCB6=6 IOCB7=7 ANS0=0 ANS1=1 ANS2=2 ANS3=3 ANS4=4 ANS5=5 ANS6=6 ANS7=7 ANS8=0 ANS9=1 ANS10=2 ANS11=3 ANS12=4 RA0=0 RA1=1 RA2=2 RA3=3 RA4=4 RA5=5 RA6=6 RA7=7 AN0=0 AN1=1 AN2=2 AN3=3 AN4=5 C12IN0M=0 C12IN1M=1 C2INP=2 C1INP=3 C1OUT_PORTA=4 C2OUT_PORTA=5 C12IN0N=0 C12IN1N=1 VREFM=2 VREFP=3 T0CKI=4 SS=5 VREFN=2 NOT_SS=5 CVREF=2 LVDIN=5 HLVDIN=5 RB0=0 RB1=1 RB2=2 RB3=3 RB4=4 RB5=5 RB6=6 RB7=7 INT0=0 INT1=1 INT2=2 CCP2_PORTB=3 KBI0=4 KBI1=5 KBI2=6 KBI3=7 AN12=0 AN10=1 AN8=2 AN9=3 AN11=4 PGM=5 PGC=6 PGD=7 FLT0=0 C12IN3M=1 C12IN2M=3 C12IN3N=1 C12IN2N=3 P1C=1 P1B=2 P1D=4 RC0=0 RC1=1 RC2=2 RC3=3 RC4=4 RC5=5 RC6=6 RC7=7 T1OSO=0 T1OSI=1 CCP1=2 SCK=3 SDI=4 SDO=5 TX=6 RX=7 T13CKI=0 CCP2_PORTC=1 P1A=2 SCL=3 SDA=4 CK=6 T1CKI=0 T3CKI=0 RE3=3 MCLR=3 NOT_MCLR=3 VPP=3 LATA0=0 LATA1=1 LATA2=2 LATA3=3 LATA4=4 LATA5=5 LATA6=6 LATA7=7 LATB0=0 LATB1=1 LATB2=2 LATB3=3 LATB4=4 LATB5=5 LATB6=6 LATB7=7 LATC0=0 LATC1=1 LATC2=2 LATC3=3 LATC4=4 LATC5=5 LATC6=6 LATC7=7 TRISA0=0 TRISA1=1 TRISA2=2 TRISA3=3 TRISA4=4 TRISA5=5 TRISA6=6 TRISA7=7 TRISB0=0 TRISB1=1 TRISB2=2 TRISB3=3 TRISB4=4 TRISB5=5 TRISB6=6 TRISB7=7 TRISC0=0 TRISC1=1 TRISC2=2 TRISC3=3 TRISC4=4 TRISC5=5 TRISC6=6 TRISC7=7 TUN0=0 TUN1=1 TUN2=2 TUN3=3 TUN4=4 TUN5=5 PLLEN=6 INTSRC=7 TMR1IE=0 TMR2IE=1 CCP1IE=2 SSPIE=3 TXIE=4 RCIE=5 ADIE=6 PSPIE=7 TMR1IF=0 TMR2IF=1 CCP1IF=2 SSPIF=3 TXIF=4 PP_TXIF=4 RCIF=5 PP_RCIF=5 ADIF=6 PSPIF=7 TMR1IP=0 TMR2IP=1 CCP1IP=2 SSPIP=3 TXIP=4 RCIP=5 ADIP=6 PSPIP=7 CCP2IE=0 TMR3IE=1 LVDIE=2 BCLIE=3 EEIE=4 C2IE=5 C1IE=6 OSCFIE=7 HLVDIE=2 CCP2IF=0 TMR3IF=1 LVDIF=2 BCLIF=3 EEIF=4 C2IF=5 C1IF=6 OSCFIF=7 HLVDIF=2 CCP2IP=0 TMR3IP=1 LVDIP=2 BCLIP=3 EEIP=4 C2IP=5 C1IP=6 OSCFIP=7 HLVDIP=2 RD=0 PP_RD=0 WR=1 PP_WR=1 WREN=2 PP_WREN=2 WRERR=3 FREE=4 CFGS=6 EEPGD=7 PP_EEPGD=7 RX9D=0 OERR=1 PP_OERR=1 FERR=2 ADEN=3 CREN=4 PP_CREN=4 SREN=5 RX9=6 SPEN=7 ADDEN=3 TX9D=0 TRMT=1 BRGH=2 SENDB=3 SYNC=4 TXEN=5 TX9=6 CSRC=7 TMR3ON=0 TMR3CS=1 T3SYNC=2 T3CCP1=3 T3CKPS0=4 T3CKPS1=5 T3CCP2=6 RD16=7 NOT_T3SYNC=2 FVRST=6 FVREN=7 CVR0=0 CVR1=1 CVR2=2 CVR3=3 CVRSS=4 CVRR=5 CVROE=6 CVREN=7 PSSBD0=0 PSSBD1=1 PSSAC0=2 PSSAC1=3 ECCPAS0=4 ECCPAS1=5 ECCPAS2=6 ECCPASE=7 PDC0=0 PDC1=1 PDC2=2 PDC3=3 PDC4=4 PDC5=5 PDC6=6 PRSEN=7 ABDEN=0 WUE=1 BRG16=3 CKTXP=4 DTRXP=5 RCIDL=6 ABDOVF=7 SCKP=4 STRA=0 STRB=1 STRC=2 STRD=3 STRSYNC=4 CCP2M0=0 CCP2M1=1 CCP2M2=2 CCP2M3=3 DC2B0=4 DC2B1=5 CCP1M0=0 CCP1M1=1 CCP1M2=2 CCP1M3=3 DC1B0=4 DC1B1=5 P1M0=6 P1M1=7 ADCS0=0 ADCS1=1 ADCS2=2 ACQT0=3 ACQT1=4 ACQT2=5 ADFM=7 VCFG0=4 VCFG1=5 ADON=0 PP_ADON=0 GO=1 CHS0=2 CHS1=3 CHS2=4 CHS3=5 DONE=1 NOT_DONE=1 GO_DONE=1 PP_GO_DONE=1 SEN=0 PP_SEN=0 RSEN=1 PP_RSEN=1 PEN=2 PP_PEN=2 RCEN=3 PP_RCEN=3 ACKEN=4 PP_ACKEN=4 ACKDT=5 PP_ACKDT=5 ACKSTAT=6 GCEN=7 SSPM0=0 SSPM1=1 SSPM2=2 SSPM3=3 CKP=4 SSPEN=5 SSPOV=6 WCOL=7 BF=0 UA=1 R=2 S=3 P=4 D=5 CKE=6 SMP=7 NOT_W=2 NOT_A=5 R_W=2 PP_R_W=2 D_A=5 NOT_WRITE=2 NOT_ADDRESS=5 T2CKPS0=0 PP_T2CKPS0=0 T2CKPS1=1 PP_T2CKPS1=1 TMR2ON=2 PP_TMR2ON=2 T2OUTPS0=3 T2OUTPS1=4 T2OUTPS2=5 T2OUTPS3=6 TMR1ON=0 TMR1CS=1 T1SYNC=2 T1OSCEN=3 T1CKPS0=4 T1CKPS1=5 T1RUN=6 NOT_T1SYNC=2 BOR=0 POR=1 PD=2 TO=3 RI=4 SBOREN=6 IPEN=7 NOT_BOR=0 NOT_POR=1 NOT_PD=2 NOT_TO=3 NOT_RI=4 SWDTEN=0 SWDTE=0 LVDL0=0 LVDL1=1 LVDL2=2 LVDL3=3 LVDEN=4 IRVST=5 LVV0=0 LVV1=1 LVV2=2 LVV3=3 BGST=5 HLVDL0=0 HLVDL1=1 HLVDL2=2 HLVDL3=3 HLVDEN=4 VDIRMAG=7 IVRST=5 SCS0=0 SCS1=1 IOFS=2 OSTS=3 IRCF0=4 IRCF1=5 IRCF2=6 IDLEN=7 T0PS0=0 T0PS1=1 T0PS2=2 PSA=3 T0SE=4 T0CS=5 T08BIT=6 TMR0ON=7 C=0 DC=1 Z=2 OV=3 N=4 INT1F=0 INT2F=1 INT1E=3 INT2E=4 INT1P=6 INT2P=7 INT1IF=0 INT2IF=1 INT1IE=3 INT2IE=4 INT1IP=6 INT2IP=7 RBIP=0 TMR0IP=2 INTEDG2=4 INTEDG1=5 INTEDG0=6 RBPU=7 NOT_RBPU=7 RBIF=0 INT0F=1 TMR0IF=2 RBIE=3 INT0E=4 TMR0IE=5 PEIE=6 GIE=7 INT0IF=1 T0IF=2 INT0IE=4 T0IE=5 GIEL=6 GIEH=7 SP0=0 SP1=1 SP2=2 SP3=3 SP4=4 STKUNF=6 STKOVF=7 STKFUL=7 __MAXRAM 0X0FFF __BADRAM 0X0600-0X0F5F __BADRAM 0X0F83 __BADRAM 0X0F85-0X0F88 __BADRAM 0X0F8C-0X0F91 __BADRAM 0X0F95-0X0F9A __BADRAM 0X0F9C __BADRAM 0X0FA3-0X0FA5 __BADRAM 0X0FAA __BADRAM 0X0FD4 CONFIG1H EQU 0X300001 CONFIG2L EQU 0X300002 CONFIG2H EQU 0X300003 CONFIG3H EQU 0X300005 CONFIG4L EQU 0X300006 CONFIG5L EQU 0X300008 CONFIG5H EQU 0X300009 CONFIG6L EQU 0X30000A CONFIG6H EQU 0X30000B CONFIG7L EQU 0X30000C CONFIG7H EQU 0X30000D FOSC_LP_1 EQU 0XF0 FOSC_XT_1 EQU 0XF1 FOSC_HS_1 EQU 0XF2 FOSC_RC_1 EQU 0XF3 FOSC_EC_1 EQU 0XF4 FOSC_ECIO6_1 EQU 0XF5 FOSC_HSPLL_1 EQU 0XF6 FOSC_RCIO6_1 EQU 0XF7 FOSC_INTIO67_1 EQU 0XF8 FOSC_INTIO7_1 EQU 0XF9 FCMEN_OFF_1 EQU 0XBF FCMEN_ON_1 EQU 0XFF IESO_OFF_1 EQU 0X7F IESO_ON_1 EQU 0XFF PWRT_ON_2 EQU 0XFE PWRT_OFF_2 EQU 0XFF BOREN_OFF_2 EQU 0XF9 BOREN_ON_2 EQU 0XFB BOREN_NOSLP_2 EQU 0XFD BOREN_SBORDIS_2 EQU 0XFF BORV_30_2 EQU 0XE7 BORV_27_2 EQU 0XEF BORV_22_2 EQU 0XF7 BORV_18_2 EQU 0XFF WDTEN_OFF_2 EQU 0XFE WDTEN_ON_2 EQU 0XFF WDTPS_1_2 EQU 0XE1 WDTPS_2_2 EQU 0XE3 WDTPS_4_2 EQU 0XE5 WDTPS_8_2 EQU 0XE7 WDTPS_16_2 EQU 0XE9 WDTPS_32_2 EQU 0XEB WDTPS_64_2 EQU 0XED WDTPS_128_2 EQU 0XEF WDTPS_256_2 EQU 0XF1 WDTPS_512_2 EQU 0XF3 WDTPS_1024_2 EQU 0XF5 WDTPS_2048_2 EQU 0XF7 WDTPS_4096_2 EQU 0XF9 WDTPS_8192_2 EQU 0XFB WDTPS_16384_2 EQU 0XFD WDTPS_32768_2 EQU 0XFF MCLRE_OFF_3 EQU 0X7F MCLRE_ON_3 EQU 0XFF HFOFST_OFF_3 EQU 0XF7 HFOFST_ON_3 EQU 0XFF LPT1OSC_OFF_3 EQU 0XFB LPT1OSC_ON_3 EQU 0XFF PBADEN_OFF_3 EQU 0XFD PBADEN_ON_3 EQU 0XFF CCP2MX_PORTBE_3 EQU 0XFE CCP2MX_PORTC_3 EQU 0XFF STVREN_OFF_4 EQU 0XFE STVREN_ON_4 EQU 0XFF LVP_OFF_4 EQU 0XFB LVP_ON_4 EQU 0XFF XINST_OFF_4 EQU 0XBF XINST_ON_4 EQU 0XFF DEBUG_ON_4 EQU 0X7F DEBUG_OFF_4 EQU 0XFF CP0_ON_5 EQU 0XFE CP0_OFF_5 EQU 0XFF CP1_ON_5 EQU 0XFD CP1_OFF_5 EQU 0XFF CP2_ON_5 EQU 0XFB CP2_OFF_5 EQU 0XFF CP3_ON_5 EQU 0XF7 CP3_OFF_5 EQU 0XFF CPB_ON_5 EQU 0XBF CPB_OFF_5 EQU 0XFF CPD_ON_5 EQU 0X7F CPD_OFF_5 EQU 0XFF WRT0_ON_6 EQU 0XFE WRT0_OFF_6 EQU 0XFF WRT1_ON_6 EQU 0XFD WRT1_OFF_6 EQU 0XFF WRT2_ON_6 EQU 0XFB WRT2_OFF_6 EQU 0XFF WRT3_ON_6 EQU 0XF7 WRT3_OFF_6 EQU 0XFF WRTB_ON_6 EQU 0XBF WRTB_OFF_6 EQU 0XFF WRTC_ON_6 EQU 0XDF WRTC_OFF_6 EQU 0XFF WRTD_ON_6 EQU 0X7F WRTD_OFF_6 EQU 0XFF EBTR0_ON_7 EQU 0XFE EBTR0_OFF_7 EQU 0XFF EBTR1_ON_7 EQU 0XFD EBTR1_OFF_7 EQU 0XFF EBTR2_ON_7 EQU 0XFB EBTR2_OFF_7 EQU 0XFF EBTR3_ON_7 EQU 0XF7 EBTR3_OFF_7 EQU 0XFF EBTRB_ON_7 EQU 0XBF EBTRB_OFF_7 EQU 0XFF DEVID1 EQU 0X3FFFFE DEVID2 EQU 0X3FFFFF IDLOC0 EQU 0X200000 __IDLOC0 EQU 0X200000 IDLOC1 EQU 0X200001 __IDLOC1 EQU 0X200001 IDLOC2 EQU 0X200002 __IDLOC2 EQU 0X200002 IDLOC3 EQU 0X200003 __IDLOC3 EQU 0X200003 IDLOC4 EQU 0X200004 __IDLOC4 EQU 0X200004 IDLOC5 EQU 0X200005 __IDLOC5 EQU 0X200005 IDLOC6 EQU 0X200006 __IDLOC6 EQU 0X200006 IDLOC7 EQU 0X200007 __IDLOC7 EQU 0X200007 #DEFINE __18F25K20 1 #DEFINE XTAL 64 #DEFINE _CORE 16 #DEFINE _MAXRAM 1457 #DEFINE _RAM_END 1536 #DEFINE _MAXMEM 32768 #DEFINE _ADC 11 #DEFINE _ADC_RES 10 #DEFINE _EEPROM 256 #DEFINE RAM_BANKS 6 #DEFINE _USART 1 #DEFINE _USB 0 #DEFINE _USB#RAM_START 0 #DEFINE _FLASH 1 #DEFINE _CWRITE_BLOCK 32 #DEFINE BANK0_START 96 #DEFINE BANK0_END 255 #DEFINE BANK1_START 256 #DEFINE BANK1_END 511 #DEFINE BANK2_START 512 #DEFINE BANK2_END 767 #DEFINE BANK3_START 768 #DEFINE BANK3_END 1023 #DEFINE BANK4_START 1024 #DEFINE BANK4_END 1279 #DEFINE BANK5_START 1280 #DEFINE BANK5_END 1535 #DEFINE BANKA_START 0 #DEFINE BANKA_END 95 #DEFINE _SYSTEM_VARIABLE_COUNT 62 #DEFINE LCD#TYPE 0 #DEFINE __HIGH_INTERRUPTS_ENABLED 1 #DEFINE _HIGH_INT_SUB_ADDRESS 1473 #DEFINE _HIGH_INT_SUB_AMOUNT 12 #DEFINE _LOW_INT_SUB_ADDRESS 1458 #DEFINE _LOW_INT_SUB_AMOUNT 15 #DEFINE CLRW CLRF WREG #DEFINE NEGW NEGF WREG #DEFINE SKPC BTFSS STATUS,0 #DEFINE SKPNC BTFSC STATUS,0 #DEFINE CLRC BCF STATUS,0 #DEFINE SETC BSF STATUS,0 #DEFINE SKPZ BTFSS STATUS,2 #DEFINE SKPNZ BTFSC STATUS,2 #DEFINE CLRZ BCF STATUS,2 #DEFINE SETZ BSF STATUS,2 #DEFINE INIT_USART_INTERRUPT#REQ 1 #DEFINE CLEAR_SERIAL_BUFFER#REQ 1 #DEFINE _OPENTIMER0#REQ 1 BPF = 0 BPFH = 1 GPR = 2 PBP#VAR0 = 3 PBP#VAR0H = 4 PP0 = 5 PP0H = 6 PP1 = 7 PP1H = 8 PP3H = 9 PP4 = 10 PP7 = 11 PP7H = 12 BYTEIN = 13 _I = 14 _J = 15 _K = 16 _Z = 17 STATUSBYTE = 18 NOTEUIT = 19 RELEASE = 20 NOTEAAN = 21 VELO = 22 NOTEPRES = 23 PRES = 24 CTRL = 25 VALUE = 26 PROG = 27 AFT = 28 PBLSB = 29 PBMSB = 30 VELTIM = 31 VELTIMH = 32 VELTIMHH = 33 VELTIMHHH = 34 VELFLAGS = 35 VELFLAGSH = 36 USESTRING = 37 CC3 = 38 CC4 = 39 CC7 = 40 CC64 = 41 CC65 = 42 CC66 = 43 LUT = 44 LUTH = 45 TUNE = 46 BASENOTE = 47 ST = 48 B1 = 49 B2 = 50 LIM = 51 USART_FSR1_SAVE = 52 USART_FSR1_SAVEH = 53 USART_INDEXIN = 54 USART_INDEXOUT = 55 CNT = 56 CNTH = 57 CNTHH = 58 CNTHHH = 59 GW = 60 GWH = 61 HAMMERINDEX = 62 VARIABLE HAMMERINDEX#0=62,HAMMERINDEX#1=63,HAMMERINDEX#2=64,HAMMERINDEX#3=65 VARIABLE HAMMERINDEX#4=66,HAMMERINDEX#5=67,HAMMERINDEX#6=68,HAMMERINDEX#7=69 VARIABLE HAMMERINDEX#8=70,HAMMERINDEX#9=71,HAMMERINDEX#10=72,HAMMERINDEX#11=73 VARIABLE HAMMERINDEX#12=74,HAMMERINDEX#13=75,HAMMERINDEX#14=76,HAMMERINDEX#15=77 VARIABLE HAMMERINDEX#16=78,HAMMERINDEX#17=79,HAMMERINDEX#18=80,HAMMERINDEX#19=81 VARIABLE HAMMERINDEX#20=82,HAMMERINDEX#21=83,HAMMERINDEX#22=84,HAMMERINDEX#23=85 VARIABLE HAMMERINDEX#24=86,HAMMERINDEX#25=87,HAMMERINDEX#26=88,HAMMERINDEX#27=89 VARIABLE HAMMERINDEX#28=90,HAMMERINDEX#29=91,HAMMERINDEX#30=92,HAMMERINDEX#31=93 VARIABLE HAMMERINDEX#32=94,HAMMERINDEX#33=95,HAMMERINDEX#34=96,HAMMERINDEX#35=97 VARIABLE HAMMERINDEX#36=98,HAMMERINDEX#37=99,HAMMERINDEX#38=100,HAMMERINDEX#39=101 VARIABLE HAMMERINDEX#40=102,HAMMERINDEX#41=103,HAMMERINDEX#42=104,HAMMERINDEX#43=105 VARIABLE HAMMERINDEX#44=106,HAMMERINDEX#45=107,HAMMERINDEX#46=108,HAMMERINDEX#47=109 VARIABLE HAMMERINDEX#48=110,HAMMERINDEX#49=111,HAMMERINDEX#50=112,HAMMERINDEX#51=113 VARIABLE HAMMERINDEX#52=114,HAMMERINDEX#53=115,HAMMERINDEX#54=116,HAMMERINDEX#55=117 VARIABLE HAMMERINDEX#56=118,HAMMERINDEX#57=119,HAMMERINDEX#58=120,HAMMERINDEX#59=121 VARIABLE HAMMERINDEX#60=122,HAMMERINDEX#61=123,HAMMERINDEX#62=124,HAMMERINDEX#63=125 VARIABLE HAMMERINDEX#64=126,HAMMERINDEX#65=127,HAMMERINDEX#66=128,HAMMERINDEX#67=129 VARIABLE HAMMERINDEX#68=130,HAMMERINDEX#69=131,HAMMERINDEX#70=132,HAMMERINDEX#71=133 VARIABLE HAMMERINDEX#72=134,HAMMERINDEX#73=135,HAMMERINDEX#74=136,HAMMERINDEX#75=137 VARIABLE HAMMERINDEX#76=138,HAMMERINDEX#77=139,HAMMERINDEX#78=140,HAMMERINDEX#79=141 VARIABLE HAMMERINDEX#80=142,HAMMERINDEX#81=143,HAMMERINDEX#82=144,HAMMERINDEX#83=145 VARIABLE HAMMERINDEX#84=146,HAMMERINDEX#85=147,HAMMERINDEX#86=148,HAMMERINDEX#87=149 VARIABLE HAMMERINDEX#88=150,HAMMERINDEX#89=151,HAMMERINDEX#90=152,HAMMERINDEX#91=153 VARIABLE HAMMERINDEX#92=154,HAMMERINDEX#93=155,HAMMERINDEX#94=156,HAMMERINDEX#95=157 VARIABLE HAMMERINDEX#96=158,HAMMERINDEX#97=159,HAMMERINDEX#98=160,HAMMERINDEX#99=161 VARIABLE HAMMERINDEX#100=162,HAMMERINDEX#101=163,HAMMERINDEX#102=164,HAMMERINDEX#103=165 VARIABLE HAMMERINDEX#104=166,HAMMERINDEX#105=167,HAMMERINDEX#106=168,HAMMERINDEX#107=169 VARIABLE HAMMERINDEX#108=170,HAMMERINDEX#109=171,HAMMERINDEX#110=172,HAMMERINDEX#111=173 VARIABLE HAMMERINDEX#112=174,HAMMERINDEX#113=175,HAMMERINDEX#114=176,HAMMERINDEX#115=177 VARIABLE HAMMERINDEX#116=178,HAMMERINDEX#117=179,HAMMERINDEX#118=180,HAMMERINDEX#119=181 VARIABLE HAMMERINDEX#120=182,HAMMERINDEX#121=183,HAMMERINDEX#122=184,HAMMERINDEX#123=185 VARIABLE HAMMERINDEX#124=186,HAMMERINDEX#125=187,HAMMERINDEX#126=188,HAMMERINDEX#127=189 LIGHTINDEX = 190 VARIABLE LIGHTINDEX#0=190,LIGHTINDEX#1=191,LIGHTINDEX#2=192,LIGHTINDEX#3=193 VARIABLE LIGHTINDEX#4=194,LIGHTINDEX#5=195,LIGHTINDEX#6=196 SNAARX = 197 VARIABLE SNAARX#0=197,SNAARX#1=198,SNAARX#2=199,SNAARX#3=200 VARIABLE SNAARX#4=201,SNAARX#5=202,SNAARX#6=203,SNAARX#7=204 VARIABLE SNAARX#8=205,SNAARX#9=206,SNAARX#10=207,SNAARX#11=208 SNAARNOTE = 209 VARIABLE SNAARNOTE#0=209,SNAARNOTE#1=210,SNAARNOTE#2=211,SNAARNOTE#3=212 VARIABLE SNAARNOTE#4=213,SNAARNOTE#5=214,SNAARNOTE#6=215,SNAARNOTE#7=216 VARIABLE SNAARNOTE#8=217,SNAARNOTE#9=218,SNAARNOTE#10=219,SNAARNOTE#11=220 OLDTUNE = 221 VARIABLE OLDTUNE#0=221,OLDTUNE#1=222,OLDTUNE#2=223,OLDTUNE#3=224 VARIABLE OLDTUNE#4=225,OLDTUNE#5=226,OLDTUNE#6=227,OLDTUNE#7=228 VARIABLE OLDTUNE#8=229,OLDTUNE#9=230,OLDTUNE#10=231,OLDTUNE#11=232 CC3OLD = 233 VARIABLE CC3OLD#0=233,CC3OLD#1=234,CC3OLD#2=235,CC3OLD#3=236 VARIABLE CC3OLD#4=237,CC3OLD#5=238,CC3OLD#6=239,CC3OLD#7=240 VARIABLE CC3OLD#8=241,CC3OLD#9=242,CC3OLD#10=243,CC3OLD#11=244 CC4OLD = 245 VARIABLE CC4OLD#0=245,CC4OLD#1=246,CC4OLD#2=247,CC4OLD#3=248 VARIABLE CC4OLD#4=249,CC4OLD#5=250,CC4OLD#6=251,CC4OLD#7=252 VARIABLE CC4OLD#8=253,CC4OLD#9=254,CC4OLD#10=255,CC4OLD#11=256 CC20 = 257 VARIABLE CC20#0=257,CC20#1=258,CC20#2=259,CC20#3=260 VARIABLE CC20#4=261,CC20#5=262,CC20#6=263,CC20#7=264 VARIABLE CC20#8=265,CC20#9=266,CC20#10=267,CC20#11=268 CC23 = 269 VARIABLE CC23#0=269,CC23#1=270,CC23#2=271,CC23#3=272 VARIABLE CC23#4=273,CC23#5=274,CC23#6=275,CC23#7=276 VARIABLE CC23#8=277,CC23#9=278,CC23#10=279,CC23#11=280 CC69 = 281 VARIABLE CC69#0=281,CC69#1=282,CC69#2=283,CC69#3=284 VARIABLE CC69#4=285,CC69#5=286,CC69#6=287,CC69#7=288 VARIABLE CC69#8=289,CC69#9=290,CC69#10=291,CC69#11=292 OLDVELO = 293 VARIABLE OLDVELO#0=293,OLDVELO#1=294,OLDVELO#2=295,OLDVELO#3=296 VARIABLE OLDVELO#4=297,OLDVELO#5=298,OLDVELO#6=299,OLDVELO#7=300 VARIABLE OLDVELO#8=301,OLDVELO#9=302,OLDVELO#10=303,OLDVELO#11=304 MULTI = 305 VARIABLE MULTI#0=305,MULTI#1=306,MULTI#2=307,MULTI#3=308 VARIABLE MULTI#4=309,MULTI#5=310,MULTI#6=311,MULTI#7=312 VARIABLE MULTI#8=313,MULTI#9=314,MULTI#10=315,MULTI#11=316 PLUT = 317 PLUTH = 318 VARIABLE PLUT#0=317,PLUT#0H=318,PLUT#1=319,PLUT#1H=320 VARIABLE PLUT#2=321,PLUT#2H=322,PLUT#3=323,PLUT#3H=324 VARIABLE PLUT#4=325,PLUT#4H=326,PLUT#5=327,PLUT#5H=328 VARIABLE PLUT#6=329,PLUT#6H=330,PLUT#7=331,PLUT#7H=332 VARIABLE PLUT#8=333,PLUT#8H=334,PLUT#9=335,PLUT#9H=336 VARIABLE PLUT#10=337,PLUT#10H=338,PLUT#11=339,PLUT#11H=340 VARIABLE PLUT#12=341,PLUT#12H=342,PLUT#13=343,PLUT#13H=344 VARIABLE PLUT#14=345,PLUT#14H=346,PLUT#15=347,PLUT#15H=348 VARIABLE PLUT#16=349,PLUT#16H=350,PLUT#17=351,PLUT#17H=352 VARIABLE PLUT#18=353,PLUT#18H=354,PLUT#19=355,PLUT#19H=356 VARIABLE PLUT#20=357,PLUT#20H=358,PLUT#21=359,PLUT#21H=360 VARIABLE PLUT#22=361,PLUT#22H=362,PLUT#23=363,PLUT#23H=364 VARIABLE PLUT#24=365,PLUT#24H=366,PLUT#25=367,PLUT#25H=368 VARIABLE PLUT#26=369,PLUT#26H=370,PLUT#27=371,PLUT#27H=372 VARIABLE PLUT#28=373,PLUT#28H=374,PLUT#29=375,PLUT#29H=376 VARIABLE PLUT#30=377,PLUT#30H=378,PLUT#31=379,PLUT#31H=380 VARIABLE PLUT#32=381,PLUT#32H=382,PLUT#33=383,PLUT#33H=384 VARIABLE PLUT#34=385,PLUT#34H=386,PLUT#35=387,PLUT#35H=388 VARIABLE PLUT#36=389,PLUT#36H=390,PLUT#37=391,PLUT#37H=392 VARIABLE PLUT#38=393,PLUT#38H=394,PLUT#39=395,PLUT#39H=396 VARIABLE PLUT#40=397,PLUT#40H=398,PLUT#41=399,PLUT#41H=400 VARIABLE PLUT#42=401,PLUT#42H=402,PLUT#43=403,PLUT#43H=404 VARIABLE PLUT#44=405,PLUT#44H=406,PLUT#45=407,PLUT#45H=408 VARIABLE PLUT#46=409,PLUT#46H=410,PLUT#47=411,PLUT#47H=412 VARIABLE PLUT#48=413,PLUT#48H=414,PLUT#49=415,PLUT#49H=416 VARIABLE PLUT#50=417,PLUT#50H=418,PLUT#51=419,PLUT#51H=420 VARIABLE PLUT#52=421,PLUT#52H=422,PLUT#53=423,PLUT#53H=424 VARIABLE PLUT#54=425,PLUT#54H=426,PLUT#55=427,PLUT#55H=428 VARIABLE PLUT#56=429,PLUT#56H=430,PLUT#57=431,PLUT#57H=432 VARIABLE PLUT#58=433,PLUT#58H=434,PLUT#59=435,PLUT#59H=436 VARIABLE PLUT#60=437,PLUT#60H=438,PLUT#61=439,PLUT#61H=440 VARIABLE PLUT#62=441,PLUT#62H=442,PLUT#63=443,PLUT#63H=444 VARIABLE PLUT#64=445,PLUT#64H=446,PLUT#65=447,PLUT#65H=448 VARIABLE PLUT#66=449,PLUT#66H=450,PLUT#67=451,PLUT#67H=452 VARIABLE PLUT#68=453,PLUT#68H=454,PLUT#69=455,PLUT#69H=456 VARIABLE PLUT#70=457,PLUT#70H=458,PLUT#71=459,PLUT#71H=460 VARIABLE PLUT#72=461,PLUT#72H=462,PLUT#73=463,PLUT#73H=464 VARIABLE PLUT#74=465,PLUT#74H=466,PLUT#75=467,PLUT#75H=468 VARIABLE PLUT#76=469,PLUT#76H=470,PLUT#77=471,PLUT#77H=472 VARIABLE PLUT#78=473,PLUT#78H=474,PLUT#79=475,PLUT#79H=476 VARIABLE PLUT#80=477,PLUT#80H=478,PLUT#81=479,PLUT#81H=480 VARIABLE PLUT#82=481,PLUT#82H=482,PLUT#83=483,PLUT#83H=484 VARIABLE PLUT#84=485,PLUT#84H=486,PLUT#85=487,PLUT#85H=488 VARIABLE PLUT#86=489,PLUT#86H=490,PLUT#87=491,PLUT#87H=492 VARIABLE PLUT#88=493,PLUT#88H=494,PLUT#89=495,PLUT#89H=496 VARIABLE PLUT#90=497,PLUT#90H=498,PLUT#91=499,PLUT#91H=500 ALUT = 501 ALUTH = 502 VARIABLE ALUT#0=501,ALUT#0H=502,ALUT#1=503,ALUT#1H=504 VARIABLE ALUT#2=505,ALUT#2H=506,ALUT#3=507,ALUT#3H=508 VARIABLE ALUT#4=509,ALUT#4H=510,ALUT#5=511,ALUT#5H=512 VARIABLE ALUT#6=513,ALUT#6H=514,ALUT#7=515,ALUT#7H=516 VARIABLE ALUT#8=517,ALUT#8H=518,ALUT#9=519,ALUT#9H=520 VARIABLE ALUT#10=521,ALUT#10H=522,ALUT#11=523,ALUT#11H=524 VARIABLE ALUT#12=525,ALUT#12H=526,ALUT#13=527,ALUT#13H=528 VARIABLE ALUT#14=529,ALUT#14H=530,ALUT#15=531,ALUT#15H=532 VARIABLE ALUT#16=533,ALUT#16H=534,ALUT#17=535,ALUT#17H=536 VARIABLE ALUT#18=537,ALUT#18H=538,ALUT#19=539,ALUT#19H=540 VARIABLE ALUT#20=541,ALUT#20H=542,ALUT#21=543,ALUT#21H=544 VARIABLE ALUT#22=545,ALUT#22H=546,ALUT#23=547,ALUT#23H=548 VARIABLE ALUT#24=549,ALUT#24H=550,ALUT#25=551,ALUT#25H=552 VARIABLE ALUT#26=553,ALUT#26H=554,ALUT#27=555,ALUT#27H=556 VARIABLE ALUT#28=557,ALUT#28H=558,ALUT#29=559,ALUT#29H=560 VARIABLE ALUT#30=561,ALUT#30H=562,ALUT#31=563,ALUT#31H=564 VARIABLE ALUT#32=565,ALUT#32H=566,ALUT#33=567,ALUT#33H=568 VARIABLE ALUT#34=569,ALUT#34H=570,ALUT#35=571,ALUT#35H=572 VARIABLE ALUT#36=573,ALUT#36H=574,ALUT#37=575,ALUT#37H=576 VARIABLE ALUT#38=577,ALUT#38H=578,ALUT#39=579,ALUT#39H=580 VARIABLE ALUT#40=581,ALUT#40H=582,ALUT#41=583,ALUT#41H=584 VARIABLE ALUT#42=585,ALUT#42H=586,ALUT#43=587,ALUT#43H=588 VARIABLE ALUT#44=589,ALUT#44H=590,ALUT#45=591,ALUT#45H=592 VARIABLE ALUT#46=593,ALUT#46H=594,ALUT#47=595,ALUT#47H=596 VARIABLE ALUT#48=597,ALUT#48H=598,ALUT#49=599,ALUT#49H=600 VARIABLE ALUT#50=601,ALUT#50H=602,ALUT#51=603,ALUT#51H=604 VARIABLE ALUT#52=605,ALUT#52H=606,ALUT#53=607,ALUT#53H=608 VARIABLE ALUT#54=609,ALUT#54H=610,ALUT#55=611,ALUT#55H=612 VARIABLE ALUT#56=613,ALUT#56H=614,ALUT#57=615,ALUT#57H=616 VARIABLE ALUT#58=617,ALUT#58H=618,ALUT#59=619,ALUT#59H=620 VARIABLE ALUT#60=621,ALUT#60H=622,ALUT#61=623,ALUT#61H=624 VARIABLE ALUT#62=625,ALUT#62H=626,ALUT#63=627,ALUT#63H=628 VARIABLE ALUT#64=629,ALUT#64H=630,ALUT#65=631,ALUT#65H=632 VARIABLE ALUT#66=633,ALUT#66H=634,ALUT#67=635,ALUT#67H=636 VARIABLE ALUT#68=637,ALUT#68H=638,ALUT#69=639,ALUT#69H=640 VARIABLE ALUT#70=641,ALUT#70H=642,ALUT#71=643,ALUT#71H=644 VARIABLE ALUT#72=645,ALUT#72H=646,ALUT#73=647,ALUT#73H=648 VARIABLE ALUT#74=649,ALUT#74H=650,ALUT#75=651,ALUT#75H=652 VARIABLE ALUT#76=653,ALUT#76H=654,ALUT#77=655,ALUT#77H=656 VARIABLE ALUT#78=657,ALUT#78H=658,ALUT#79=659,ALUT#79H=660 VARIABLE ALUT#80=661,ALUT#80H=662,ALUT#81=663,ALUT#81H=664 VARIABLE ALUT#82=665,ALUT#82H=666,ALUT#83=667,ALUT#83H=668 VARIABLE ALUT#84=669,ALUT#84H=670,ALUT#85=671,ALUT#85H=672 VARIABLE ALUT#86=673,ALUT#86H=674,ALUT#87=675,ALUT#87H=676 VARIABLE ALUT#88=677,ALUT#88H=678,ALUT#89=679,ALUT#89H=680 VARIABLE ALUT#90=681,ALUT#90H=682,ALUT#91=683,ALUT#91H=684 PKOR = 685 VARIABLE PKOR#0=685,PKOR#1=686,PKOR#2=687,PKOR#3=688 VARIABLE PKOR#4=689,PKOR#5=690,PKOR#6=691,PKOR#7=692 VARIABLE PKOR#8=693,PKOR#9=694,PKOR#10=695,PKOR#11=696 VARIABLE PKOR#12=697,PKOR#13=698,PKOR#14=699,PKOR#15=700 VARIABLE PKOR#16=701,PKOR#17=702,PKOR#18=703,PKOR#19=704 VARIABLE PKOR#20=705,PKOR#21=706,PKOR#22=707,PKOR#23=708 VARIABLE PKOR#24=709,PKOR#25=710,PKOR#26=711,PKOR#27=712 VARIABLE PKOR#28=713,PKOR#29=714,PKOR#30=715,PKOR#31=716 VARIABLE PKOR#32=717,PKOR#33=718,PKOR#34=719,PKOR#35=720 VARIABLE PKOR#36=721,PKOR#37=722,PKOR#38=723,PKOR#39=724 VARIABLE PKOR#40=725,PKOR#41=726,PKOR#42=727,PKOR#43=728 VARIABLE PKOR#44=729,PKOR#45=730,PKOR#46=731,PKOR#47=732 VARIABLE PKOR#48=733,PKOR#49=734,PKOR#50=735,PKOR#51=736 VARIABLE PKOR#52=737,PKOR#53=738,PKOR#54=739,PKOR#55=740 VARIABLE PKOR#56=741,PKOR#57=742,PKOR#58=743,PKOR#59=744 VARIABLE PKOR#60=745,PKOR#61=746,PKOR#62=747,PKOR#63=748 VARIABLE PKOR#64=749,PKOR#65=750,PKOR#66=751,PKOR#67=752 VARIABLE PKOR#68=753,PKOR#69=754,PKOR#70=755,PKOR#71=756 VARIABLE PKOR#72=757,PKOR#73=758,PKOR#74=759,PKOR#75=760 VARIABLE PKOR#76=761,PKOR#77=762,PKOR#78=763,PKOR#79=764 VARIABLE PKOR#80=765,PKOR#81=766,PKOR#82=767,PKOR#83=768 VARIABLE PKOR#84=769,PKOR#85=770,PKOR#86=771,PKOR#87=772 VARIABLE PKOR#88=773,PKOR#89=774,PKOR#90=775,PKOR#91=776 AKOR = 777 VARIABLE AKOR#0=777,AKOR#1=778,AKOR#2=779,AKOR#3=780 VARIABLE AKOR#4=781,AKOR#5=782,AKOR#6=783,AKOR#7=784 VARIABLE AKOR#8=785,AKOR#9=786,AKOR#10=787,AKOR#11=788 VARIABLE AKOR#12=789,AKOR#13=790,AKOR#14=791,AKOR#15=792 VARIABLE AKOR#16=793,AKOR#17=794,AKOR#18=795,AKOR#19=796 VARIABLE AKOR#20=797,AKOR#21=798,AKOR#22=799,AKOR#23=800 VARIABLE AKOR#24=801,AKOR#25=802,AKOR#26=803,AKOR#27=804 VARIABLE AKOR#28=805,AKOR#29=806,AKOR#30=807,AKOR#31=808 VARIABLE AKOR#32=809,AKOR#33=810,AKOR#34=811,AKOR#35=812 VARIABLE AKOR#36=813,AKOR#37=814,AKOR#38=815,AKOR#39=816 VARIABLE AKOR#40=817,AKOR#41=818,AKOR#42=819,AKOR#43=820 VARIABLE AKOR#44=821,AKOR#45=822,AKOR#46=823,AKOR#47=824 VARIABLE AKOR#48=825,AKOR#49=826,AKOR#50=827,AKOR#51=828 VARIABLE AKOR#52=829,AKOR#53=830,AKOR#54=831,AKOR#55=832 VARIABLE AKOR#56=833,AKOR#57=834,AKOR#58=835,AKOR#59=836 VARIABLE AKOR#60=837,AKOR#61=838,AKOR#62=839,AKOR#63=840 VARIABLE AKOR#64=841,AKOR#65=842,AKOR#66=843,AKOR#67=844 VARIABLE AKOR#68=845,AKOR#69=846,AKOR#70=847,AKOR#71=848 VARIABLE AKOR#72=849,AKOR#73=850,AKOR#74=851,AKOR#75=852 VARIABLE AKOR#76=853,AKOR#77=854,AKOR#78=855,AKOR#79=856 VARIABLE AKOR#80=857,AKOR#81=858,AKOR#82=859,AKOR#83=860 VARIABLE AKOR#84=861,AKOR#85=862,AKOR#86=863,AKOR#87=864 VARIABLE AKOR#88=865,AKOR#89=866,AKOR#90=867,AKOR#91=868 USART_RINGBUFFER = 1496 VARIABLE USART_RINGBUFFER#0=1496,USART_RINGBUFFER#1=1497,USART_RINGBUFFER#2=1498,USART_RINGBUFFER#3=1499 VARIABLE USART_RINGBUFFER#4=1500,USART_RINGBUFFER#5=1501,USART_RINGBUFFER#6=1502,USART_RINGBUFFER#7=1503 VARIABLE USART_RINGBUFFER#8=1504,USART_RINGBUFFER#9=1505,USART_RINGBUFFER#10=1506,USART_RINGBUFFER#11=1507 VARIABLE USART_RINGBUFFER#12=1508,USART_RINGBUFFER#13=1509,USART_RINGBUFFER#14=1510,USART_RINGBUFFER#15=1511 VARIABLE USART_RINGBUFFER#16=1512,USART_RINGBUFFER#17=1513,USART_RINGBUFFER#18=1514,USART_RINGBUFFER#19=1515 VARIABLE USART_RINGBUFFER#20=1516,USART_RINGBUFFER#21=1517,USART_RINGBUFFER#22=1518,USART_RINGBUFFER#23=1519 VARIABLE USART_RINGBUFFER#24=1520,USART_RINGBUFFER#25=1521,USART_RINGBUFFER#26=1522,USART_RINGBUFFER#27=1523 VARIABLE USART_RINGBUFFER#28=1524,USART_RINGBUFFER#29=1525,USART_RINGBUFFER#30=1526,USART_RINGBUFFER#31=1527 VARIABLE USART_RINGBUFFER#32=1528,USART_RINGBUFFER#33=1529,USART_RINGBUFFER#34=1530,USART_RINGBUFFER#35=1531 VARIABLE USART_RINGBUFFER#36=1532,USART_RINGBUFFER#37=1533,USART_RINGBUFFER#38=1534,USART_RINGBUFFER#39=1535 #DEFINE CNTL TMR0L #DEFINE CNTLH TMR0LH #DEFINE STBIT BYTEIN,7 #DEFINE VELFLAGS0 VELFLAGS #DEFINE VELFLAGS1 VELFLAGSH #DEFINE LUTSNAAR LUTH #DEFINE LUTMULTI LUT #DEFINE FSR0SAVEINT PP0 #DEFINE FSR0SAVEINTH PP0H #DEFINE USART_FSR0_SAVE FSR0SAVEINT #DEFINE USART_FSR0_SAVEH FSR0SAVEINTH #DEFINE USART_FSR0 FSR0L #DEFINE USART_FSR0H FSR0LH #DEFINE USART_FSR1 FSR1L #DEFINE USART_FSR1H FSR1LH #DEFINE _WTIMER0M TMR0L #DEFINE _WTIMER0MH TMR0LH #DEFINE _WTIMER1M TMR1L #DEFINE _WTIMER1MH TMR1LH #DEFINE _WTIMER3M TMR3L #DEFINE _WTIMER3MH TMR3LH #DEFINE __OPTIMISER_LEVEL 3 #DEFINE __XTAL 64 #DEFINE MIDICHANNEL 1 #DEFINE NOTEOFF_STATUS 129 #DEFINE NOTEON_STATUS 145 #DEFINE KEYPRES_STATUS 161 #DEFINE CONTROL_STATUS 177 #DEFINE PROGCHANGE_STATUS 193 #DEFINE AFTERTOUCH_STATUS 209 #DEFINE PITCHBEND_STATUS 225 #DEFINE __HSERIAL_BAUD 31250 #DEFINE __HSERIAL_TXSTA 36 #DEFINE __START_OF_RESERVE_RAM 1496 #DEFINE __RESERVE_RAM_SIZE 40 #DEFINE USART_BUFFERSIZE 40 HSERIAL_SPBRG = 127 HSERIAL_TXSTA = 36 HSERIAL_RCSTA = 144 HSERIAL_BAUD = 31250 PROTON#CODE#START ORG 0X000000 GOTO PROTON#MAIN#START ORG 0X000008 BRA HIGH_PRIOR_INTERRUPT T@GT MOVWF 7 MOVLW 1 T@ST MOVWF 2 MOVF 8,W SUBWF 6,W BNZ CN@EQ MOVF 7,W SUBWF 5,W CN@EQ MOVLW 4 BTFSC 4056,0 MOVLW 1 BTFSC 4056,2 MOVLW 2 ANDWF 2,W BTFSS 4056,2 MOVLW 1 RETURN HRSIN#REQ = 1 HRSINX#REQ = 1 HRSIN#CLROERR = 1 HRSOUT#REQ = 1 DL@MS CLRF 8 DLY@W MOVWF 7 DLY@P MOVLW 255 ADDWF 7,F ADDWFC 8,F BRA $ + 2 BTFSS 4056,0 RETURN MOVLW 3 MOVWF 6 MOVLW 231 RCALL DLUS@W BRA DLY@P DL@US CLRF 6 DLUS@W ADDLW 254 MOVWF 5 NOP BRA $ + 2 BRA $ + 2 CLRF 4072 SUBWFB 6,F BTFSS 4056,0 RETURN DECF 5,F BRA $ + 2 BRA $ + 2 BRA $ - 20 MIN@B CLRF 6 MIN@W CLRF 8 MI@N RCALL T@GT MAX@MIN BZ MX@X MOVFF 8,6 MOVFF 7,5 MX@X MOVF 5,W RETURN PROTON#MAIN#START CLRF 4088 CLRF 0 MOVLW 127 MOVWF 4015 MOVLW 36 MOVWF 4012 MOVLW 144 MOVWF 4011 MOVLB 0 F2_SOF EQU $ ; AEIO_MASTER.PRP F2_EOF EQU $ ; AEIO_MASTER.PRP F1_SOF EQU $ ; AEIO_MASTER.BAS F3_SOF EQU $ ; AEIO_IRQ.INC HRSINTO#REQ = 1 HRSOUT#REQ = 1 F3_000042 EQU $ ; IN [AEIO_IRQ.INC] GOTO _OVER_IRQ_HANDLER BRA _OVER_IRQ_HANDLER HIGH_PRIOR_INTERRUPT F3_000056 EQU $ ; IN [AEIO_IRQ.INC] IF PIR1.5 = 1 THEN BTFSS PIR1,5 BRA BC@LL2 F3_000057 EQU $ ; IN [AEIO_IRQ.INC] MOVLW 6 MOVLW 6 F3_000058 EQU $ ; IN [AEIO_IRQ.INC] ANDWF RCSTA,W ANDWF RCSTA,W F3_000059 EQU $ ; IN [AEIO_IRQ.INC] BNZ _UART_ERROR BNZ _UART_ERROR F3_000060 EQU $ ; IN [AEIO_IRQ.INC] USART_FSR1_SAVE = USART_FSR1 MOVFF FSR1L,USART_FSR1_SAVE MOVFF FSR1LH,USART_FSR1_SAVEH F3_000061 EQU $ ; IN [AEIO_IRQ.INC] INC USART_INDEXIN INCF USART_INDEXIN,F,0 F3_000062 EQU $ ; IN [AEIO_IRQ.INC] IF USART_INDEXIN >= USART_BUFFERSIZE THEN MOVLW 40 SUBWF USART_INDEXIN,W,0 BTFSC STATUS,0 F3_000063 EQU $ ; IN [AEIO_IRQ.INC] CLEAR USART_INDEXIN CLRF USART_INDEXIN,0 F3_000064 EQU $ ; IN [AEIO_IRQ.INC] ENDIF BC@LL4 F3_000065 EQU $ ; IN [AEIO_IRQ.INC] USART_FSR1 = VARPTR USART_RINGBUFFER LFSR 1,USART_RINGBUFFER F3_000066 EQU $ ; IN [AEIO_IRQ.INC] USART_FSR1 = USART_FSR1 + USART_INDEXIN MOVF USART_INDEXIN,W,0 ADDWF FSR1L,F,0 MOVLW 0 ADDWFC FSR1LH,F,0 F3_000067 EQU $ ; IN [AEIO_IRQ.INC] INDF1 = RCREG MOVFF RCREG,INDF1 F3_000068 EQU $ ; IN [AEIO_IRQ.INC] USART_FSR1 = USART_FSR1_SAVE MOVFF USART_FSR1_SAVE,FSR1L MOVFF USART_FSR1_SAVEH,FSR1LH F3_000069 EQU $ ; IN [AEIO_IRQ.INC] RETFIE FAST RETFIE 1 _UART_ERROR F3_000071 EQU $ ; IN [AEIO_IRQ.INC] WREG = RCREG MOVF RCREG,W,0 F3_000072 EQU $ ; IN [AEIO_IRQ.INC] WREG = RCREG MOVF RCREG,W,0 F3_000073 EQU $ ; IN [AEIO_IRQ.INC] CLEAR RCSTA.4 BCF RCSTA,4,0 F3_000074 EQU $ ; IN [AEIO_IRQ.INC] SET RCSTA.4 BSF RCSTA,4,0 F3_000075 EQU $ ; IN [AEIO_IRQ.INC] RETFIE FAST RETFIE 1 BRA BC@LL5 BC@LL2 F3_000077 EQU $ ; IN [AEIO_IRQ.INC] ELSE _TIMER0_IRQ F3_000079 EQU $ ; IN [AEIO_IRQ.INC] IF INTCON.2 = 1 THEN BTFSS INTCON,2 BRA BC@LL7 F3_000080 EQU $ ; IN [AEIO_IRQ.INC] CLEAR INTCON.2 BCF INTCON,2,0 F3_000083 EQU $ ; IN [AEIO_IRQ.INC] IF VELFLAGS > 0 THEN INC CNT.WORD1 MOVF VELFLAGS,F,0 BNZ CP@LB2 MOVF VELFLAGSH,F,0 BZ BC@LL9 CP@LB2 INFSNZ CNTHH,F,0 INCF CNTHHH,F,0 BC@LL9 F3_000084 EQU $ ; IN [AEIO_IRQ.INC] IF VELFLAGS = 0 THEN CLEAR CNT.WORD1 MOVF VELFLAGSH,W,0 IORWF VELFLAGS,W,0 BNZ BC@LL11 CLRF CNTHH,0 CLRF CNTHHH,0 BC@LL11 F3_000087 EQU $ ; IN [AEIO_IRQ.INC] ENDIF BC@LL7 F3_000088 EQU $ ; IN [AEIO_IRQ.INC] ENDIF BC@LL5 F3_000089 EQU $ ; IN [AEIO_IRQ.INC] RETFIE FAST RETFIE 1 HRSIN: READ#BUFFER_REQ = 1 _M_LOOP F3_000114 EQU $ ; IN [AEIO_IRQ.INC] GW = USART_INDEXIN - USART_INDEXOUT MOVF USART_INDEXOUT,W,0 SUBWF USART_INDEXIN,W,0 MOVWF GW,0 CLRF GWH,0 BTFSS STATUS,0,0 DECF GWH,F,0 F3_000115 EQU $ ; IN [AEIO_IRQ.INC] IF GW <> 0 THEN MOVF GWH,W,0 IORWF GW,W,0 BZ BC@LL13 F3_000116 EQU $ ; IN [AEIO_IRQ.INC] INC USART_INDEXOUT INCF USART_INDEXOUT,F,0 F3_000117 EQU $ ; IN [AEIO_IRQ.INC] IF USART_INDEXOUT >= USART_BUFFERSIZE THEN MOVLW 40 SUBWF USART_INDEXOUT,W,0 BTFSC STATUS,0 F3_000118 EQU $ ; IN [AEIO_IRQ.INC] CLEAR USART_INDEXOUT CLRF USART_INDEXOUT,0 F3_000119 EQU $ ; IN [AEIO_IRQ.INC] ENDIF BC@LL15 F3_000120 EQU $ ; IN [AEIO_IRQ.INC] USART_FSR0_SAVE = USART_FSR0 MOVFF FSR0L,FSR0SAVEINT MOVFF FSR0LH,FSR0SAVEINTH F3_000121 EQU $ ; IN [AEIO_IRQ.INC] USART_FSR0 = VARPTR USART_RINGBUFFER LFSR 0,USART_RINGBUFFER F3_000122 EQU $ ; IN [AEIO_IRQ.INC] USART_FSR0 = USART_FSR0 + USART_INDEXOUT MOVF USART_INDEXOUT,W,0 ADDWF FSR0L,F,0 MOVLW 0 ADDWFC FSR0LH,F,0 F3_000123 EQU $ ; IN [AEIO_IRQ.INC] WREG = INDF0 MOVF INDF0,W,0 F3_000124 EQU $ ; IN [AEIO_IRQ.INC] PP0 = WREG MOVWF PP0,0 F3_000125 EQU $ ; IN [AEIO_IRQ.INC] USART_FSR0 = USART_FSR0_SAVE MOVFF FSR0SAVEINT,FSR0L MOVFF FSR0SAVEINTH,FSR0LH F3_000126 EQU $ ; IN [AEIO_IRQ.INC] SET STATUS.0 BSF STATUS,0,0 F3_000127 EQU $ ; IN [AEIO_IRQ.INC] RET RETURN 0 BRA BC@LL16 BC@LL13 F3_000128 EQU $ ; IN [AEIO_IRQ.INC] ELSE F3_000129 EQU $ ; IN [AEIO_IRQ.INC] WREG = 255 SETF WREG,0 F3_000130 EQU $ ; IN [AEIO_IRQ.INC] BTFSS STATUS,C BTFSS STATUS,C F3_000131 EQU $ ; IN [AEIO_IRQ.INC] RET RETURN 0 F3_000132 EQU $ ; IN [AEIO_IRQ.INC] ENDIF BC@LL16 F3_000133 EQU $ ; IN [AEIO_IRQ.INC] BRA _M_LOOP BRA _M_LOOP _INIT_USART F3_000150 EQU $ ; IN [AEIO_IRQ.INC] CLEAR USART_INDEXIN CLRF USART_INDEXIN,0 F3_000151 EQU $ ; IN [AEIO_IRQ.INC] CLEAR USART_INDEXOUT CLRF USART_INDEXOUT,0 F3_000152 EQU $ ; IN [AEIO_IRQ.INC] SET PIE1.5 BSF PIE1,5,0 F3_000154 EQU $ ; IN [AEIO_IRQ.INC] SET IPR1.5 BSF IPR1,5,0 F3_000156 EQU $ ; IN [AEIO_IRQ.INC] SET INTCON.7 BSF INTCON,7,0 F3_000157 EQU $ ; IN [AEIO_IRQ.INC] SET INTCON.6 BSF INTCON,6,0 F3_000159 EQU $ ; IN [AEIO_IRQ.INC] RETURN RETURN 0 _CLEAR_USART_BUFFER F3_000174 EQU $ ; IN [AEIO_IRQ.INC] PIE1.5 = 0 BCF PIE1,5,0 F3_000175 EQU $ ; IN [AEIO_IRQ.INC] CLEAR USART_RINGBUFFER LFSR 0,USART_RINGBUFFER MOVLW 40 CLRF POSTINC0,0 DECFSZ WREG,F,0 BRA $ - 4 F3_000176 EQU $ ; IN [AEIO_IRQ.INC] CLEAR USART_INDEXIN CLRF USART_INDEXIN,0 F3_000177 EQU $ ; IN [AEIO_IRQ.INC] CLEAR USART_INDEXOUT CLRF USART_INDEXOUT,0 F3_000178 EQU $ ; IN [AEIO_IRQ.INC] SET PIE1.5 BSF PIE1,5,0 F3_000179 EQU $ ; IN [AEIO_IRQ.INC] RETURN RETURN 0 LOW_PRIOR_INTERRUPT F3_000193 EQU $ ; IN [AEIO_IRQ.INC] CONTEXT SAVE BCF INTCON,7,0 MOVFF STATUS,1458 MOVFF WREG,1459 MOVFF BSR,1460 MOVFF FSR0L,1461 MOVFF FSR0H,1462 MOVFF FSR1L,1463 MOVFF FSR1H,1464 MOVFF FSR2L,1465 MOVFF FSR2H,1466 MOVFF TBLPTRL,1467 MOVFF TBLPTRH,1468 MOVFF TABLAT,1469 MOVFF PRODL,1470 MOVFF PRODH,1471 MOVFF EECON1,1472 BSF INTCON,7,0 MOVLB 0 F3_000194 EQU $ ; IN [AEIO_IRQ.INC] IF INTCON.2 = 1 THEN BTFSC INTCON,2 F3_000206 EQU $ ; IN [AEIO_IRQ.INC] CLEAR INTCON.2 BCF INTCON,2,0 F3_000207 EQU $ ; IN [AEIO_IRQ.INC] ENDIF BC@LL18 F3_000211 EQU $ ; IN [AEIO_IRQ.INC] CONTEXT RESTORE BCF INTCON,7,0 MOVFF 1458,STATUS MOVFF 1459,WREG MOVFF 1460,BSR MOVFF 1461,FSR0L MOVFF 1462,FSR0H MOVFF 1463,FSR1L MOVFF 1464,FSR1H MOVFF 1465,FSR2L MOVFF 1466,FSR2H MOVFF 1467,TBLPTRL MOVFF 1468,TBLPTRH MOVFF 1469,TABLAT MOVFF 1470,PRODL MOVFF 1471,PRODH MOVFF 1472,EECON1 BSF INTCON,7,0 RETFIE HRSOUT F3_000222 EQU $ ; IN [AEIO_IRQ.INC] BTFSS PIR1.4 BTFSS PIR1,4 F3_000223 EQU $ ; IN [AEIO_IRQ.INC] BRA ($ - 2) BRA ($ - 2) F3_000224 EQU $ ; IN [AEIO_IRQ.INC] MOVWF TXREG MOVWF TXREG F3_000225 EQU $ ; IN [AEIO_IRQ.INC] RETURN RETURN 0 _OVER_IRQ_HANDLER F3_EOF EQU $ ; AEIO_IRQ.INC F4_SOF EQU $ ; TIMERS.INC F4_EOF EQU $ ; TIMERS.INC F1_000219 EQU $ ; IN [AEIO_MASTER.BAS] TRISA = %01000000 MOVLW 64 MOVWF TRISA,0 F1_000220 EQU $ ; IN [AEIO_MASTER.BAS] TRISB = %11100000 MOVLW 224 MOVWF TRISB,0 F1_000221 EQU $ ; IN [AEIO_MASTER.BAS] TRISC = %11000000 MOVLW 192 MOVWF TRISC,0 F1_000224 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.0 BCF TRISB,0,0 BCF LATB,0,0 F1_000225 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.1 BCF TRISB,1,0 BCF LATB,1,0 F1_000226 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.2 BCF TRISB,2,0 BCF LATB,2,0 F1_000227 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.3 BCF TRISB,3,0 BCF LATB,3,0 F1_000228 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.4 BCF TRISB,4,0 BCF LATB,4,0 F1_000229 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.5 BCF TRISB,5,0 BCF LATB,5,0 F1_000230 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.5 BCF TRISA,5,0 BCF LATA,5,0 F1_000231 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.4 BCF TRISA,4,0 BCF LATA,4,0 F1_000232 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.3 BCF TRISA,3,0 BCF LATA,3,0 F1_000233 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.2 BCF TRISA,2,0 BCF LATA,2,0 F1_000234 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.1 BCF TRISA,1,0 BCF LATA,1,0 F1_000235 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.0 BCF TRISA,0,0 BCF LATA,0,0 F1_000236 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.0 BCF TRISC,0,0 BCF LATC,0,0 F1_000237 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.3 BCF TRISC,3,0 BCF LATC,3,0 F1_000238 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.4 BCF TRISC,4,0 BCF LATC,4,0 F1_000239 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.5 BCF TRISC,5,0 BCF LATC,5,0 F1_000243 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.1 BCF TRISC,1,0 BCF LATC,1,0 F1_000244 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.2 BCF TRISC,2,0 BCF LATC,2,0 F1_000248 EQU $ ; IN [AEIO_MASTER.BAS] GOTO START_2 BRA START_2 START_0 F1_000250 EQU $ ; IN [AEIO_MASTER.BAS] GOSUB LOOKUP_PLATO_PITCH CALL LOOKUP_PLATO_PITCH F1_000251 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MAIN BRA MAIN START_1 F1_000253 EQU $ ; IN [AEIO_MASTER.BAS] GOSUB LOOKUP_SCIENCE_PITCH CALL LOOKUP_SCIENCE_PITCH F1_000254 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MAIN BRA MAIN START_2 F1_000256 EQU $ ; IN [AEIO_MASTER.BAS] GOSUB LOOKUP_EMPIRIC CALL LOOKUP_EMPIRIC F1_000257 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MAIN BRA MAIN START_3 F1_000259 EQU $ ; IN [AEIO_MASTER.BAS] GOSUB LOOKUP_EQ CALL LOOKUP_EQ MAIN F1_000262 EQU $ ; IN [AEIO_MASTER.BAS] DELAYMS 100 MOVLW 100 RCALL DL@MS F1_000264 EQU $ ; IN [AEIO_MASTER.BAS] INIT_USART_INTERRUPT VARIABLE MAX_PARAMS=10,INIT_USART_INTERRUPT_RETURN=0,PRM_COUNT=0 RCALL _INIT_USART F1_000266 EQU $ ; IN [AEIO_MASTER.BAS] CLEAR_SERIAL_BUFFER VARIABLE MAX_PARAMS=10,CLEAR_SERIAL_BUFFER_RETURN=0,PRM_COUNT=0 RCALL _CLEAR_USART_BUFFER F1_000279 EQU $ ; IN [AEIO_MASTER.BAS] _OPENTIMER0 %11111111 & %10111111 & %11011111 & %11110111 VARIABLE MAX_PARAMS=10,_OPENTIMER0_RETURN=0,PRM_COUNT=1 MOVLW 23 MOVWF T0CON CLRF TMR0H,0 CLRF TMR0L,0 BCF INTCON,2,0 BSF INTCON,5,0 BSF T0CON,7,0 F1_000281 EQU $ ; IN [AEIO_MASTER.BAS] GOSUB INIT_AEIO CALL INIT_AEIO F1_000283 EQU $ ; IN [AEIO_MASTER.BAS] GOSUB INIT_VELOSCALES CALL INIT_VELOSCALES F1_000288 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTC.5 BCF TRISC,5,0 BSF LATC,5,0 F1_000291 EQU $ ; IN [AEIO_MASTER.BAS] WHILE 1 = 1 BC@LL19 F1_000292 EQU $ ; IN [AEIO_MASTER.BAS] BYTEIN = HRSIN RCALL HRSIN MOVWF BYTEIN,0 MIDI_PARSE F1_000296 EQU $ ; IN [AEIO_MASTER.BAS] IF BYTEIN > PROGCHANGE_STATUS THEN MOVLW 194 SUBWF BYTEIN,W,0 BNC BC@LL22 F1_000297 EQU $ ; IN [AEIO_MASTER.BAS] IF BYTEIN > 253 THEN MOVLW 254 SUBWF BYTEIN,W,0 BNC BC@LL24 F1_000301 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END BRA BC@LL25 BC@LL24 F1_000302 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000303 EQU $ ; IN [AEIO_MASTER.BAS] CLEAR STATUSBYTE CLRF STATUSBYTE,0 F1_000304 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END F1_000305 EQU $ ; IN [AEIO_MASTER.BAS] END IF BC@LL25 F1_000306 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL22 F1_000307 EQU $ ; IN [AEIO_MASTER.BAS] IF STBIT =1 THEN BTFSS BYTEIN,7 BRA BC@LL27 F1_000309 EQU $ ; IN [AEIO_MASTER.BAS] CLEAR STATUSBYTE CLRF STATUSBYTE,0 F1_000310 EQU $ ; IN [AEIO_MASTER.BAS] SELECT BYTEIN F1_000311 EQU $ ; IN [AEIO_MASTER.BAS] CASE NOTEOFF_STATUS MOVLW 129 SUBWF BYTEIN,W,0 BNZ BC@LL29 F1_000312 EQU $ ; IN [AEIO_MASTER.BAS] STATUSBYTE = BYTEIN MOVFF BYTEIN,STATUSBYTE F1_000313 EQU $ ; IN [AEIO_MASTER.BAS] NOTEUIT = 255 SETF NOTEUIT,0 F1_000314 EQU $ ; IN [AEIO_MASTER.BAS] RELEASE = 255 SETF RELEASE,0 BRA BC@LL28 BC@LL29 F1_000315 EQU $ ; IN [AEIO_MASTER.BAS] CASE NOTEON_STATUS MOVLW 145 SUBWF BYTEIN,W,0 BNZ BC@LL32 F1_000316 EQU $ ; IN [AEIO_MASTER.BAS] STATUSBYTE = BYTEIN MOVFF BYTEIN,STATUSBYTE F1_000317 EQU $ ; IN [AEIO_MASTER.BAS] NOTEAAN = 255 SETF NOTEAAN,0 F1_000318 EQU $ ; IN [AEIO_MASTER.BAS] VELO = 255 SETF VELO,0 BRA BC@LL28 BC@LL32 F1_000319 EQU $ ; IN [AEIO_MASTER.BAS] CASE KEYPRES_STATUS MOVLW 161 SUBWF BYTEIN,W,0 BNZ BC@LL34 F1_000320 EQU $ ; IN [AEIO_MASTER.BAS] STATUSBYTE = BYTEIN MOVFF BYTEIN,STATUSBYTE F1_000321 EQU $ ; IN [AEIO_MASTER.BAS] NOTEPRES = 255 SETF NOTEPRES,0 F1_000322 EQU $ ; IN [AEIO_MASTER.BAS] PRES = 255 SETF PRES,0 BRA BC@LL28 BC@LL34 F1_000323 EQU $ ; IN [AEIO_MASTER.BAS] CASE CONTROL_STATUS MOVLW 177 SUBWF BYTEIN,W,0 BNZ BC@LL36 F1_000324 EQU $ ; IN [AEIO_MASTER.BAS] STATUSBYTE = BYTEIN MOVFF BYTEIN,STATUSBYTE F1_000325 EQU $ ; IN [AEIO_MASTER.BAS] CTRL = 255 SETF CTRL,0 F1_000326 EQU $ ; IN [AEIO_MASTER.BAS] VALUE = 255 SETF VALUE,0 BRA BC@LL28 BC@LL36 F1_000327 EQU $ ; IN [AEIO_MASTER.BAS] CASE PROGCHANGE_STATUS MOVLW 193 SUBWF BYTEIN,W,0 BNZ BC@LL38 F1_000328 EQU $ ; IN [AEIO_MASTER.BAS] STATUSBYTE = BYTEIN MOVFF BYTEIN,STATUSBYTE F1_000329 EQU $ ; IN [AEIO_MASTER.BAS] PROG = 255 SETF PROG,0 F1_000337 EQU $ ; IN [AEIO_MASTER.BAS] END SELECT BC@LL38 BC@LL28 BRA BC@LL39 BC@LL27 F1_000338 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000339 EQU $ ; IN [AEIO_MASTER.BAS] SELECT STATUSBYTE F1_000340 EQU $ ; IN [AEIO_MASTER.BAS] CASE 0 MOVF STATUSBYTE,F,0 BNZ BC@LL41 F1_000341 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END BRA BC@LL40 BC@LL41 F1_000342 EQU $ ; IN [AEIO_MASTER.BAS] CASE NOTEOFF_STATUS MOVLW 129 SUBWF STATUSBYTE,W,0 BNZ BC@LL44 F1_000343 EQU $ ; IN [AEIO_MASTER.BAS] IF NOTEUIT = 255 THEN INCF NOTEUIT,W,0 BNZ BC@LL46 F1_000344 EQU $ ; IN [AEIO_MASTER.BAS] NOTEUIT = BYTEIN MOVFF BYTEIN,NOTEUIT BRA BC@LL47 BC@LL46 F1_000345 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000346 EQU $ ; IN [AEIO_MASTER.BAS] RELEASE = BYTEIN MOVFF BYTEIN,RELEASE F1_000350 EQU $ ; IN [AEIO_MASTER.BAS] SELECT NOTEUIT F1_000351 EQU $ ; IN [AEIO_MASTER.BAS] CASE > 35 MOVLW 36 SUBWF NOTEUIT,W,0 BNC BC@LL49 F1_000353 EQU $ ; IN [AEIO_MASTER.BAS] GOSUB AEIO_NOTEOFF RCALL AEIO_NOTEOFF F1_000354 EQU $ ; IN [AEIO_MASTER.BAS] NOTEUIT = 255 SETF NOTEUIT,0 F1_000355 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END BRA BC@LL48 BC@LL49 F1_000357 EQU $ ; IN [AEIO_MASTER.BAS] CASE < 7 MOVLW 7 SUBWF NOTEUIT,W,0 BC BC@LL52 F1_000358 EQU $ ; IN [AEIO_MASTER.BAS] ON LIGHTINDEX[NOTEUIT] GOSUB NOC, NOD, NOE, NOF, YELO1, YELO2 LFSR 0,LIGHTINDEX MOVF NOTEUIT,W,0 MOVF PLUSW0,W,0 MOVWF PP0,0 SUBLW 5 BNC JE@LB1 CLRF PCLATH,0 BCF STATUS,0,0 RLCF PP0,F,0 RLCF PCLATH,F,0 RLCF PP0,F,0 RLCF PCLATH,F,0 MOVLW 66 ADDWF PP0,F,0 MOVLW 3 ADDWFC PCLATH,F,0 PUSH MOVLW 3 MOVWF TOSH,0 MOVLW 90 MOVWF TOSL,0 MOVF PP0,W,0 MOVWF PCL,0 JP@LB2 GOTO NOC GOTO NOD GOTO NOE GOTO NOF GOTO YELO1 GOTO YELO2 JE@LB1 F1_000359 EQU $ ; IN [AEIO_MASTER.BAS] NOTEUIT = 255 SETF NOTEUIT,0 F1_000360 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END F1_000361 EQU $ ; IN [AEIO_MASTER.BAS] END SELECT BC@LL52 BC@LL48 F1_000362 EQU $ ; IN [AEIO_MASTER.BAS] NOTEUIT = 255 SETF NOTEUIT,0 F1_000363 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL47 F1_000364 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END BRA BC@LL40 BC@LL44 F1_000365 EQU $ ; IN [AEIO_MASTER.BAS] CASE NOTEON_STATUS MOVLW 145 SUBWF STATUSBYTE,W,0 BTFSS STATUS,2 BRA BC@LL54 F1_000366 EQU $ ; IN [AEIO_MASTER.BAS] IF NOTEAAN = 255 THEN INCF NOTEAAN,W,0 BNZ BC@LL56 F1_000367 EQU $ ; IN [AEIO_MASTER.BAS] NOTEAAN = BYTEIN MOVFF BYTEIN,NOTEAAN BRA BC@LL57 BC@LL56 F1_000368 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000369 EQU $ ; IN [AEIO_MASTER.BAS] VELO = BYTEIN MOVFF BYTEIN,VELO F1_000370 EQU $ ; IN [AEIO_MASTER.BAS] IF VELO = 0 THEN MOVF VELO,F,0 BNZ BC@LL59 F1_000374 EQU $ ; IN [AEIO_MASTER.BAS] IF NOTEAAN > 35 THEN MOVLW 36 SUBWF NOTEAAN,W,0 BNC BC@LL61 F1_000376 EQU $ ; IN [AEIO_MASTER.BAS] NOTEUIT = NOTEAAN MOVFF NOTEAAN,NOTEUIT F1_000377 EQU $ ; IN [AEIO_MASTER.BAS] RELEASE = VELO MOVFF VELO,RELEASE F1_000378 EQU $ ; IN [AEIO_MASTER.BAS] GOSUB AEIO_NOTEOFF RCALL AEIO_NOTEOFF F1_000379 EQU $ ; IN [AEIO_MASTER.BAS] NOTEUIT = 255 SETF NOTEUIT,0 BRA BC@LL62 BC@LL61 F1_000381 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000382 EQU $ ; IN [AEIO_MASTER.BAS] IF NOTEAAN < 7 THEN ON LIGHTINDEX[NOTEAAN] GOSUB NOC, NOD, NOE, NOF, YELO1, YELO2 MOVLW 7 SUBWF NOTEAAN,W,0 BC BC@LL64 LFSR 0,LIGHTINDEX MOVF NOTEAAN,W,0 MOVF PLUSW0,W,0 MOVWF PP0,0 SUBLW 5 BNC JE@LB4 CLRF PCLATH,0 BCF STATUS,0,0 RLCF PP0,F,0 RLCF PCLATH,F,0 RLCF PP0,F,0 RLCF PCLATH,F,0 MOVLW 200 ADDWF PP0,F,0 MOVLW 3 ADDWFC PCLATH,F,0 PUSH MOVLW 3 MOVWF TOSH,0 MOVLW 224 MOVWF TOSL,0 MOVF PP0,W,0 MOVWF PCL,0 JP@LB5 GOTO NOC GOTO NOD GOTO NOE GOTO NOF GOTO YELO1 GOTO YELO2 JE@LB4 BC@LL64 F1_000383 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL62 F1_000384 EQU $ ; IN [AEIO_MASTER.BAS] NOTEAAN = 255 SETF NOTEAAN,0 F1_000385 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END F1_000386 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL59 F1_000387 EQU $ ; IN [AEIO_MASTER.BAS] SELECT NOTEAAN F1_000388 EQU $ ; IN [AEIO_MASTER.BAS] CASE < 24 MOVLW 24 SUBWF NOTEAAN,W,0 BC BC@LL66 F1_000389 EQU $ ; IN [AEIO_MASTER.BAS] IF NOTEAAN < 7 THEN ON LIGHTINDEX[NOTEAAN] GOSUB NAC, NAD, NAE, NAF, YELA1, YELA2 MOVLW 7 SUBWF NOTEAAN,W,0 BC BC@LL69 LFSR 0,LIGHTINDEX MOVF NOTEAAN,W,0 MOVF PLUSW0,W,0 MOVWF PP0,0 SUBLW 5 BNC JE@LB7 CLRF PCLATH,0 BCF STATUS,0,0 RLCF PP0,F,0 RLCF PCLATH,F,0 RLCF PP0,F,0 RLCF PCLATH,F,0 MOVLW 32 ADDWF PP0,F,0 MOVLW 4 ADDWFC PCLATH,F,0 PUSH MOVLW 4 MOVWF TOSH,0 MOVLW 56 MOVWF TOSL,0 MOVF PP0,W,0 MOVWF PCL,0 JP@LB8 GOTO NAC GOTO NAD GOTO NAE GOTO NAF GOTO YELA1 GOTO YELA2 JE@LB7 BC@LL69 F1_000391 EQU $ ; IN [AEIO_MASTER.BAS] NOTEAAN = 255 SETF NOTEAAN,0 F1_000392 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END BRA BC@LL65 BC@LL66 F1_000393 EQU $ ; IN [AEIO_MASTER.BAS] CASE < 36 MOVLW 36 SUBWF NOTEAAN,W,0 BC BC@LL71 F1_000395 EQU $ ; IN [AEIO_MASTER.BAS] ON HAMMERINDEX[NOTEAAN] GOSUB N24,N25,N26,N27, N28, N29, N30, N31, N32, N33, N34, N35 LFSR 0,HAMMERINDEX MOVF NOTEAAN,W,0 MOVF PLUSW0,W,0 MOVWF PP0,0 SUBLW 11 BNC JE@LB10 CLRF PCLATH,0 BCF STATUS,0,0 RLCF PP0,F,0 RLCF PCLATH,F,0 RLCF PP0,F,0 RLCF PCLATH,F,0 MOVLW 116 ADDWF PP0,F,0 MOVLW 4 ADDWFC PCLATH,F,0 PUSH MOVLW 4 MOVWF TOSH,0 MOVLW 164 MOVWF TOSL,0 MOVF PP0,W,0 MOVWF PCL,0 JP@LB11 GOTO N24 GOTO N25 GOTO N26 GOTO N27 GOTO N28 GOTO N29 GOTO N30 GOTO N31 GOTO N32 GOTO N33 GOTO N34 GOTO N35 JE@LB10 F1_000396 EQU $ ; IN [AEIO_MASTER.BAS] NOTEAAN = 255 SETF NOTEAAN,0 F1_000397 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END BRA BC@LL65 BC@LL71 F1_000398 EQU $ ; IN [AEIO_MASTER.BAS] CASE < 127 MOVLW 127 SUBWF NOTEAAN,W,0 BTFSC STATUS,0 BRA BC@LL73 F1_000400 EQU $ ; IN [AEIO_MASTER.BAS] I = NOTEAAN - 36 MOVLW 36 SUBWF NOTEAAN,W,0 MOVWF _I,0 F1_000401 EQU $ ; IN [AEIO_MASTER.BAS] IF PLUT[I] > 0 THEN LFSR 0,PLUT BCF STATUS,0,0 RLCF _I,W,0 ADDWF FSR0L,F,0 MOVLW 0 ADDWFC FSR0H,F,0 MOVFF POSTINC0,PBP#VAR0 MOVFF INDF0,PBP#VAR0H MOVF PBP#VAR0,F,0 BNZ CP@LB5 MOVF PBP#VAR0H,F,0 BTFSC STATUS,2 BRA BC@LL75 CP@LB5 F1_000402 EQU $ ; IN [AEIO_MASTER.BAS] LUT = PLUT[I] LFSR 0,PLUT BCF STATUS,0,0 RLCF _I,W,0 ADDWF FSR0L,F,0 MOVLW 0 ADDWFC FSR0H,F,0 MOVFF POSTINC0,LUT MOVFF INDF0,LUTH F1_000403 EQU $ ; IN [AEIO_MASTER.BAS] USESTRING = LUTSNAAR & 0X0F MOVLW 15 ANDWF LUTH,W,0 MOVWF USESTRING,0 F1_000407 EQU $ ; IN [AEIO_MASTER.BAS] IF SNAARX[USESTRING] = 0 THEN LFSR 0,SNAARX MOVF USESTRING,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF PBP#VAR0,F,0 BNZ BC@LL77 F1_000408 EQU $ ; IN [AEIO_MASTER.BAS] SNAARX[USESTRING] = LUTMULTI LFSR 0,SNAARX MOVF USESTRING,W,0 MOVFF LUT,PLUSW0 F1_000409 EQU $ ; IN [AEIO_MASTER.BAS] BASENOTE = LUTSNAAR >> 4 SWAPF LUTH,W,0 ANDLW 15 MOVWF BASENOTE,0 F1_000413 EQU $ ; IN [AEIO_MASTER.BAS] TUNE = PKOR[I] LFSR 0,PKOR MOVF _I,W,0 MOVF PLUSW0,W,0 MOVWF TUNE,0 BRA BC@LL78 BC@LL77 F1_000414 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000415 EQU $ ; IN [AEIO_MASTER.BAS] IF ALUT[I] > 0 THEN LFSR 0,ALUT BCF STATUS,0,0 RLCF _I,W,0 ADDWF FSR0L,F,0 MOVLW 0 ADDWFC FSR0H,F,0 MOVFF POSTINC0,PBP#VAR0 MOVFF INDF0,PBP#VAR0H MOVF PBP#VAR0,F,0 BNZ CP@LB6 MOVF PBP#VAR0H,F,0 BZ BC@LL80 CP@LB6 F1_000416 EQU $ ; IN [AEIO_MASTER.BAS] LUT = ALUT[I] LFSR 0,ALUT BCF STATUS,0,0 RLCF _I,W,0 ADDWF FSR0L,F,0 MOVLW 0 ADDWFC FSR0H,F,0 MOVFF POSTINC0,LUT MOVFF INDF0,LUTH F1_000417 EQU $ ; IN [AEIO_MASTER.BAS] USESTRING = LUTSNAAR & 0X0F MOVLW 15 ANDWF LUTH,W,0 MOVWF USESTRING,0 F1_000418 EQU $ ; IN [AEIO_MASTER.BAS] IF SNAARX[USESTRING] = 0 THEN LFSR 0,SNAARX MOVF USESTRING,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF PBP#VAR0,F,0 BNZ BC@LL82 F1_000419 EQU $ ; IN [AEIO_MASTER.BAS] SNAARX[USESTRING] = LUTMULTI LFSR 0,SNAARX MOVF USESTRING,W,0 MOVFF LUT,PLUSW0 F1_000421 EQU $ ; IN [AEIO_MASTER.BAS] BASENOTE = LUTSNAAR >> 4 SWAPF LUTH,W,0 ANDLW 15 MOVWF BASENOTE,0 F1_000423 EQU $ ; IN [AEIO_MASTER.BAS] TUNE = AKOR[I] LFSR 0,AKOR MOVF _I,W,0 MOVF PLUSW0,W,0 MOVWF TUNE,0 BRA BC@LL83 BC@LL82 F1_000424 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000425 EQU $ ; IN [AEIO_MASTER.BAS] NOTEAAN = 255 SETF NOTEAAN,0 F1_000426 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END F1_000427 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL83 BRA BC@LL84 BC@LL80 F1_000428 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000429 EQU $ ; IN [AEIO_MASTER.BAS] NOTEAAN = 255 SETF NOTEAAN,0 F1_000430 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END F1_000431 EQU $ ; IN [AEIO_MASTER.BAS] END IF BC@LL84 F1_000432 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL78 F1_000433 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL75 F1_000434 EQU $ ; IN [AEIO_MASTER.BAS] CASE ELSE BRA BC@LL86 BC@LL73 F1_000435 EQU $ ; IN [AEIO_MASTER.BAS] NOTEAAN = 255 SETF NOTEAAN,0 F1_000436 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END F1_000437 EQU $ ; IN [AEIO_MASTER.BAS] END SELECT BC@LL86 BC@LL65 F1_000438 EQU $ ; IN [AEIO_MASTER.BAS] IF USESTRING < 12 THEN GOSUB AEIO_PLAY_NOTE MOVLW 12 SUBWF USESTRING,W,0 BTFSS STATUS,0 RCALL AEIO_PLAY_NOTE BC@LL88 F1_000439 EQU $ ; IN [AEIO_MASTER.BAS] NOTEAAN = 255 SETF NOTEAAN,0 F1_000440 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL57 F1_000441 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END BRA BC@LL40 BC@LL54 F1_000442 EQU $ ; IN [AEIO_MASTER.BAS] CASE KEYPRES_STATUS MOVLW 161 SUBWF STATUSBYTE,W,0 BNZ BC@LL90 F1_000444 EQU $ ; IN [AEIO_MASTER.BAS] IF NOTEPRES = 255 THEN INCF NOTEPRES,W,0 BNZ BC@LL92 F1_000445 EQU $ ; IN [AEIO_MASTER.BAS] NOTEPRES = BYTEIN MOVFF BYTEIN,NOTEPRES BRA BC@LL93 BC@LL92 F1_000446 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000447 EQU $ ; IN [AEIO_MASTER.BAS] PRES = BYTEIN MOVFF BYTEIN,PRES F1_000448 EQU $ ; IN [AEIO_MASTER.BAS] GOSUB KEYPRES RCALL KEYPRES F1_000449 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL93 F1_000450 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END BRA BC@LL40 BC@LL90 F1_000451 EQU $ ; IN [AEIO_MASTER.BAS] CASE CONTROL_STATUS MOVLW 177 SUBWF STATUSBYTE,W,0 BNZ BC@LL95 F1_000452 EQU $ ; IN [AEIO_MASTER.BAS] IF CTRL = 255 THEN INCF CTRL,W,0 BNZ BC@LL97 F1_000453 EQU $ ; IN [AEIO_MASTER.BAS] CTRL = BYTEIN MOVFF BYTEIN,CTRL BRA BC@LL98 BC@LL97 F1_000454 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000455 EQU $ ; IN [AEIO_MASTER.BAS] VALUE = BYTEIN MOVFF BYTEIN,VALUE F1_000456 EQU $ ; IN [AEIO_MASTER.BAS] GOSUB CONTROLLER CALL CONTROLLER F1_000457 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL98 F1_000458 EQU $ ; IN [AEIO_MASTER.BAS] GOTO MIDI_PARSE_END BRA MIDI_PARSE_END BRA BC@LL40 BC@LL95 F1_000459 EQU $ ; IN [AEIO_MASTER.BAS] CASE PROGCHANGE_STATUS MOVLW 193 SUBWF STATUSBYTE,W,0 BNZ BC@LL100 F1_000460 EQU $ ; IN [AEIO_MASTER.BAS] IF PROG = 255 THEN INCF PROG,W,0 BNZ BC@LL102 F1_000461 EQU $ ; IN [AEIO_MASTER.BAS] PROG = BYTEIN MOVFF BYTEIN,PROG F1_000462 EQU $ ; IN [AEIO_MASTER.BAS] GOSUB PROGCHANGE CALL PROGCHANGE F1_000464 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL102 F1_000479 EQU $ ; IN [AEIO_MASTER.BAS] END SELECT BC@LL100 BC@LL40 F1_000480 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL39 MIDI_PARSE_END F1_000497 EQU $ ; IN [AEIO_MASTER.BAS] WEND BRA BC@LL19 BC@LL20 AEIO_NOTEOFF F1_000505 EQU $ ; IN [AEIO_MASTER.BAS] FOR K = 0 TO 11 CLRF _K,0 FR@LB104 MOVLW 12 SUBWF _K,W,0 BC NX@LB105 F1_000506 EQU $ ; IN [AEIO_MASTER.BAS] IF NOTEUIT = SNAARNOTE[K] THEN BREAK LFSR 0,SNAARNOTE MOVF _K,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF NOTEUIT,W,0 SUBWF PBP#VAR0,W,0 BZ NX@LB105 BC@LL106 F1_000507 EQU $ ; IN [AEIO_MASTER.BAS] NEXT INCF _K,F,0 BNZ FR@LB104 NX@LB105 F1_000508 EQU $ ; IN [AEIO_MASTER.BAS] IF K < 12 THEN MOVLW 12 SUBWF _K,W,0 BTFSC STATUS,0 BRA BC@LL108 F1_000509 EQU $ ; IN [AEIO_MASTER.BAS] ST = 128 + K MOVLW 128 ADDWF _K,W,0 MOVWF ST,0 F1_000510 EQU $ ; IN [AEIO_MASTER.BAS] IF NOTEUIT < 115 THEN MOVLW 115 SUBWF NOTEUIT,W,0 BC BC@LL110 F1_000511 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 36, RELEASE MOVF ST,W,0 RCALL HRSOUT MOVLW 36 RCALL HRSOUT MOVF RELEASE,W,0 RCALL HRSOUT BRA BC@LL111 BC@LL110 F1_000514 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000515 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + K MOVLW 176 ADDWF _K,W,0 MOVWF ST,0 F1_000516 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 123, 0 MOVF ST,W,0 RCALL HRSOUT MOVLW 123 CALL HRSOUT MOVLW 0 CALL HRSOUT F1_000517 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL111 F1_000518 EQU $ ; IN [AEIO_MASTER.BAS] SNAARNOTE[K] = 255 SETF PRODL,0 LFSR 0,SNAARNOTE MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_000519 EQU $ ; IN [AEIO_MASTER.BAS] SNAARX[K] = 0 CLRF PRODL,0 LFSR 0,SNAARX MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_000521 EQU $ ; IN [AEIO_MASTER.BAS] ON K GOSUB NO0, NO1, NO2,NO3,NO4,NO5,NO6, NO7, NO8, NO9, NOA, NOB MOVF _K,W,0 MOVWF PP0,0 SUBLW 11 BNC JE@LB13 CLRF PCLATH,0 BCF STATUS,0,0 RLCF PP0,F,0 RLCF PCLATH,F,0 RLCF PP0,F,0 RLCF PCLATH,F,0 MOVLW 128 ADDWF PP0,F,0 MOVLW 6 ADDWFC PCLATH,F,0 PUSH MOVLW 6 MOVWF TOSH,0 MOVLW 176 MOVWF TOSL,0 MOVF PP0,W,0 MOVWF PCL,0 JP@LB14 GOTO NO0 GOTO NO1 GOTO NO2 GOTO NO3 GOTO NO4 GOTO NO5 GOTO NO6 GOTO NO7 GOTO NO8 GOTO NO9 GOTO NOA GOTO NOB JE@LB13 F1_000524 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL108 F1_000525 EQU $ ; IN [AEIO_MASTER.BAS] NOTEUIT = 255 SETF NOTEUIT,0 F1_000526 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 AEIO_PLAY_NOTE F1_000534 EQU $ ; IN [AEIO_MASTER.BAS] IF CC69[USESTRING] = 0 THEN LFSR 0,CC69 MOVF USESTRING,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF PBP#VAR0,F,0 BNZ BC@LL113 F1_000535 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + USESTRING MOVLW 176 ADDWF USESTRING,W,0 MOVWF ST,0 F1_000536 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 69, 64 MOVF ST,W,0 CALL HRSOUT MOVLW 69 CALL HRSOUT MOVLW 64 CALL HRSOUT F1_000537 EQU $ ; IN [AEIO_MASTER.BAS] CC69[USESTRING] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,CC69 MOVF USESTRING,W,0 MOVFF PRODL,PLUSW0 F1_000538 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL113 F1_000543 EQU $ ; IN [AEIO_MASTER.BAS] ST = 144 + USESTRING MOVLW 144 ADDWF USESTRING,W,0 MOVWF ST,0 F1_000544 EQU $ ; IN [AEIO_MASTER.BAS] B1 = 176 + USESTRING MOVLW 176 ADDWF USESTRING,W,0 MOVWF B1,0 F1_000545 EQU $ ; IN [AEIO_MASTER.BAS] B2 = SNAARX[USESTRING] LFSR 0,SNAARX MOVF USESTRING,W,0 MOVF PLUSW0,W,0 MOVWF B2,0 F1_000547 EQU $ ; IN [AEIO_MASTER.BAS] IF BASENOTE = 0 THEN MOVF BASENOTE,F,0 BNZ BC@LL115 F1_000548 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST,36,VELO,B1,22,B2 MOVF ST,W,0 CALL HRSOUT MOVLW 36 CALL HRSOUT MOVF VELO,W,0 CALL HRSOUT MOVF B1,W,0 CALL HRSOUT MOVLW 22 CALL HRSOUT MOVF B2,W,0 CALL HRSOUT BRA BC@LL116 BC@LL115 F1_000550 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000551 EQU $ ; IN [AEIO_MASTER.BAS] SELECT BASENOTE F1_000554 EQU $ ; IN [AEIO_MASTER.BAS] CASE 1 MOVLW 1 SUBWF BASENOTE,W,0 BNZ BC@LL118 F1_000555 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST,48,VELO,B1,22,B2 MOVF ST,W,0 CALL HRSOUT MOVLW 48 CALL HRSOUT MOVF VELO,W,0 CALL HRSOUT MOVF B1,W,0 CALL HRSOUT MOVLW 22 CALL HRSOUT MOVF B2,W,0 CALL HRSOUT BRA BC@LL117 BC@LL118 F1_000556 EQU $ ; IN [AEIO_MASTER.BAS] CASE 2 MOVLW 2 SUBWF BASENOTE,W,0 BNZ BC@LL121 F1_000557 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST,60,VELO,B1,22,B2 MOVF ST,W,0 CALL HRSOUT MOVLW 60 CALL HRSOUT MOVF VELO,W,0 CALL HRSOUT MOVF B1,W,0 CALL HRSOUT MOVLW 22 CALL HRSOUT MOVF B2,W,0 CALL HRSOUT BRA BC@LL117 BC@LL121 F1_000558 EQU $ ; IN [AEIO_MASTER.BAS] CASE 3 MOVLW 3 SUBWF BASENOTE,W,0 BNZ BC@LL123 F1_000559 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST,72,VELO,B1,22,B2 MOVF ST,W,0 CALL HRSOUT MOVLW 72 CALL HRSOUT MOVF VELO,W,0 CALL HRSOUT MOVF B1,W,0 CALL HRSOUT MOVLW 22 CALL HRSOUT MOVF B2,W,0 CALL HRSOUT BRA BC@LL117 BC@LL123 F1_000560 EQU $ ; IN [AEIO_MASTER.BAS] CASE 4 MOVLW 4 SUBWF BASENOTE,W,0 BNZ BC@LL125 F1_000561 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 84, VELO, B1, 22, B2 MOVF ST,W,0 CALL HRSOUT MOVLW 84 CALL HRSOUT MOVF VELO,W,0 CALL HRSOUT MOVF B1,W,0 CALL HRSOUT MOVLW 22 CALL HRSOUT MOVF B2,W,0 CALL HRSOUT F1_000566 EQU $ ; IN [AEIO_MASTER.BAS] END SELECT BC@LL125 BC@LL117 F1_000567 EQU $ ; IN [AEIO_MASTER.BAS] END IF BC@LL116 F1_000568 EQU $ ; IN [AEIO_MASTER.BAS] IF TUNE <> OLDTUNE[USESTRING] THEN LFSR 0,OLDTUNE MOVF USESTRING,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF TUNE,W,0 SUBWF PBP#VAR0,W,0 BZ BC@LL127 F1_000569 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + USESTRING MOVLW 176 ADDWF USESTRING,W,0 MOVWF ST,0 F1_000570 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 24, TUNE MOVF ST,W,0 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF TUNE,W,0 CALL HRSOUT F1_000571 EQU $ ; IN [AEIO_MASTER.BAS] OLDTUNE[USESTRING] = TUNE LFSR 0,OLDTUNE MOVF USESTRING,W,0 MOVFF TUNE,PLUSW0 F1_000572 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL127 F1_000629 EQU $ ; IN [AEIO_MASTER.BAS] LIM = CC7 MIN VELO MOVFF CC7,PP0 MOVF VELO,W,0 CALL MIN@B MOVWF LIM,0 F1_000630 EQU $ ; IN [AEIO_MASTER.BAS] K = CC23[USESTRING] << 1 LFSR 0,CC23 MOVF USESTRING,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 BCF STATUS,0,0 RLCF PBP#VAR0,W,0 MOVWF _K,0 F1_000631 EQU $ ; IN [AEIO_MASTER.BAS] Z = 254 - K MOVF _K,W,0 SUBLW 254 MOVWF _Z,0 F1_000632 EQU $ ; IN [AEIO_MASTER.BAS] CC3 = K MIN LIM MOVFF _K,PP0 MOVF LIM,W,0 CALL MIN@B MOVWF CC3,0 F1_000633 EQU $ ; IN [AEIO_MASTER.BAS] CC4 = Z MIN LIM MOVFF _Z,PP0 MOVF LIM,W,0 CALL MIN@B MOVWF CC4,0 F1_000634 EQU $ ; IN [AEIO_MASTER.BAS] OLDVELO[USESTRING] = VELO LFSR 0,OLDVELO MOVF USESTRING,W,0 MOVFF VELO,PLUSW0 F1_000636 EQU $ ; IN [AEIO_MASTER.BAS] IF CC3 <> CC3OLD[USESTRING] THEN LFSR 0,CC3OLD MOVF USESTRING,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF CC3,W,0 SUBWF PBP#VAR0,W,0 BZ BC@LL129 F1_000637 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + USESTRING MOVLW 176 ADDWF USESTRING,W,0 MOVWF ST,0 F1_000638 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 3, CC3 MOVF ST,W,0 CALL HRSOUT MOVLW 3 CALL HRSOUT MOVF CC3,W,0 CALL HRSOUT F1_000639 EQU $ ; IN [AEIO_MASTER.BAS] CC3OLD[USESTRING] = CC3 LFSR 0,CC3OLD MOVF USESTRING,W,0 MOVFF CC3,PLUSW0 F1_000640 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL129 F1_000641 EQU $ ; IN [AEIO_MASTER.BAS] IF CC4 <> CC4OLD[USESTRING] THEN LFSR 0,CC4OLD MOVF USESTRING,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF CC4,W,0 SUBWF PBP#VAR0,W,0 BZ BC@LL131 F1_000642 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + USESTRING MOVLW 176 ADDWF USESTRING,W,0 MOVWF ST,0 F1_000643 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 4, CC4 MOVF ST,W,0 CALL HRSOUT MOVLW 4 CALL HRSOUT MOVF CC4,W,0 CALL HRSOUT F1_000644 EQU $ ; IN [AEIO_MASTER.BAS] CC4OLD[USESTRING] = CC4 LFSR 0,CC4OLD MOVF USESTRING,W,0 MOVFF CC4,PLUSW0 F1_000645 EQU $ ; IN [AEIO_MASTER.BAS] END IF BC@LL131 F1_000646 EQU $ ; IN [AEIO_MASTER.BAS] SNAARNOTE[USESTRING] = NOTEAAN LFSR 0,SNAARNOTE MOVF USESTRING,W,0 MOVFF NOTEAAN,PLUSW0 F1_000648 EQU $ ; IN [AEIO_MASTER.BAS] ON USESTRING GOSUB NA0, NA1, NA2, NA3, NA4, NA5, NA6, NA7, NA8, NA9, NAA, NAB MOVF USESTRING,W,0 MOVWF PP0,0 SUBLW 11 BNC JE@LB16 CLRF PCLATH,0 BCF STATUS,0,0 RLCF PP0,F,0 RLCF PCLATH,F,0 RLCF PP0,F,0 RLCF PCLATH,F,0 MOVLW 228 ADDWF PP0,F,0 MOVLW 8 ADDWFC PCLATH,F,0 PUSH MOVLW 9 MOVWF TOSH,0 MOVLW 20 MOVWF TOSL,0 MOVF PP0,W,0 MOVWF PCL,0 JP@LB17 GOTO NA0 GOTO NA1 GOTO NA2 GOTO NA3 GOTO NA4 GOTO NA5 GOTO NA6 GOTO NA7 GOTO NA8 GOTO NA9 GOTO NAA GOTO NAB JE@LB16 F1_000649 EQU $ ; IN [AEIO_MASTER.BAS] NOTEAAN = 255 SETF NOTEAAN,0 F1_000650 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NO0 F1_000656 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.0 BCF TRISB,0,0 BCF LATB,0,0 F1_000659 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NO1 F1_000662 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.1 BCF TRISB,1,0 BCF LATB,1,0 F1_000664 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NO2 F1_000667 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.2 BCF TRISB,2,0 BCF LATB,2,0 F1_000669 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NO3 F1_000672 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.3 BCF TRISB,3,0 BCF LATB,3,0 F1_000674 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NO4 F1_000677 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.4 BCF TRISB,4,0 BCF LATB,4,0 F1_000679 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NO5 F1_000682 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.5 BCF TRISB,5,0 BCF LATB,5,0 F1_000684 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NO6 F1_000687 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.5 BCF TRISA,5,0 BCF LATA,5,0 F1_000689 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NO7 F1_000692 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.4 BCF TRISA,4,0 BCF LATA,4,0 F1_000694 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NO8 F1_000697 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.3 BCF TRISA,3,0 BCF LATA,3,0 F1_000699 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NO9 F1_000702 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.2 BCF TRISA,2,0 BCF LATA,2,0 F1_000704 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NOA F1_000707 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.1 BCF TRISA,1,0 BCF LATA,1,0 F1_000709 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NOB F1_000712 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.0 BCF TRISA,0,0 BCF LATA,0,0 F1_000714 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NOC F1_000717 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.0 BCF TRISC,0,0 BCF LATC,0,0 F1_000718 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NOD F1_000721 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.3 BCF TRISC,3,0 BCF LATC,3,0 F1_000722 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NOE F1_000725 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.4 BCF TRISC,4,0 BCF LATC,4,0 F1_000726 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NOF F1_000729 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.5 BCF TRISC,5,0 BCF LATC,5,0 F1_000730 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 YELO1 F1_000734 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.1 BCF TRISC,1,0 BCF LATC,1,0 F1_000735 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 YELO2 F1_000739 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.2 BCF TRISC,2,0 BCF LATC,2,0 F1_000740 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NA0 F1_000748 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTB.0 BCF TRISB,0,0 BSF LATB,0,0 F1_000749 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NA1 F1_000752 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTB.1 BCF TRISB,1,0 BSF LATB,1,0 F1_000753 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NA2 F1_000756 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTB.2 BCF TRISB,2,0 BSF LATB,2,0 F1_000757 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NA3 F1_000760 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTB.3 BCF TRISB,3,0 BSF LATB,3,0 F1_000761 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NA4 F1_000764 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTB.4 BCF TRISB,4,0 BSF LATB,4,0 F1_000765 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NA5 F1_000768 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTB.5 BCF TRISB,5,0 BSF LATB,5,0 F1_000769 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NA6 F1_000772 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTA.5 BCF TRISA,5,0 BSF LATA,5,0 F1_000773 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NA7 F1_000776 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTA.4 BCF TRISA,4,0 BSF LATA,4,0 F1_000777 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NA8 F1_000780 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTA.3 BCF TRISA,3,0 BSF LATA,3,0 F1_000781 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NA9 F1_000784 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTA.2 BCF TRISA,2,0 BSF LATA,2,0 F1_000785 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NAA F1_000788 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTA.1 BCF TRISA,1,0 BSF LATA,1,0 F1_000789 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NAB F1_000792 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTA.0 BCF TRISA,0,0 BSF LATA,0,0 F1_000793 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NAC F1_000796 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTC.0 BCF TRISC,0,0 BSF LATC,0,0 F1_000797 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NAD F1_000800 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTC.3 BCF TRISC,3,0 BSF LATC,3,0 F1_000801 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NAE F1_000804 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTC.4 BCF TRISC,4,0 BSF LATC,4,0 F1_000805 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 NAF F1_000808 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTC.5 BCF TRISC,5,0 BSF LATC,5,0 F1_000809 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 YELA1 F1_000812 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTC.1 BCF TRISC,1,0 BSF LATC,1,0 F1_000813 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 YELA2 F1_000816 EQU $ ; IN [AEIO_MASTER.BAS] HIGH PORTC.2 BCF TRISC,2,0 BSF LATC,2,0 F1_000817 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 KEYPRES F1_000824 EQU $ ; IN [AEIO_MASTER.BAS] FOR I = 0 TO 11 CLRF _I,0 FR@LB133 MOVLW 12 SUBWF _I,W,0 BC NX@LB134 F1_000825 EQU $ ; IN [AEIO_MASTER.BAS] IF NOTEPRES = SNAARNOTE[I] THEN BREAK LFSR 0,SNAARNOTE MOVF _I,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF NOTEPRES,W,0 SUBWF PBP#VAR0,W,0 BZ NX@LB134 BC@LL135 F1_000826 EQU $ ; IN [AEIO_MASTER.BAS] NEXT INCF _I,F,0 BNZ FR@LB133 NX@LB134 F1_000827 EQU $ ; IN [AEIO_MASTER.BAS] IF I > 11 THEN RETURN MOVLW 12 SUBWF _I,W,0 BTFSC STATUS,0 RETURN 0 BC@LL137 F1_000829 EQU $ ; IN [AEIO_MASTER.BAS] IF SNAARX[I] > 0 THEN LFSR 0,SNAARX MOVF _I,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF PBP#VAR0,F,0 BTFSC STATUS,2 BRA BC@LL139 F1_000830 EQU $ ; IN [AEIO_MASTER.BAS] LIM = CC7 MIN PRES MOVFF CC7,PP0 MOVF PRES,W,0 CALL MIN@B MOVWF LIM,0 F1_000831 EQU $ ; IN [AEIO_MASTER.BAS] K = CC23[I] << 1 LFSR 0,CC23 MOVF _I,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 BCF STATUS,0,0 RLCF PBP#VAR0,W,0 MOVWF _K,0 F1_000832 EQU $ ; IN [AEIO_MASTER.BAS] Z = 254 - K MOVF _K,W,0 SUBLW 254 MOVWF _Z,0 F1_000833 EQU $ ; IN [AEIO_MASTER.BAS] CC3 = K MIN LIM MOVFF _K,PP0 MOVF LIM,W,0 CALL MIN@B MOVWF CC3,0 F1_000834 EQU $ ; IN [AEIO_MASTER.BAS] CC4 = Z MIN LIM MOVFF _Z,PP0 MOVF LIM,W,0 CALL MIN@B MOVWF CC4,0 F1_000836 EQU $ ; IN [AEIO_MASTER.BAS] IF CC3 <> CC3OLD[I] THEN LFSR 0,CC3OLD MOVF _I,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF CC3,W,0 SUBWF PBP#VAR0,W,0 BZ BC@LL141 F1_000837 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + I MOVLW 176 ADDWF _I,W,0 MOVWF ST,0 F1_000838 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 3, CC3 MOVF ST,W,0 CALL HRSOUT MOVLW 3 CALL HRSOUT MOVF CC3,W,0 CALL HRSOUT F1_000839 EQU $ ; IN [AEIO_MASTER.BAS] CC3OLD[I] = CC3 LFSR 0,CC3OLD MOVF _I,W,0 MOVFF CC3,PLUSW0 F1_000840 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL141 F1_000841 EQU $ ; IN [AEIO_MASTER.BAS] IF CC4 <> CC4OLD[I] THEN LFSR 0,CC4OLD MOVF _I,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF CC4,W,0 SUBWF PBP#VAR0,W,0 BZ BC@LL143 F1_000842 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + I MOVLW 176 ADDWF _I,W,0 MOVWF ST,0 F1_000843 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 4, CC4 MOVF ST,W,0 CALL HRSOUT MOVLW 4 CALL HRSOUT MOVF CC4,W,0 CALL HRSOUT F1_000844 EQU $ ; IN [AEIO_MASTER.BAS] CC4OLD[I] = CC4 LFSR 0,CC4OLD MOVF _I,W,0 MOVFF CC4,PLUSW0 F1_000845 EQU $ ; IN [AEIO_MASTER.BAS] END IF BC@LL143 F1_000846 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL139 F1_000847 EQU $ ; IN [AEIO_MASTER.BAS] NOTEPRES = 255 SETF NOTEPRES,0 F1_000848 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 PROGCHANGE F1_000864 EQU $ ; IN [AEIO_MASTER.BAS] ON PROG GOSUB LOOKUP_PLATO_PITCH, LOOKUP_PLATO_PITCH, LOOKUP_SCIENCE_PITCH, LOOKUP_EMPIRIC, LOOKUP_EQ MOVF PROG,W,0 MOVWF PP0,0 SUBLW 4 BNC JE@LB19 CLRF PCLATH,0 BCF STATUS,0,0 RLCF PP0,F,0 RLCF PCLATH,F,0 RLCF PP0,F,0 RLCF PCLATH,F,0 MOVLW 240 ADDWF PP0,F,0 MOVLW 10 ADDWFC PCLATH,F,0 PUSH MOVLW 11 MOVWF TOSH,0 MOVLW 4 MOVWF TOSL,0 MOVF PP0,W,0 MOVWF PCL,0 JP@LB20 GOTO LOOKUP_PLATO_PITCH GOTO LOOKUP_PLATO_PITCH GOTO LOOKUP_SCIENCE_PITCH GOTO LOOKUP_EMPIRIC GOTO LOOKUP_EQ JE@LB19 F1_000882 EQU $ ; IN [AEIO_MASTER.BAS] PROG = 255 SETF PROG,0 F1_000883 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 PITCHBEND F1_000887 EQU $ ; IN [AEIO_MASTER.BAS] PBLSB = 255 SETF PBLSB,0 F1_000888 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 CONTROLLER F1_000897 EQU $ ; IN [AEIO_MASTER.BAS] SELECT CTRL F1_000912 EQU $ ; IN [AEIO_MASTER.BAS] CASE 7 MOVLW 7 SUBWF CTRL,W,0 BTFSS STATUS,2 BRA BC@LL145 F1_000914 EQU $ ; IN [AEIO_MASTER.BAS] CC7 = VALUE MOVFF VALUE,CC7 F1_000917 EQU $ ; IN [AEIO_MASTER.BAS] FOR I = 0 TO 11 CLRF _I,0 FR@LB148 MOVLW 12 SUBWF _I,W,0 BTFSC STATUS,0 BRA NX@LB149 F1_000918 EQU $ ; IN [AEIO_MASTER.BAS] IF SNAARX[I] > 0 THEN LFSR 0,SNAARX MOVF _I,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF PBP#VAR0,F,0 BTFSC STATUS,2 BRA BC@LL150 F1_000919 EQU $ ; IN [AEIO_MASTER.BAS] LIM = CC7 MIN OLDVELO[I] LFSR 0,OLDVELO MOVF _I,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVFF CC7,PP0 MOVF PBP#VAR0,W,0 CALL MIN@B MOVWF LIM,0 F1_000920 EQU $ ; IN [AEIO_MASTER.BAS] K = CC23[I] << 1 LFSR 0,CC23 MOVF _I,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 BCF STATUS,0,0 RLCF PBP#VAR0,W,0 MOVWF _K,0 F1_000921 EQU $ ; IN [AEIO_MASTER.BAS] Z = 254 - K MOVF _K,W,0 SUBLW 254 MOVWF _Z,0 F1_000922 EQU $ ; IN [AEIO_MASTER.BAS] CC3 = K MIN LIM MOVFF _K,PP0 MOVF LIM,W,0 CALL MIN@B MOVWF CC3,0 F1_000923 EQU $ ; IN [AEIO_MASTER.BAS] CC4 = Z MIN LIM MOVFF _Z,PP0 MOVF LIM,W,0 CALL MIN@B MOVWF CC4,0 F1_000925 EQU $ ; IN [AEIO_MASTER.BAS] IF CC3 <> CC3OLD[I] THEN LFSR 0,CC3OLD MOVF _I,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF CC3,W,0 SUBWF PBP#VAR0,W,0 BZ BC@LL152 F1_000926 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + I MOVLW 176 ADDWF _I,W,0 MOVWF ST,0 F1_000927 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 3, CC3 MOVF ST,W,0 CALL HRSOUT MOVLW 3 CALL HRSOUT MOVF CC3,W,0 CALL HRSOUT F1_000928 EQU $ ; IN [AEIO_MASTER.BAS] CC3OLD[I] = CC3 LFSR 0,CC3OLD MOVF _I,W,0 MOVFF CC3,PLUSW0 F1_000929 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL152 F1_000930 EQU $ ; IN [AEIO_MASTER.BAS] IF CC4 <> CC4OLD[I] THEN LFSR 0,CC4OLD MOVF _I,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF CC4,W,0 SUBWF PBP#VAR0,W,0 BZ BC@LL154 F1_000931 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + I MOVLW 176 ADDWF _I,W,0 MOVWF ST,0 F1_000932 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 4, CC4 MOVF ST,W,0 CALL HRSOUT MOVLW 4 CALL HRSOUT MOVF CC4,W,0 CALL HRSOUT F1_000933 EQU $ ; IN [AEIO_MASTER.BAS] CC4OLD[I] = CC4 LFSR 0,CC4OLD MOVF _I,W,0 MOVFF CC4,PLUSW0 F1_000934 EQU $ ; IN [AEIO_MASTER.BAS] END IF BC@LL154 F1_000935 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL150 F1_000936 EQU $ ; IN [AEIO_MASTER.BAS] NEXT I INCF _I,F,0 BTFSS STATUS,2 BRA FR@LB148 NX@LB149 F1_000937 EQU $ ; IN [AEIO_MASTER.BAS] GOTO CTRL_PARSE_END BRA CTRL_PARSE_END BRA BC@LL144 BC@LL145 F1_000938 EQU $ ; IN [AEIO_MASTER.BAS] CASE 23 MOVLW 23 SUBWF CTRL,W,0 BNZ BC@LL156 F1_000942 EQU $ ; IN [AEIO_MASTER.BAS] FOR I = 0 TO 11 CLRF _I,0 FR@LB158 MOVLW 12 SUBWF _I,W,0 BC NX@LB159 F1_000943 EQU $ ; IN [AEIO_MASTER.BAS] CC23[I] = VALUE LFSR 0,CC23 MOVF _I,W,0 MOVFF VALUE,PLUSW0 F1_000944 EQU $ ; IN [AEIO_MASTER.BAS] NEXT I INCF _I,F,0 BNZ FR@LB158 NX@LB159 F1_000945 EQU $ ; IN [AEIO_MASTER.BAS] GOTO CTRL_PARSE_END BRA CTRL_PARSE_END BRA BC@LL144 BC@LL156 F1_000946 EQU $ ; IN [AEIO_MASTER.BAS] CASE 30 TO 41 MOVLW 30 SUBWF CTRL,W,0 BNC BC@LL160 MOVLW 42 SUBWF CTRL,W,0 BC BC@LL160 F1_000947 EQU $ ; IN [AEIO_MASTER.BAS] CC23[CTRL - 30] = VALUE MOVLW 30 SUBWF CTRL,W,0 LFSR 0,CC23 MOVFF VALUE,PLUSW0 F1_000950 EQU $ ; IN [AEIO_MASTER.BAS] GOTO CTRL_PARSE_END BRA CTRL_PARSE_END BRA BC@LL144 BC@LL160 F1_000951 EQU $ ; IN [AEIO_MASTER.BAS] CASE 50 TO 61 MOVLW 50 SUBWF CTRL,W,0 BNC BC@LL162 MOVLW 62 SUBWF CTRL,W,0 BC BC@LL162 F1_000954 EQU $ ; IN [AEIO_MASTER.BAS] CC20[CTRL - 50] = VALUE MOVLW 50 SUBWF CTRL,W,0 LFSR 0,CC20 MOVFF VALUE,PLUSW0 F1_000955 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + (CTRL - 50) MOVLW 206 ADDWF CTRL,W,0 MOVWF PP7,0 CLRF PP7H,0 MOVLW 255 ADDWFC PP7H,F,0 MOVLW 176 ADDWF PP7,W,0 MOVWF ST,0 F1_000956 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 20, VALUE MOVF ST,W,0 CALL HRSOUT MOVLW 20 CALL HRSOUT MOVF VALUE,W,0 CALL HRSOUT F1_000957 EQU $ ; IN [AEIO_MASTER.BAS] GOTO CTRL_PARSE_END BRA CTRL_PARSE_END BRA BC@LL144 BC@LL162 F1_000958 EQU $ ; IN [AEIO_MASTER.BAS] CASE 64 MOVLW 64 SUBWF CTRL,W,0 BNZ BC@LL164 F1_000960 EQU $ ; IN [AEIO_MASTER.BAS] IF VALUE = 0 THEN MOVF VALUE,F,0 BNZ BC@LL166 F1_000961 EQU $ ; IN [AEIO_MASTER.BAS] CC64 = 0 CLRF CC64,0 BRA BC@LL167 BC@LL166 F1_000962 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000963 EQU $ ; IN [AEIO_MASTER.BAS] CC64 = 64 MOVLW 64 MOVWF CC64,0 F1_000964 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL167 F1_000967 EQU $ ; IN [AEIO_MASTER.BAS] FOR K = 0 TO 11 CLRF _K,0 FR@LB169 MOVLW 12 SUBWF _K,W,0 BC NX@LB170 F1_000968 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + K MOVLW 176 ADDWF _K,W,0 MOVWF ST,0 F1_000969 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 64, CC64 MOVF ST,W,0 CALL HRSOUT MOVLW 64 CALL HRSOUT MOVF CC64,W,0 CALL HRSOUT F1_000970 EQU $ ; IN [AEIO_MASTER.BAS] NEXT K INCF _K,F,0 BNZ FR@LB169 NX@LB170 F1_000971 EQU $ ; IN [AEIO_MASTER.BAS] GOTO CTRL_PARSE_END BRA CTRL_PARSE_END BRA BC@LL144 BC@LL164 F1_000972 EQU $ ; IN [AEIO_MASTER.BAS] CASE 65 MOVLW 65 SUBWF CTRL,W,0 BNZ BC@LL171 F1_000977 EQU $ ; IN [AEIO_MASTER.BAS] CC65 = VALUE MOVFF VALUE,CC65 F1_000978 EQU $ ; IN [AEIO_MASTER.BAS] FOR K = 0 TO 11 CLRF _K,0 FR@LB173 MOVLW 12 SUBWF _K,W,0 BC NX@LB174 F1_000979 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + K MOVLW 176 ADDWF _K,W,0 MOVWF ST,0 F1_000980 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 65, CC65 MOVF ST,W,0 CALL HRSOUT MOVLW 65 CALL HRSOUT MOVF CC65,W,0 CALL HRSOUT F1_000981 EQU $ ; IN [AEIO_MASTER.BAS] NEXT K INCF _K,F,0 BNZ FR@LB173 NX@LB174 F1_000982 EQU $ ; IN [AEIO_MASTER.BAS] GOTO CTRL_PARSE_END BRA CTRL_PARSE_END BRA BC@LL144 BC@LL171 F1_000983 EQU $ ; IN [AEIO_MASTER.BAS] CASE 66 MOVLW 66 SUBWF CTRL,W,0 BNZ BC@LL175 F1_000985 EQU $ ; IN [AEIO_MASTER.BAS] IF VALUE = 0 THEN MOVF VALUE,F,0 BNZ BC@LL177 F1_000986 EQU $ ; IN [AEIO_MASTER.BAS] GOSUB ALLNOTESOFF RCALL ALLNOTESOFF BRA BC@LL178 BC@LL177 F1_000989 EQU $ ; IN [AEIO_MASTER.BAS] ELSE F1_000990 EQU $ ; IN [AEIO_MASTER.BAS] FOR K = 0 TO 11 CLRF _K,0 FR@LB180 MOVLW 12 SUBWF _K,W,0 BC NX@LB181 F1_000991 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + K MOVLW 176 ADDWF _K,W,0 MOVWF ST,0 F1_000992 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 69, 64 MOVF ST,W,0 CALL HRSOUT MOVLW 69 CALL HRSOUT MOVLW 64 CALL HRSOUT F1_000993 EQU $ ; IN [AEIO_MASTER.BAS] CC69[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,CC69 MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_000994 EQU $ ; IN [AEIO_MASTER.BAS] NEXT K INCF _K,F,0 BNZ FR@LB180 NX@LB181 F1_000995 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL178 F1_000996 EQU $ ; IN [AEIO_MASTER.BAS] GOTO CTRL_PARSE_END BRA CTRL_PARSE_END BRA BC@LL144 BC@LL175 F1_000997 EQU $ ; IN [AEIO_MASTER.BAS] CASE 80 TO 91 MOVLW 80 SUBWF CTRL,W,0 BNC BC@LL182 MOVLW 92 SUBWF CTRL,W,0 BC BC@LL182 F1_001000 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + (CTRL - 80) MOVLW 176 ADDWF CTRL,W,0 MOVWF PP7,0 CLRF PP7H,0 MOVLW 255 ADDWFC PP7H,F,0 MOVLW 176 ADDWF PP7,W,0 MOVWF ST,0 F1_001001 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 24, VALUE MOVF ST,W,0 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF VALUE,W,0 CALL HRSOUT F1_001004 EQU $ ; IN [AEIO_MASTER.BAS] OLDTUNE[CTRL-80] = VALUE MOVLW 80 SUBWF CTRL,W,0 LFSR 0,OLDTUNE MOVFF VALUE,PLUSW0 F1_001005 EQU $ ; IN [AEIO_MASTER.BAS] GOTO CTRL_PARSE_END BRA CTRL_PARSE_END BRA BC@LL144 BC@LL182 F1_001006 EQU $ ; IN [AEIO_MASTER.BAS] CASE 100 TO 111 MOVLW 100 SUBWF CTRL,W,0 BNC BC@LL184 MOVLW 112 SUBWF CTRL,W,0 BC BC@LL184 F1_001008 EQU $ ; IN [AEIO_MASTER.BAS] K = CTRL - 100 MOVLW 100 SUBWF CTRL,W,0 MOVWF _K,0 F1_001009 EQU $ ; IN [AEIO_MASTER.BAS] IF SNAARX[K] > 0 THEN LFSR 0,SNAARX MOVF _K,W,0 MOVF PLUSW0,W,0 MOVWF PBP#VAR0,0 MOVF PBP#VAR0,F,0 BZ BC@LL186 F1_001010 EQU $ ; IN [AEIO_MASTER.BAS] IF VALUE > 0 THEN MOVF VALUE,F,0 BZ BC@LL188 F1_001011 EQU $ ; IN [AEIO_MASTER.BAS] IF VALUE < 65 THEN MOVLW 65 SUBWF VALUE,W,0 BC BC@LL190 F1_001012 EQU $ ; IN [AEIO_MASTER.BAS] MULTI[K] = VALUE LFSR 0,MULTI MOVF _K,W,0 MOVFF VALUE,PLUSW0 F1_001013 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + K MOVLW 176 ADDWF _K,W,0 MOVWF ST,0 F1_001014 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 22, VALUE MOVF ST,W,0 CALL HRSOUT MOVLW 22 CALL HRSOUT MOVF VALUE,W,0 CALL HRSOUT F1_001015 EQU $ ; IN [AEIO_MASTER.BAS] SNAARX[K] = VALUE LFSR 0,SNAARX MOVF _K,W,0 MOVFF VALUE,PLUSW0 F1_001016 EQU $ ; IN [AEIO_MASTER.BAS] GOTO CTRL_PARSE_END BRA CTRL_PARSE_END F1_001017 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL190 F1_001018 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL188 F1_001019 EQU $ ; IN [AEIO_MASTER.BAS] ENDIF BC@LL186 F1_001020 EQU $ ; IN [AEIO_MASTER.BAS] GOTO CTRL_PARSE_END BRA CTRL_PARSE_END BRA BC@LL144 BC@LL184 F1_001021 EQU $ ; IN [AEIO_MASTER.BAS] CASE 123 MOVLW 123 SUBWF CTRL,W,0 BTFSC STATUS,2 F1_001023 EQU $ ; IN [AEIO_MASTER.BAS] GOSUB ALLNOTESOFF RCALL ALLNOTESOFF F1_001024 EQU $ ; IN [AEIO_MASTER.BAS] END SELECT BC@LL192 BC@LL144 CTRL_PARSE_END F1_001026 EQU $ ; IN [AEIO_MASTER.BAS] CTRL = 255 SETF CTRL,0 F1_001027 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 ALLNOTESOFF F1_001033 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT 176, 123,0 , 177, 123, 0, 178, 123, 0 , 179, 123, 0, 180, 123, 0, 181, 123,0, 182, 123, 0, 183, 123, 0, 184, 123, 0, 185, 123, 0, 186, 123, 0, 187, 123, 0 MOVLW 176 CALL HRSOUT MOVLW 123 CALL HRSOUT MOVLW 0 CALL HRSOUT MOVLW 177 CALL HRSOUT MOVLW 123 CALL HRSOUT MOVLW 0 CALL HRSOUT MOVLW 178 CALL HRSOUT MOVLW 123 CALL HRSOUT MOVLW 0 CALL HRSOUT MOVLW 179 CALL HRSOUT MOVLW 123 CALL HRSOUT MOVLW 0 CALL HRSOUT MOVLW 180 CALL HRSOUT MOVLW 123 CALL HRSOUT MOVLW 0 CALL HRSOUT MOVLW 181 CALL HRSOUT MOVLW 123 CALL HRSOUT MOVLW 0 CALL HRSOUT MOVLW 182 CALL HRSOUT MOVLW 123 CALL HRSOUT MOVLW 0 CALL HRSOUT MOVLW 183 CALL HRSOUT MOVLW 123 CALL HRSOUT MOVLW 0 CALL HRSOUT MOVLW 184 CALL HRSOUT MOVLW 123 CALL HRSOUT MOVLW 0 CALL HRSOUT MOVLW 185 CALL HRSOUT MOVLW 123 CALL HRSOUT MOVLW 0 CALL HRSOUT MOVLW 186 CALL HRSOUT MOVLW 123 CALL HRSOUT MOVLW 0 CALL HRSOUT MOVLW 187 CALL HRSOUT MOVLW 123 CALL HRSOUT MOVLW 0 CALL HRSOUT F1_001034 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.0 BCF TRISB,0,0 BCF LATB,0,0 F1_001035 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.1 BCF TRISB,1,0 BCF LATB,1,0 F1_001036 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.2 BCF TRISB,2,0 BCF LATB,2,0 F1_001037 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.3 BCF TRISB,3,0 BCF LATB,3,0 F1_001038 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.4 BCF TRISB,4,0 BCF LATB,4,0 F1_001039 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTB.5 BCF TRISB,5,0 BCF LATB,5,0 F1_001040 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.5 BCF TRISA,5,0 BCF LATA,5,0 F1_001041 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.4 BCF TRISA,4,0 BCF LATA,4,0 F1_001042 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.3 BCF TRISA,3,0 BCF LATA,3,0 F1_001043 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.2 BCF TRISA,2,0 BCF LATA,2,0 F1_001044 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.1 BCF TRISA,1,0 BCF LATA,1,0 F1_001045 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTA.0 BCF TRISA,0,0 BCF LATA,0,0 F1_001047 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.0 BCF TRISC,0,0 BCF LATC,0,0 F1_001048 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.3 BCF TRISC,3,0 BCF LATC,3,0 F1_001049 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.4 BCF TRISC,4,0 BCF LATC,4,0 F1_001050 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.5 BCF TRISC,5,0 BCF LATC,5,0 F1_001051 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.1 BCF TRISC,1,0 BCF LATC,1,0 F1_001052 EQU $ ; IN [AEIO_MASTER.BAS] LOW PORTC.2 BCF TRISC,2,0 BCF LATC,2,0 F1_001053 EQU $ ; IN [AEIO_MASTER.BAS] CLEAR VELFLAGS CLRF VELFLAGS,0 CLRF VELFLAGSH,0 F1_001054 EQU $ ; IN [AEIO_MASTER.BAS] FOR K = 0 TO 11 CLRF _K,0 FR@LB194 MOVLW 12 SUBWF _K,W,0 BC NX@LB195 F1_001055 EQU $ ; IN [AEIO_MASTER.BAS] SNAARX[K] = 0 CLRF PRODL,0 LFSR 0,SNAARX MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001057 EQU $ ; IN [AEIO_MASTER.BAS] SNAARNOTE[K] = 255 SETF PRODL,0 LFSR 0,SNAARNOTE MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001058 EQU $ ; IN [AEIO_MASTER.BAS] NEXT K INCF _K,F,0 BNZ FR@LB194 NX@LB195 F1_001059 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 INIT_VELOSCALES F1_001088 EQU $ ; IN [AEIO_MASTER.BAS] LIGHTINDEX[0] = 255 SETF LIGHTINDEX#0 F1_001089 EQU $ ; IN [AEIO_MASTER.BAS] LIGHTINDEX[1] = 0 CLRF LIGHTINDEX#1 F1_001090 EQU $ ; IN [AEIO_MASTER.BAS] LIGHTINDEX[2] = 1 MOVLW 1 MOVWF LIGHTINDEX#2 F1_001091 EQU $ ; IN [AEIO_MASTER.BAS] LIGHTINDEX[3] = 2 MOVLW 2 MOVWF LIGHTINDEX#3 F1_001092 EQU $ ; IN [AEIO_MASTER.BAS] LIGHTINDEX[4] = 3 MOVLW 3 MOVWF LIGHTINDEX#4 F1_001093 EQU $ ; IN [AEIO_MASTER.BAS] LIGHTINDEX[5] = 4 MOVLW 4 MOVWF LIGHTINDEX#5 F1_001094 EQU $ ; IN [AEIO_MASTER.BAS] LIGHTINDEX[6] = 5 MOVLW 5 MOVWF LIGHTINDEX#6 F1_001095 EQU $ ; IN [AEIO_MASTER.BAS] FOR I = 0 TO 127 CLRF _I,0 FR@LB196 MOVLW 128 SUBWF _I,W,0 BC NX@LB197 F1_001096 EQU $ ; IN [AEIO_MASTER.BAS] HAMMERINDEX[I] = 255 SETF PRODL,0 LFSR 0,HAMMERINDEX MOVF _I,W,0 MOVFF PRODL,PLUSW0 F1_001097 EQU $ ; IN [AEIO_MASTER.BAS] NEXT I INCF _I,F,0 BNZ FR@LB196 NX@LB197 F1_001098 EQU $ ; IN [AEIO_MASTER.BAS] FOR I = 24 TO 35 MOVLW 24 MOVWF _I,0 FR@LB198 MOVLW 36 SUBWF _I,W,0 BC NX@LB199 F1_001099 EQU $ ; IN [AEIO_MASTER.BAS] HAMMERINDEX[I] = I - 24 MOVLW 24 SUBWF _I,W,0 MOVWF PBP#VAR0,0 LFSR 0,HAMMERINDEX MOVF _I,W,0 MOVFF PBP#VAR0,PLUSW0 F1_001100 EQU $ ; IN [AEIO_MASTER.BAS] NEXT I INCF _I,F,0 BNZ FR@LB198 NX@LB199 F1_001101 EQU $ ; IN [AEIO_MASTER.BAS] CLEAR VELFLAGS CLRF VELFLAGS,0 CLRF VELFLAGSH,0 F1_001103 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 INIT_AEIO F1_001107 EQU $ ; IN [AEIO_MASTER.BAS] FOR K = 0 TO 11 CLRF _K,0 FR@LB200 MOVLW 12 SUBWF _K,W,0 BTFSC STATUS,0 BRA NX@LB201 F1_001108 EQU $ ; IN [AEIO_MASTER.BAS] ST = 176 + K MOVLW 176 ADDWF _K,W,0 MOVWF ST,0 F1_001110 EQU $ ; IN [AEIO_MASTER.BAS] CC69[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,CC69 MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001111 EQU $ ; IN [AEIO_MASTER.BAS] CC23[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,CC23 MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001115 EQU $ ; IN [AEIO_MASTER.BAS] B2 = 64 + K MOVLW 64 ADDWF _K,W,0 MOVWF B2,0 F1_001116 EQU $ ; IN [AEIO_MASTER.BAS] CC20[K] = B2 LFSR 0,CC20 MOVF _K,W,0 MOVFF B2,PLUSW0 F1_001119 EQU $ ; IN [AEIO_MASTER.BAS] OLDTUNE[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,OLDTUNE MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001120 EQU $ ; IN [AEIO_MASTER.BAS] CC3OLD[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,CC3OLD MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001121 EQU $ ; IN [AEIO_MASTER.BAS] CC4OLD[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,CC4OLD MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001122 EQU $ ; IN [AEIO_MASTER.BAS] SNAARX[K] = 0 CLRF PRODL,0 LFSR 0,SNAARX MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001124 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 69, 64, 20, B2, 22, 1, 24, 64, 3, 64 , 4, 64 MOVF ST,W,0 CALL HRSOUT MOVLW 69 CALL HRSOUT MOVLW 64 CALL HRSOUT MOVLW 20 CALL HRSOUT MOVF B2,W,0 CALL HRSOUT MOVLW 22 CALL HRSOUT MOVLW 1 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVLW 64 CALL HRSOUT MOVLW 3 CALL HRSOUT MOVLW 64 CALL HRSOUT MOVLW 4 CALL HRSOUT MOVLW 64 CALL HRSOUT F1_001125 EQU $ ; IN [AEIO_MASTER.BAS] DELAYMS 6 MOVLW 6 CALL DL@MS F1_001126 EQU $ ; IN [AEIO_MASTER.BAS] CC64 = 0 CLRF CC64,0 F1_001127 EQU $ ; IN [AEIO_MASTER.BAS] CC65 = 15 MOVLW 15 MOVWF CC65,0 F1_001132 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT ST, 64, CC64, 65, CC65 MOVF ST,W,0 CALL HRSOUT MOVLW 64 CALL HRSOUT MOVF CC64,W,0 CALL HRSOUT MOVLW 65 CALL HRSOUT MOVF CC65,W,0 CALL HRSOUT F1_001133 EQU $ ; IN [AEIO_MASTER.BAS] DELAYMS 4 MOVLW 4 CALL DL@MS F1_001134 EQU $ ; IN [AEIO_MASTER.BAS] NEXT K INCF _K,F,0 BTFSS STATUS,2 BRA FR@LB200 NX@LB201 F1_001135 EQU $ ; IN [AEIO_MASTER.BAS] CC3 = 64 MOVLW 64 MOVWF CC3,0 F1_001136 EQU $ ; IN [AEIO_MASTER.BAS] CC4 = 64 MOVWF CC4,0 F1_001137 EQU $ ; IN [AEIO_MASTER.BAS] CC7 = 64 MOVWF CC7,0 F1_001138 EQU $ ; IN [AEIO_MASTER.BAS] RETURN RETURN 0 N24 F1_001142 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT 144, 24, VELO MOVLW 144 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF VELO,W,0 GOTO HRSOUT N25 F1_001146 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT 145, 24, VELO MOVLW 145 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF VELO,W,0 GOTO HRSOUT N26 F1_001150 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT 146, 24, VELO MOVLW 146 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF VELO,W,0 GOTO HRSOUT N27 F1_001154 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT 147, 24, VELO MOVLW 147 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF VELO,W,0 GOTO HRSOUT N28 F1_001158 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT 148, 24, VELO MOVLW 148 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF VELO,W,0 GOTO HRSOUT N29 F1_001162 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT 149, 24, VELO MOVLW 149 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF VELO,W,0 GOTO HRSOUT N30 F1_001166 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT 150,24, VELO MOVLW 150 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF VELO,W,0 GOTO HRSOUT N31 F1_001170 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT 151, 24, VELO MOVLW 151 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF VELO,W,0 GOTO HRSOUT N32 F1_001174 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT 152, 24, VELO MOVLW 152 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF VELO,W,0 GOTO HRSOUT N33 F1_001178 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT 153, 24, VELO MOVLW 153 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF VELO,W,0 GOTO HRSOUT N34 F1_001182 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT 154, 24, VELO MOVLW 154 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF VELO,W,0 GOTO HRSOUT N35 F1_001186 EQU $ ; IN [AEIO_MASTER.BAS] HRSOUT 155, 24, VELO MOVLW 155 CALL HRSOUT MOVLW 24 CALL HRSOUT MOVF VELO,W,0 GOTO HRSOUT LOOKUP_PLATO_PITCH F1_001194 EQU $ ; IN [AEIO_MASTER.BAS] FOR K = 0 TO 91 CLRF _K,0 FR@LB202 MOVLW 92 SUBWF _K,W,0 BC NX@LB203 F1_001195 EQU $ ; IN [AEIO_MASTER.BAS] PKOR[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,PKOR MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001196 EQU $ ; IN [AEIO_MASTER.BAS] AKOR[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,AKOR MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001197 EQU $ ; IN [AEIO_MASTER.BAS] NEXT INCF _K,F,0 BNZ FR@LB202 NX@LB203 F1_001198 EQU $ ; IN [AEIO_MASTER.BAS] FOR K = 0 TO 18 : ALUT[K] = 0 : NEXT CLRF _K,0 FR@LB204 MOVLW 19 SUBWF _K,W,0 BC NX@LB205 LFSR 0,ALUT BCF STATUS,0,0 RLCF _K,W,0 ADDWF FSR0L,F,0 MOVLW 0 ADDWFC FSR0H,F,0 CLRF POSTINC0,0 CLRF INDF0,0 INCF _K,F,0 BNZ FR@LB204 NX@LB205 F1_001199 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[0] = 0X0001 MOVLW 1 MOVLB 1 MOVWF PLUT#0 CLRF PLUT#0H F1_001200 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[1] = 0X0101 MOVWF PLUT#1 MOVWF PLUT#1H F1_001201 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[2] = 0X0201 MOVWF PLUT#2 MOVLW 2 MOVWF PLUT#2H F1_001202 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[3] = 0X0301 MOVLW 1 MOVWF PLUT#3 MOVLW 3 MOVWF PLUT#3H F1_001203 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[4] = 0X0401 MOVLW 1 MOVWF PLUT#4 MOVLW 4 MOVWF PLUT#4H F1_001204 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[5] = 0X0501 MOVLW 1 MOVWF PLUT#5 MOVLW 5 MOVWF PLUT#5H F1_001205 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[6] = 0X0601 MOVLW 1 MOVWF PLUT#6 MOVLW 6 MOVWF PLUT#6H F1_001206 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[7] = 0X0701 MOVLW 1 MOVWF PLUT#7 MOVLW 7 MOVWF PLUT#7H F1_001207 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[8] = 0X0801 MOVLW 1 MOVWF PLUT#8 MOVLW 8 MOVWF PLUT#8H F1_001208 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[9] = 0X0901 MOVLW 1 MOVWF PLUT#9 MOVLW 9 MOVWF PLUT#9H F1_001209 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[10] = 0X0A01 MOVLW 1 MOVWF PLUT#10 MOVLW 10 MOVWF PLUT#10H F1_001210 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[11] = 0X0B01 MOVLW 1 MOVWF PLUT#11 MOVLW 11 MOVWF PLUT#11H F1_001211 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[12] = 0X0002 MOVLW 2 MOVWF PLUT#12 CLRF PLUT#12H F1_001212 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[13] = 0X0102 MOVWF PLUT#13 MOVLW 1 MOVWF PLUT#13H F1_001213 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[14] = 0X0202 MOVLW 2 MOVWF PLUT#14 MOVWF PLUT#14H F1_001214 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[15] = 0X0302 MOVWF PLUT#15 MOVLW 3 MOVWF PLUT#15H F1_001215 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[16] = 0X0402 MOVLW 2 MOVWF PLUT#16 MOVLW 4 MOVWF PLUT#16H F1_001216 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[17] = 0X0502 MOVLW 2 MOVWF PLUT#17 MOVLW 5 MOVWF PLUT#17H F1_001217 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[18] = 0X0602 MOVLW 2 MOVWF PLUT#18 MOVLW 6 MOVWF PLUT#18H F1_001218 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[19] = 0X0702 MOVLW 2 MOVWF PLUT#19 MOVLW 7 MOVWF PLUT#19H F1_001219 EQU $ ; IN [AEIO_MASTER.BAS] ALUT[19] = 0X0003 MOVLW 3 MOVLB 2 MOVWF ALUT#19 CLRF ALUT#19H F1_001220 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[20] = 0X0802 : ALUT[20] = 0X0103 MOVLW 2 MOVLB 1 MOVWF PLUT#20 MOVLW 8 MOVWF PLUT#20H MOVLW 3 MOVLB 2 MOVWF ALUT#20 MOVLW 1 MOVWF ALUT#20H F1_001221 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[21] = 0X0902 : ALUT[21] = 0X0203 MOVLW 2 MOVLB 1 MOVWF PLUT#21 MOVLW 9 MOVWF PLUT#21H MOVLW 3 MOVLB 2 MOVWF ALUT#21 MOVLW 2 MOVWF ALUT#21H F1_001222 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[22] = 0X0A02 : ALUT[22] = 0X0303 MOVLB 1 MOVWF PLUT#22 MOVLW 10 MOVWF PLUT#22H MOVLW 3 MOVLB 2 MOVWF ALUT#22 MOVWF ALUT#22H F1_001223 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[23] = 0X0B02 : ALUT[23] = 0X0403 MOVLW 2 MOVLB 1 MOVWF PLUT#23 MOVLW 11 MOVWF PLUT#23H MOVLW 3 MOVLB 2 MOVWF ALUT#23 MOVLW 4 MOVWF ALUT#23H F1_001225 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[24] = 0X0004 : ALUT[24] = 0X0503 MOVLB 1 MOVWF PLUT#24 CLRF PLUT#24H MOVLW 3 MOVLB 2 MOVWF ALUT#24 MOVLW 5 MOVWF ALUT#24H F1_001226 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[25] = 0X0104 : ALUT[25] = 0X0603 MOVLW 4 MOVLB 1 MOVWF PLUT#25 MOVLW 1 MOVWF PLUT#25H MOVLW 3 MOVLB 2 MOVWF ALUT#25 MOVLW 6 MOVWF ALUT#25H F1_001227 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[26] = 0X0204 : ALUT[26] = 0X0703 MOVLW 4 MOVLB 1 MOVWF PLUT#26 MOVLW 2 MOVWF PLUT#26H MOVLW 3 MOVLB 2 MOVWF ALUT#26 MOVLW 7 MOVWF ALUT#26H F1_001228 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[27] = 0X0304 : ALUT[27] = 0X0803 MOVLW 4 MOVLB 1 MOVWF PLUT#27 MOVLW 3 MOVWF PLUT#27H MOVLB 2 MOVWF ALUT#27 MOVLW 8 MOVWF ALUT#27H F1_001229 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[28] = 0X0404 : ALUT[28] = 0X0903 MOVLW 4 MOVLB 1 MOVWF PLUT#28 MOVWF PLUT#28H MOVLW 3 MOVLB 2 MOVWF ALUT#28 MOVLW 9 MOVWF ALUT#28H F1_001230 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[29] = 0X0504 : ALUT[29] = 0X0A03 MOVLW 4 MOVLB 1 MOVWF PLUT#29 MOVLW 5 MOVWF PLUT#29H MOVLW 3 MOVLB 2 MOVWF ALUT#29 MOVLW 10 MOVWF ALUT#29H F1_001231 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[30] = 0X0604 : ALUT[30] = 0X0B03 MOVLW 4 MOVLB 1 MOVWF PLUT#30 MOVLW 6 MOVWF PLUT#30H MOVLW 3 MOVLB 2 MOVWF ALUT#30 MOVLW 11 MOVWF ALUT#30H F1_001232 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[31] = 0X0704 : ALUT[31] = 0X0006 MOVLW 4 MOVLB 1 MOVWF PLUT#31 MOVLW 7 MOVWF PLUT#31H MOVLW 6 MOVLB 2 MOVWF ALUT#31 CLRF ALUT#31H F1_001233 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[32] = 0X0804 : ALUT[32] = 0X0106 MOVLW 4 MOVLB 1 MOVWF PLUT#32 MOVLW 8 MOVWF PLUT#32H MOVLW 6 MOVLB 2 MOVWF ALUT#32 MOVLW 1 MOVWF ALUT#32H F1_001234 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[33] = 0X0904 : ALUT[33] = 0X0206 MOVLW 4 MOVLB 1 MOVWF PLUT#33 MOVLW 9 MOVWF PLUT#33H MOVLW 6 MOVLB 2 MOVWF ALUT#33 MOVLW 2 MOVWF ALUT#33H F1_001235 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[34] = 0X0A04 : ALUT[34] = 0X0306 MOVLW 4 MOVLB 1 MOVWF PLUT#34 MOVLW 10 MOVWF PLUT#34H MOVLW 6 MOVLB 2 MOVWF ALUT#34 MOVLW 3 MOVWF ALUT#34H F1_001236 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[35] = 0X0B04 : ALUT[35] = 0X0406 MOVLW 4 MOVLB 1 MOVWF PLUT#35 MOVLW 11 MOVWF PLUT#35H MOVLW 6 MOVLB 2 MOVWF ALUT#35 MOVLW 4 MOVWF ALUT#35H F1_001237 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[36] = 0X0008 : ALUT[36] = 0X0506 MOVLW 8 MOVLB 1 MOVWF PLUT#36 CLRF PLUT#36H MOVLW 6 MOVLB 2 MOVWF ALUT#36 MOVLW 5 MOVWF ALUT#36H F1_001238 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[37] = 0X0108 : ALUT[37] = 0X0606 MOVLW 8 MOVLB 1 MOVWF PLUT#37 MOVLW 1 MOVWF PLUT#37H MOVLW 6 MOVLB 2 MOVWF ALUT#37 MOVWF ALUT#37H F1_001239 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[38] = 0X0208 : ALUT[38] = 0X0706 MOVLW 8 MOVLB 1 MOVWF PLUT#38 MOVLW 2 MOVWF PLUT#38H MOVLW 6 MOVLB 2 MOVWF ALUT#38 MOVLW 7 MOVWF ALUT#38H F1_001240 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[39] = 0X0308 : ALUT[39] = 0X0806 MOVLW 8 MOVLB 1 MOVWF PLUT#39 MOVLW 3 MOVWF PLUT#39H MOVLW 6 MOVLB 2 MOVWF ALUT#39 MOVLW 8 MOVWF ALUT#39H F1_001241 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[40] = 0X0408 : ALUT[40] = 0X0906 MOVLB 1 MOVWF PLUT#40 MOVLW 4 MOVWF PLUT#40H MOVLW 6 MOVLB 2 MOVWF ALUT#40 MOVLW 9 MOVWF ALUT#40H F1_001242 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[41] = 0X0508 : ALUT[41] = 0X0A06 MOVLW 8 MOVLB 1 MOVWF PLUT#41 MOVLW 5 MOVWF PLUT#41H MOVLW 6 MOVLB 2 MOVWF ALUT#41 MOVLW 10 MOVWF ALUT#41H F1_001243 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[42] = 0X0608 : ALUT[42] = 0X0B06 MOVLW 8 MOVLB 1 MOVWF PLUT#42 MOVLW 6 MOVWF PLUT#42H MOVLB 2 MOVWF ALUT#42 MOVLW 11 MOVWF ALUT#42H F1_001244 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[43] = 0X0708 : ALUT[43] = 0X000C MOVLW 8 MOVLB 1 MOVWF PLUT#43 MOVLW 7 MOVWF PLUT#43H MOVLW 12 MOVLB 2 MOVWF ALUT#43 CLRF ALUT#43H F1_001245 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[44] = 0X0808 : ALUT[44] = 0X010C MOVLW 8 MOVLB 1 MOVWF PLUT#44 MOVWF PLUT#44H MOVLW 12 MOVLB 2 MOVWF ALUT#44 MOVLW 1 MOVWF ALUT#44H F1_001246 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[45] = 0X0908 : ALUT[45] = 0X020C MOVLW 8 MOVLB 1 MOVWF PLUT#45 MOVLW 9 MOVWF PLUT#45H MOVLW 12 MOVLB 2 MOVWF ALUT#45 MOVLW 2 MOVWF ALUT#45H F1_001247 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[46] = 0X0A08 : ALUT[46] = 0X030C MOVLW 8 MOVLB 1 MOVWF PLUT#46 MOVLW 10 MOVWF PLUT#46H MOVLW 12 MOVLB 2 MOVWF ALUT#46 MOVLW 3 MOVWF ALUT#46H F1_001248 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[47] = 0X0B08 : ALUT[47] = 0X040C MOVLW 8 MOVLB 1 MOVWF PLUT#47 MOVLW 11 MOVWF PLUT#47H MOVLW 12 MOVLB 2 MOVWF ALUT#47 MOVLW 4 MOVWF ALUT#47H F1_001249 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[48] = 0X0010 : ALUT[48] = 0X050C MOVLW 16 MOVLB 1 MOVWF PLUT#48 CLRF PLUT#48H MOVLW 12 MOVLB 2 MOVWF ALUT#48 MOVLW 5 MOVWF ALUT#48H F1_001250 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[49] = 0X0110 : ALUT[49] = 0X060C MOVLW 16 MOVLB 1 MOVWF PLUT#49 MOVLW 1 MOVWF PLUT#49H MOVLW 12 MOVLB 2 MOVWF ALUT#49 MOVLW 6 MOVWF ALUT#49H F1_001251 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[50] = 0X0210 : ALUT[50] = 0X070C MOVLW 16 MOVLB 1 MOVWF PLUT#50 MOVLW 2 MOVWF PLUT#50H MOVLW 12 MOVLB 2 MOVWF ALUT#50 MOVLW 7 MOVWF ALUT#50H F1_001252 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[51] = 0X0310 : ALUT[51] = 0X080C MOVLW 16 MOVLB 1 MOVWF PLUT#51 MOVLW 3 MOVWF PLUT#51H MOVLW 12 MOVLB 2 MOVWF ALUT#51 MOVLW 8 MOVWF ALUT#51H F1_001253 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[52] = 0X0410 : ALUT[52] = 0X090C MOVLW 16 MOVLB 1 MOVWF PLUT#52 MOVLW 4 MOVWF PLUT#52H MOVLW 12 MOVLB 2 MOVWF ALUT#52 MOVLW 9 MOVWF ALUT#52H F1_001254 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[53] = 0X0510 : ALUT[53] = 0X0A0C MOVLW 16 MOVLB 1 MOVWF PLUT#53 MOVLW 5 MOVWF PLUT#53H MOVLW 12 MOVLB 2 MOVWF ALUT#53 MOVLW 10 MOVWF ALUT#53H F1_001255 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[54] = 0X0610 : ALUT[54] = 0X0B0C MOVLW 16 MOVLB 1 MOVWF PLUT#54 MOVLW 6 MOVWF PLUT#54H MOVLW 12 MOVLB 2 MOVWF ALUT#54 MOVLW 11 MOVWF ALUT#54H F1_001256 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[55] = 0X0710 : ALUT[55] = 0X0018 MOVLW 16 MOVLB 1 MOVWF PLUT#55 MOVLW 7 MOVWF PLUT#55H MOVLW 24 MOVLB 2 MOVWF ALUT#55 CLRF ALUT#55H F1_001257 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[56] = 0X0810 : ALUT[56] = 0X0118 MOVLW 16 MOVLB 1 MOVWF PLUT#56 MOVLW 8 MOVWF PLUT#56H MOVLW 24 MOVLB 2 MOVWF ALUT#56 MOVLW 1 MOVWF ALUT#56H F1_001258 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[57] = 0X0910 : ALUT[57] = 0X0218 MOVLW 16 MOVLB 1 MOVWF PLUT#57 MOVLW 9 MOVWF PLUT#57H MOVLW 24 MOVLB 2 MOVWF ALUT#57 MOVLW 2 MOVWF ALUT#57H F1_001259 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[58] = 0X0A10 : ALUT[58] = 0X0318 MOVLW 16 MOVLB 1 MOVWF PLUT#58 MOVLW 10 MOVWF PLUT#58H MOVLW 24 MOVLB 2 MOVWF ALUT#58 MOVLW 3 MOVWF ALUT#58H F1_001260 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[59] = 0X0B10 : ALUT[59] = 0X0418 MOVLW 16 MOVLB 1 MOVWF PLUT#59 MOVLW 11 MOVWF PLUT#59H MOVLW 24 MOVLB 2 MOVWF ALUT#59 MOVLW 4 MOVWF ALUT#59H F1_001261 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[60] = 0X0020 : ALUT[60] = 0X0518 MOVLW 32 MOVLB 1 MOVWF PLUT#60 CLRF PLUT#60H MOVLW 24 MOVLB 2 MOVWF ALUT#60 MOVLW 5 MOVWF ALUT#60H F1_001262 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[61] = 0X0120 : ALUT[61] = 0X0618 MOVLW 32 MOVLB 1 MOVWF PLUT#61 MOVLW 1 MOVWF PLUT#61H MOVLW 24 MOVLB 2 MOVWF ALUT#61 MOVLW 6 MOVWF ALUT#61H F1_001263 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[62] = 0X0220 : ALUT[62] = 0X0718 MOVLW 32 MOVLB 1 MOVWF PLUT#62 MOVLW 2 MOVWF PLUT#62H MOVLW 24 MOVLB 2 MOVWF ALUT#62 MOVLW 7 MOVWF ALUT#62H F1_001264 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[63] = 0X0320 : ALUT[63] = 0X0818 MOVLW 32 MOVLB 1 MOVWF PLUT#63 MOVLW 3 MOVWF PLUT#63H MOVLW 24 MOVLB 2 MOVWF ALUT#63 MOVLW 8 MOVWF ALUT#63H F1_001265 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[64] = 0X0420 : ALUT[64] = 0X0918 MOVLW 32 MOVLB 1 MOVWF PLUT#64 MOVLW 4 MOVWF PLUT#64H MOVLW 24 MOVLB 2 MOVWF ALUT#64 MOVLW 9 MOVWF ALUT#64H F1_001266 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[65] = 0X0520 : ALUT[65] = 0X0A18 MOVLW 32 MOVLB 1 MOVWF PLUT#65 MOVLW 5 MOVWF PLUT#65H MOVLW 24 MOVLB 2 MOVWF ALUT#65 MOVLW 10 MOVWF ALUT#65H F1_001267 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[66] = 0X0620 : ALUT[66] = 0X0B18 MOVLW 32 MOVLB 1 MOVWF PLUT#66 MOVLW 6 MOVWF PLUT#66H MOVLW 24 MOVLB 2 MOVWF ALUT#66 MOVLW 11 MOVWF ALUT#66H F1_001268 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[67] = 0X0720 : ALUT[67] = 0X0030 MOVLW 32 MOVLB 1 MOVWF PLUT#67 MOVLW 7 MOVWF PLUT#67H MOVLW 48 MOVLB 2 MOVWF ALUT#67 CLRF ALUT#67H F1_001269 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[68] = 0X0820 : ALUT[68] = 0X0130 MOVLW 32 MOVLB 1 MOVWF PLUT#68 MOVLW 8 MOVWF PLUT#68H MOVLW 48 MOVLB 2 MOVWF ALUT#68 MOVLW 1 MOVWF ALUT#68H F1_001270 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[69] = 0X0920 : ALUT[69] = 0X0230 MOVLW 32 MOVLB 1 MOVWF PLUT#69 MOVLW 9 MOVWF PLUT#69H MOVLW 48 MOVLB 2 MOVWF ALUT#69 MOVLW 2 MOVWF ALUT#69H F1_001271 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[70] = 0X0A20 : ALUT[70] = 0X0330 MOVLW 32 MOVLB 1 MOVWF PLUT#70 MOVLW 10 MOVWF PLUT#70H MOVLW 48 MOVLB 2 MOVWF ALUT#70 MOVLW 3 MOVWF ALUT#70H F1_001272 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[71] = 0X0B20 : ALUT[71] = 0X0430 MOVLW 32 MOVLB 1 MOVWF PLUT#71 MOVLW 11 MOVWF PLUT#71H MOVLW 48 MOVLB 2 MOVWF ALUT#71 MOVLW 4 MOVWF ALUT#71H F1_001273 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[72] = 0X0040 : ALUT[72] = 0X0530 MOVLW 64 MOVLB 1 MOVWF PLUT#72 CLRF PLUT#72H MOVLW 48 MOVLB 2 MOVWF ALUT#72 MOVLW 5 MOVWF ALUT#72H F1_001274 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[73] = 0X0140 : ALUT[73] = 0X0630 MOVLW 64 MOVLB 1 MOVWF PLUT#73 MOVLW 1 MOVWF PLUT#73H MOVLW 48 MOVLB 2 MOVWF ALUT#73 MOVLW 6 MOVWF ALUT#73H F1_001275 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[74] = 0X0240 : ALUT[74] = 0X0730 MOVLW 64 MOVLB 1 MOVWF PLUT#74 MOVLW 2 MOVWF PLUT#74H MOVLW 48 MOVLB 2 MOVWF ALUT#74 MOVLW 7 MOVWF ALUT#74H F1_001276 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[75] = 0X0340 : ALUT[75] = 0X0830 MOVLW 64 MOVLB 1 MOVWF PLUT#75 MOVLW 3 MOVWF PLUT#75H MOVLW 48 MOVLB 2 MOVWF ALUT#75 MOVLW 8 MOVWF ALUT#75H F1_001277 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[76] = 0X0440 : ALUT[76] = 0X0930 MOVLW 64 MOVLB 1 MOVWF PLUT#76 MOVLW 4 MOVWF PLUT#76H MOVLW 48 MOVLB 2 MOVWF ALUT#76 MOVLW 9 MOVWF ALUT#76H F1_001278 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[77] = 0X0540 : ALUT[77] = 0X0A30 MOVLW 64 MOVLB 1 MOVWF PLUT#77 MOVLW 5 MOVWF PLUT#77H MOVLW 48 MOVLB 2 MOVWF ALUT#77 MOVLW 10 MOVWF ALUT#77H F1_001279 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[78] = 0X0640 : ALUT[78] = 0X0B30 MOVLW 64 MOVLB 1 MOVWF PLUT#78 MOVLW 6 MOVWF PLUT#78H MOVLW 48 MOVLB 2 MOVWF ALUT#78 MOVLW 11 MOVWF ALUT#78H F1_001280 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[79] = 0X0740 : ALUT[79] = 0X1030 MOVLW 64 MOVLB 1 MOVWF PLUT#79 MOVLW 7 MOVWF PLUT#79H MOVLW 48 MOVLB 2 MOVWF ALUT#79 MOVLW 16 MOVWF ALUT#79H F1_001281 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[80] = 0X0840 : ALUT[80] = 0X1130 MOVLW 64 MOVLB 1 MOVWF PLUT#80 MOVLW 8 MOVWF PLUT#80H MOVLW 48 MOVLB 2 MOVWF ALUT#80 MOVLW 17 MOVWF ALUT#80H F1_001282 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[81] = 0X0940 : ALUT[81] = 0X1230 MOVLW 64 MOVLB 1 MOVWF PLUT#81 MOVLW 9 MOVWF PLUT#81H MOVLW 48 MOVLB 2 MOVWF ALUT#81 MOVLW 18 MOVWF ALUT#81H F1_001283 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[82] = 0X0A40 : ALUT[82] = 0X1330 MOVLW 64 MOVLB 1 MOVWF PLUT#82 MOVLW 10 MOVWF PLUT#82H MOVLW 48 MOVLB 2 MOVWF ALUT#82 MOVLW 19 MOVWF ALUT#82H F1_001284 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[83] = 0X0B40 : ALUT[83] = 0X1430 MOVLW 64 MOVLB 1 MOVWF PLUT#83 MOVLW 11 MOVWF PLUT#83H MOVLW 48 MOVLB 2 MOVWF ALUT#83 MOVLW 20 MOVWF ALUT#83H F1_001287 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[84] = 0X1040 : ALUT[84] = 0X1530 MOVLW 64 MOVLB 1 MOVWF PLUT#84 MOVLW 16 MOVWF PLUT#84H MOVLW 48 MOVLB 2 MOVWF ALUT#84 MOVLW 21 MOVWF ALUT#84H F1_001288 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[85] = 0X1140 : ALUT[85] = 0X1630 MOVLW 64 MOVLB 1 MOVWF PLUT#85 MOVLW 17 MOVWF PLUT#85H MOVLW 48 MOVLB 2 MOVWF ALUT#85 MOVLW 22 MOVWF ALUT#85H F1_001289 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[86] = 0X1240 : ALUT[86] = 0X1730 MOVLW 64 MOVLB 1 MOVWF PLUT#86 MOVLW 18 MOVWF PLUT#86H MOVLW 48 MOVLB 2 MOVWF ALUT#86 MOVLW 23 MOVWF ALUT#86H F1_001290 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[87] = 0X1340 : ALUT[87] = 0X1830 MOVLW 64 MOVLB 1 MOVWF PLUT#87 MOVLW 19 MOVWF PLUT#87H MOVLW 48 MOVLB 2 MOVWF ALUT#87 MOVLW 24 MOVWF ALUT#87H F1_001291 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[88] = 0X1440 : ALUT[88] = 0X1930 MOVLW 64 MOVLB 1 MOVWF PLUT#88 MOVLW 20 MOVWF PLUT#88H MOVLW 48 MOVLB 2 MOVWF ALUT#88 MOVLW 25 MOVWF ALUT#88H F1_001292 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[89] = 0X1540 : ALUT[89] = 0X1A30 MOVLW 64 MOVLB 1 MOVWF PLUT#89 MOVLW 21 MOVWF PLUT#89H MOVLW 48 MOVLB 2 MOVWF ALUT#89 MOVLW 26 MOVWF ALUT#89H F1_001293 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[90] = 0X1640 : ALUT[90] = 0X1B30 MOVLW 64 MOVLB 1 MOVWF PLUT#90 MOVLW 22 MOVWF PLUT#90H MOVLW 48 MOVLB 2 MOVWF ALUT#90 MOVLW 27 MOVWF ALUT#90H F1_001294 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[91] = 0X1740 : ALUT[91] = 0X2030 MOVLW 64 MOVLB 1 MOVWF PLUT#91 MOVLW 23 MOVWF PLUT#91H MOVLW 48 MOVLB 2 MOVWF ALUT#91 MOVLW 32 MOVWF ALUT#91H F1_001298 EQU $ ; IN [AEIO_MASTER.BAS] RETURN MOVLB 0 RETURN 0 LOOKUP_SCIENCE_PITCH F1_001303 EQU $ ; IN [AEIO_MASTER.BAS] FOR K = 0 TO 91 CLRF _K,0 FR@LB206 MOVLW 92 SUBWF _K,W,0 BC NX@LB207 F1_001304 EQU $ ; IN [AEIO_MASTER.BAS] PKOR[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,PKOR MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001305 EQU $ ; IN [AEIO_MASTER.BAS] AKOR[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,AKOR MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001306 EQU $ ; IN [AEIO_MASTER.BAS] NEXT INCF _K,F,0 BNZ FR@LB206 NX@LB207 F1_001307 EQU $ ; IN [AEIO_MASTER.BAS] FOR K = 0 TO 18 CLRF _K,0 FR@LB208 MOVLW 19 SUBWF _K,W,0 BC NX@LB209 F1_001308 EQU $ ; IN [AEIO_MASTER.BAS] ALUT[K] = 0 LFSR 0,ALUT BCF STATUS,0,0 RLCF _K,W,0 ADDWF FSR0L,F,0 MOVLW 0 ADDWFC FSR0H,F,0 CLRF POSTINC0,0 CLRF INDF0,0 F1_001309 EQU $ ; IN [AEIO_MASTER.BAS] NEXT INCF _K,F,0 BNZ FR@LB208 NX@LB209 F1_001310 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[0] = 0X0001 : PKOR[0] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#0 CLRF PLUT#0H MOVLW 64 MOVLB 2 MOVWF PKOR#0 F1_001315 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[1] = 0X0101 : PKOR[1] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#1 MOVWF PLUT#1H MOVLW 64 MOVLB 2 MOVWF PKOR#1 F1_001316 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[2] = 0X0201 : PKOR[2] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#2 MOVLW 2 MOVWF PLUT#2H MOVLW 64 MOVLB 2 MOVWF PKOR#2 F1_001317 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[3] = 0X0301 : PKOR[3] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#3 MOVLW 3 MOVWF PLUT#3H MOVLW 64 MOVLB 2 MOVWF PKOR#3 F1_001318 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[4] = 0X0401 : PKOR[4] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#4 MOVLW 4 MOVWF PLUT#4H MOVLW 64 MOVLB 2 MOVWF PKOR#4 F1_001319 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[5] = 0X0501 : PKOR[5] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#5 MOVLW 5 MOVWF PLUT#5H MOVLW 64 MOVLB 2 MOVWF PKOR#5 F1_001320 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[6] = 0X0601 : PKOR[6] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#6 MOVLW 6 MOVWF PLUT#6H MOVLW 64 MOVLB 2 MOVWF PKOR#6 F1_001321 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[7] = 0X0701 : PKOR[7] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#7 MOVLW 7 MOVWF PLUT#7H MOVLW 64 MOVLB 2 MOVWF PKOR#7 F1_001322 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[8] = 0X0801 : PKOR[8] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#8 MOVLW 8 MOVWF PLUT#8H MOVLW 64 MOVLB 2 MOVWF PKOR#8 F1_001323 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[9] = 0X0901 : PKOR[9] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#9 MOVLW 9 MOVWF PLUT#9H MOVLW 64 MOVLB 2 MOVWF PKOR#9 F1_001324 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[10] = 0X0A01 : PKOR[10] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#10 MOVLW 10 MOVWF PLUT#10H MOVLW 64 MOVLB 2 MOVWF PKOR#10 F1_001325 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[11] = 0X0B01 : PKOR[11] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#11 MOVLW 11 MOVWF PLUT#11H MOVLW 64 MOVLB 2 MOVWF PKOR#11 F1_001327 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[12] = 0X0002 : PKOR[12] = 62 MOVLW 2 MOVLB 1 MOVWF PLUT#12 CLRF PLUT#12H MOVLW 62 MOVLB 2 MOVWF PKOR#12 F1_001328 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[13] = 0X0102 : PKOR[13] = 64 MOVLW 2 MOVLB 1 MOVWF PLUT#13 MOVLW 1 MOVWF PLUT#13H MOVLW 64 MOVLB 2 MOVWF PKOR#13 F1_001329 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[14] = 0X0202 : PKOR[14] = 64 MOVLW 2 MOVLB 1 MOVWF PLUT#14 MOVWF PLUT#14H MOVLW 64 MOVLB 2 MOVWF PKOR#14 F1_001330 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[15] = 0X0302 : PKOR[15] = 60 MOVLW 2 MOVLB 1 MOVWF PLUT#15 MOVLW 3 MOVWF PLUT#15H MOVLW 60 MOVLB 2 MOVWF PKOR#15 F1_001331 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[16] = 0X0402 : PKOR[16] = 65 MOVLW 2 MOVLB 1 MOVWF PLUT#16 MOVLW 4 MOVWF PLUT#16H MOVLW 65 MOVLB 2 MOVWF PKOR#16 F1_001332 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[17] = 0X0502 : PKOR[17] = 67 MOVLW 2 MOVLB 1 MOVWF PLUT#17 MOVLW 5 MOVWF PLUT#17H MOVLW 67 MOVLB 2 MOVWF PKOR#17 F1_001333 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[18] = 0X0602 : PKOR[18] = 66 MOVLW 2 MOVLB 1 MOVWF PLUT#18 MOVLW 6 MOVWF PLUT#18H MOVLW 66 MOVLB 2 MOVWF PKOR#18 F1_001334 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[19] = 0X0702 : PKOR[19] = 63 : ALUT[19] = 0X0003 : AKOR[19] = 66 MOVLW 2 MOVLB 1 MOVWF PLUT#19 MOVLW 7 MOVWF PLUT#19H MOVLW 63 MOVLB 2 MOVWF PKOR#19 MOVLW 3 MOVWF ALUT#19 CLRF ALUT#19H MOVLW 66 MOVLB 3 MOVWF AKOR#19 F1_001335 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[20] = 0X0802 : PKOR[20] = 66 : ALUT[20] = 0X0103 : AKOR[20] = 70 MOVLW 2 MOVLB 1 MOVWF PLUT#20 MOVLW 8 MOVWF PLUT#20H MOVLW 66 MOVLB 2 MOVWF PKOR#20 MOVLW 3 MOVWF ALUT#20 MOVLW 1 MOVWF ALUT#20H MOVLW 70 MOVLB 3 MOVWF AKOR#20 F1_001336 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[21] = 0X0902 : PKOR[21] = 65 : ALUT[21] = 0X0203 : AKOR[21] = 70 MOVLW 2 MOVLB 1 MOVWF PLUT#21 MOVLW 9 MOVWF PLUT#21H MOVLW 65 MOVLB 2 MOVWF PKOR#21 MOVLW 3 MOVWF ALUT#21 MOVLW 2 MOVWF ALUT#21H MOVLW 70 MOVLB 3 MOVWF AKOR#21 F1_001337 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[22] = 0X0A02 : PKOR[22] = 71 : ALUT[22] = 0X0303 : AKOR[22] = 67 MOVLW 2 MOVLB 1 MOVWF PLUT#22 MOVLW 10 MOVWF PLUT#22H MOVLW 71 MOVLB 2 MOVWF PKOR#22 MOVLW 3 MOVWF ALUT#22 MOVWF ALUT#22H MOVLW 67 MOVLB 3 MOVWF AKOR#22 F1_001338 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[23] = 0X0B02 : PKOR[23] = 73 : ALUT[23] = 0X0403 : AKOR[23] = 73 MOVLW 2 MOVLB 1 MOVWF PLUT#23 MOVLW 11 MOVWF PLUT#23H MOVLW 73 MOVLB 2 MOVWF PKOR#23 MOVLW 3 MOVWF ALUT#23 MOVLW 4 MOVWF ALUT#23H MOVLW 73 MOVLB 3 MOVWF AKOR#23 F1_001340 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[24] = 0X0004 : PKOR[24] = 65 : ALUT[24] = 0X0503 : AKOR[24] = 76 MOVLW 4 MOVLB 1 MOVWF PLUT#24 CLRF PLUT#24H MOVLW 65 MOVLB 2 MOVWF PKOR#24 MOVLW 3 MOVWF ALUT#24 MOVLW 5 MOVWF ALUT#24H MOVLW 76 MOVLB 3 MOVWF AKOR#24 F1_001341 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[25] = 0X0104 : PKOR[25] = 76 : ALUT[25] = 0X0603 : AKOR[25] = 76 MOVLW 4 MOVLB 1 MOVWF PLUT#25 MOVLW 1 MOVWF PLUT#25H MOVLW 76 MOVLB 2 MOVWF PKOR#25 MOVLW 3 MOVWF ALUT#25 MOVLW 6 MOVWF ALUT#25H MOVLW 76 MOVLB 3 MOVWF AKOR#25 F1_001342 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[26] = 0X0204 : PKOR[26] = 78 : ALUT[26] = 0X0703 : AKOR[26] = 74 MOVLW 4 MOVLB 1 MOVWF PLUT#26 MOVLW 2 MOVWF PLUT#26H MOVLW 78 MOVLB 2 MOVWF PKOR#26 MOVLW 3 MOVWF ALUT#26 MOVLW 7 MOVWF ALUT#26H MOVLW 74 MOVLB 3 MOVWF AKOR#26 F1_001343 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[27] = 0X0304 : PKOR[27] = 75 : ALUT[27] = 0 : AKOR[27] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#27 MOVLW 3 MOVWF PLUT#27H MOVLW 75 MOVLB 2 MOVWF PKOR#27 CLRF ALUT#27 CLRF ALUT#27H MOVLW 64 MOVLB 3 MOVWF AKOR#27 F1_001344 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[28] = 0X0404 : PKOR[28] = 83 : ALUT[28] = 0 : AKOR[28] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#28 MOVWF PLUT#28H MOVLW 83 MOVLB 2 MOVWF PKOR#28 CLRF ALUT#28 CLRF ALUT#28H MOVLW 64 MOVLB 3 MOVWF AKOR#28 F1_001345 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[29] = 0X0504 : PKOR[29] = 85 : ALUT[29] = 0 : AKOR[29] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#29 MOVLW 5 MOVWF PLUT#29H MOVLW 85 MOVLB 2 MOVWF PKOR#29 CLRF ALUT#29 CLRF ALUT#29H MOVLW 64 MOVLB 3 MOVWF AKOR#29 F1_001346 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[30] = 0X0604 : PKOR[30] = 88 : ALUT[30] = 0 : AKOR[30] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#30 MOVLW 6 MOVWF PLUT#30H MOVLW 88 MOVLB 2 MOVWF PKOR#30 CLRF ALUT#30 CLRF ALUT#30H MOVLW 64 MOVLB 3 MOVWF AKOR#30 F1_001347 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[31] = 0X0704 : PKOR[31] = 86 : ALUT[31] = 0 : AKOR[31] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#31 MOVLW 7 MOVWF PLUT#31H MOVLW 86 MOVLB 2 MOVWF PKOR#31 CLRF ALUT#31 CLRF ALUT#31H MOVLW 64 MOVLB 3 MOVWF AKOR#31 F1_001348 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[32] = 0X0804 : PKOR[32] = 92 : ALUT[32] = 0 : AKOR[32] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#32 MOVLW 8 MOVWF PLUT#32H MOVLW 92 MOVLB 2 MOVWF PKOR#32 CLRF ALUT#32 CLRF ALUT#32H MOVLW 64 MOVLB 3 MOVWF AKOR#32 F1_001349 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[33] = 0X0904 : PKOR[33] = 93 : ALUT[33] = 0 : AKOR[33] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#33 MOVLW 9 MOVWF PLUT#33H MOVLW 93 MOVLB 2 MOVWF PKOR#33 CLRF ALUT#33 CLRF ALUT#33H MOVLW 64 MOVLB 3 MOVWF AKOR#33 F1_001350 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[34] = 0X0007 : PKOR[34] = 85 : ALUT[34] = 0 : AKOR[34] = 64 MOVLW 7 MOVLB 1 MOVWF PLUT#34 CLRF PLUT#34H MOVLW 85 MOVLB 2 MOVWF PKOR#34 CLRF ALUT#34 CLRF ALUT#34H MOVLW 64 MOVLB 3 MOVWF AKOR#34 F1_001351 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[35] = 0X0A04 : PKOR[35] = 44 : ALUT[35] = 0X0605 : AKOR[35] = 45 MOVLW 4 MOVLB 1 MOVWF PLUT#35 MOVLW 10 MOVWF PLUT#35H MOVLW 44 MOVLB 2 MOVWF PKOR#35 MOVLW 5 MOVWF ALUT#35 MOVLW 6 MOVWF ALUT#35H MOVLW 45 MOVLB 3 MOVWF AKOR#35 F1_001352 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[36] = 0X0B04 : PKOR[36] = 59 : ALUT[36] = 0 : AKOR[36] = 59 MOVLW 4 MOVLB 1 MOVWF PLUT#36 MOVLW 11 MOVWF PLUT#36H MOVLW 59 MOVLB 2 MOVWF PKOR#36 CLRF ALUT#36 CLRF ALUT#36H MOVLB 3 MOVWF AKOR#36 F1_001353 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[37] = 0X0506 : PKOR[37] = 65 : ALUT[37] = 0X0008 : AKOR[37] = 63 MOVLW 6 MOVLB 1 MOVWF PLUT#37 MOVLW 5 MOVWF PLUT#37H MOVLW 65 MOVLB 2 MOVWF PKOR#37 MOVLW 8 MOVWF ALUT#37 CLRF ALUT#37H MOVLW 63 MOVLB 3 MOVWF AKOR#37 F1_001354 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[38] = 0X0905 : PKOR[38] = 66 : ALUT[38] = 0X0606 : AKOR[38] = 70 MOVLW 5 MOVLB 1 MOVWF PLUT#38 MOVLW 9 MOVWF PLUT#38H MOVLW 66 MOVLB 2 MOVWF PKOR#38 MOVLW 6 MOVWF ALUT#38 MOVWF ALUT#38H MOVLW 70 MOVLB 3 MOVWF AKOR#38 F1_001355 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[39] = 0X0A05 : PKOR[39] = 69 : ALUT[39] = 0X0009 : AKOR[39] = 78 MOVLW 5 MOVLB 1 MOVWF PLUT#39 MOVLW 10 MOVWF PLUT#39H MOVLW 69 MOVLB 2 MOVWF PKOR#39 MOVLW 9 MOVWF ALUT#39 CLRF ALUT#39H MOVLW 78 MOVLB 3 MOVWF AKOR#39 F1_001356 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[40] = 0X0507 : PKOR[40] = 67 : ALUT[40] = 0X0906 : AKOR[40] = 64 MOVLW 7 MOVLB 1 MOVWF PLUT#40 MOVLW 5 MOVWF PLUT#40H MOVLW 67 MOVLB 2 MOVWF PKOR#40 MOVLW 6 MOVWF ALUT#40 MOVLW 9 MOVWF ALUT#40H MOVLW 64 MOVLB 3 MOVWF AKOR#40 F1_001357 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[41] = 0X0508 : PKOR[41] = 64 : ALUT[41] = 0X0A06 : AKOR[41] = 64 MOVLW 8 MOVLB 1 MOVWF PLUT#41 MOVLW 5 MOVWF PLUT#41H MOVLW 64 MOVLB 2 MOVWF PKOR#41 MOVLW 6 MOVWF ALUT#41 MOVLW 10 MOVWF ALUT#41H MOVLW 64 MOVLB 3 MOVWF AKOR#41 F1_001358 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[42] = 0X0608 : PKOR[42] = 64 : ALUT[42] = 0X0B06 : AKOR[42] = 64 MOVLW 8 MOVLB 1 MOVWF PLUT#42 MOVLW 6 MOVWF PLUT#42H MOVLW 64 MOVLB 2 MOVWF PKOR#42 MOVLW 6 MOVWF ALUT#42 MOVLW 11 MOVWF ALUT#42H MOVLW 64 MOVLB 3 MOVWF AKOR#42 F1_001359 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[43] = 0X0708 : PKOR[43] = 64 : ALUT[43] = 0X000C : AKOR[43] = 64 MOVLW 8 MOVLB 1 MOVWF PLUT#43 MOVLW 7 MOVWF PLUT#43H MOVLW 64 MOVLB 2 MOVWF PKOR#43 MOVLW 12 MOVWF ALUT#43 CLRF ALUT#43H MOVLW 64 MOVLB 3 MOVWF AKOR#43 F1_001360 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[44] = 0X0409 : PKOR[44] = 64 : ALUT[44] = 0X010C : AKOR[44] = 64 MOVLW 9 MOVLB 1 MOVWF PLUT#44 MOVLW 4 MOVWF PLUT#44H MOVLW 64 MOVLB 2 MOVWF PKOR#44 MOVLW 12 MOVWF ALUT#44 MOVLW 1 MOVWF ALUT#44H MOVLW 64 MOVLB 3 MOVWF AKOR#44 F1_001361 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[45] = 0X0708 : PKOR[45] = 68 : ALUT[45] = 0X030A : AKOR[45] = 60 MOVLW 8 MOVLB 1 MOVWF PLUT#45 MOVLW 7 MOVWF PLUT#45H MOVLW 68 MOVLB 2 MOVWF PKOR#45 MOVLW 10 MOVWF ALUT#45 MOVLW 3 MOVWF ALUT#45H MOVLW 60 MOVLB 3 MOVWF AKOR#45 F1_001362 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[46] = 0X0A07 : PKOR[46] = 65 : ALUT[46] = 0X030C : AKOR[46] = 64 MOVLW 7 MOVLB 1 MOVWF PLUT#46 MOVLW 10 MOVWF PLUT#46H MOVLW 65 MOVLB 2 MOVWF PKOR#46 MOVLW 12 MOVWF ALUT#46 MOVLW 3 MOVWF ALUT#46H MOVLW 64 MOVLB 3 MOVWF AKOR#46 F1_001363 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[47] = 0X000D : PKOR[47] = 60 : ALUT[47] = 0X030B : AKOR[47] = 63 MOVLW 13 MOVLB 1 MOVWF PLUT#47 CLRF PLUT#47H MOVLW 60 MOVLB 2 MOVWF PKOR#47 MOVLW 11 MOVWF ALUT#47 MOVLW 3 MOVWF ALUT#47H MOVLW 63 MOVLB 3 MOVWF AKOR#47 F1_001364 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[48] = 0X0010 : PKOR[48] = 64 : ALUT[48] = 0X050C : AKOR[48] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#48 CLRF PLUT#48H MOVLW 64 MOVLB 2 MOVWF PKOR#48 MOVLW 12 MOVWF ALUT#48 MOVLW 5 MOVWF ALUT#48H MOVLW 64 MOVLB 3 MOVWF AKOR#48 F1_001365 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[49] = 0X0809 : PKOR[49] = 63 : ALUT[49] = 0X030C : AKOR[49] = 60 MOVLW 9 MOVLB 1 MOVWF PLUT#49 MOVLW 8 MOVWF PLUT#49H MOVLW 63 MOVLB 2 MOVWF PKOR#49 MOVLW 12 MOVWF ALUT#49 MOVLW 3 MOVWF ALUT#49H MOVLW 60 MOVLB 3 MOVWF AKOR#49 F1_001366 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[50] = 0X0710 : PKOR[50] = 64 : ALUT[50] = 0X070C : AKOR[50] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#50 MOVLW 7 MOVWF PLUT#50H MOVLW 64 MOVLB 2 MOVWF PKOR#50 MOVLW 12 MOVWF ALUT#50 MOVLW 7 MOVWF ALUT#50H MOVLW 64 MOVLB 3 MOVWF AKOR#50 F1_001367 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[51] = 0X0310 : PKOR[51] = 64 : ALUT[51] = 0X080C : AKOR[51] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#51 MOVLW 3 MOVWF PLUT#51H MOVLW 64 MOVLB 2 MOVWF PKOR#51 MOVLW 12 MOVWF ALUT#51 MOVLW 8 MOVWF ALUT#51H MOVLW 64 MOVLB 3 MOVWF AKOR#51 F1_001368 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[52] = 0X0410 : PKOR[52] = 64 : ALUT[52] = 0X090C : AKOR[52] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#52 MOVLW 4 MOVWF PLUT#52H MOVLW 64 MOVLB 2 MOVWF PKOR#52 MOVLW 12 MOVWF ALUT#52 MOVLW 9 MOVWF ALUT#52H MOVLW 64 MOVLB 3 MOVWF AKOR#52 F1_001369 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[53] = 0X0011 : PKOR[53] = 63 : ALUT[53] = 0X060C : AKOR[53] = 64 MOVLW 17 MOVLB 1 MOVWF PLUT#53 CLRF PLUT#53H MOVLW 63 MOVLB 2 MOVWF PKOR#53 MOVLW 12 MOVWF ALUT#53 MOVLW 6 MOVWF ALUT#53H MOVLW 64 MOVLB 3 MOVWF AKOR#53 F1_001370 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[54] = 0X040E : PKOR[54] = 61 : ALUT[54] = 0X030F : AKOR[54] = 70 MOVLW 14 MOVLB 1 MOVWF PLUT#54 MOVLW 4 MOVWF PLUT#54H MOVLW 61 MOVLB 2 MOVWF PKOR#54 MOVLW 15 MOVWF ALUT#54 MOVLW 3 MOVWF ALUT#54H MOVLW 70 MOVLB 3 MOVWF AKOR#54 F1_001371 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[55] = 0X060D : PKOR[55] = 61 : ALUT[55] = 0X0018 : AKOR[55] = 64 MOVLW 13 MOVLB 1 MOVWF PLUT#55 MOVLW 6 MOVWF PLUT#55H MOVLW 61 MOVLB 2 MOVWF PKOR#55 MOVLW 24 MOVWF ALUT#55 CLRF ALUT#55H MOVLW 64 MOVLB 3 MOVWF AKOR#55 F1_001372 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[56] = 0X0810 : PKOR[56] = 64 : ALUT[56] = 0X0118 : AKOR[56] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#56 MOVLW 8 MOVWF PLUT#56H MOVLW 64 MOVLB 2 MOVWF PKOR#56 MOVLW 24 MOVWF ALUT#56 MOVLW 1 MOVWF ALUT#56H MOVLW 64 MOVLB 3 MOVWF AKOR#56 F1_001373 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[57] = 0X050F : PKOR[57] = 68 : ALUT[57] = 0X0014 : AKOR[57] = 64 MOVLW 15 MOVLB 1 MOVWF PLUT#57 MOVLW 5 MOVWF PLUT#57H MOVLW 68 MOVLB 2 MOVWF PKOR#57 MOVLW 20 MOVWF ALUT#57 CLRF ALUT#57H MOVLW 64 MOVLB 3 MOVWF AKOR#57 F1_001374 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[58] = 0X0A10 : PKOR[58] = 64 : ALUT[58] = 0X0318 : AKOR[58] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#58 MOVLW 10 MOVWF PLUT#58H MOVLW 64 MOVLB 2 MOVWF PKOR#58 MOVLW 24 MOVWF ALUT#58 MOVLW 3 MOVWF ALUT#58H MOVLW 64 MOVLB 3 MOVWF AKOR#58 F1_001375 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[59] = 0X0B10 : PKOR[59] = 64 : ALUT[59] = 0X0418 : AKOR[59] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#59 MOVLW 11 MOVWF PLUT#59H MOVLW 64 MOVLB 2 MOVWF PKOR#59 MOVLW 24 MOVWF ALUT#59 MOVLW 4 MOVWF ALUT#59H MOVLW 64 MOVLB 3 MOVWF AKOR#59 F1_001376 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[60] = 0X070F : PKOR[60] = 60 : ALUT[60] = 0X0313 : AKOR[60] = 67 MOVLW 15 MOVLB 1 MOVWF PLUT#60 MOVLW 7 MOVWF PLUT#60H MOVLW 60 MOVLB 2 MOVWF PKOR#60 MOVLW 19 MOVWF ALUT#60 MOVLW 3 MOVWF ALUT#60H MOVLW 67 MOVLB 3 MOVWF AKOR#60 F1_001377 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[61] = 0X0116 : PKOR[61] = 64 : ALUT[61] = 0X0618 : AKOR[61] = 64 MOVLW 22 MOVLB 1 MOVWF PLUT#61 MOVLW 1 MOVWF PLUT#61H MOVLW 64 MOVLB 2 MOVWF PKOR#61 MOVLW 24 MOVWF ALUT#61 MOVLW 6 MOVWF ALUT#61H MOVLW 64 MOVLB 3 MOVWF AKOR#61 F1_001378 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[62] = 0X0117 : PKOR[62] = 73 : ALUT[62] = 0X0718 : AKOR[62] = 64 MOVLW 23 MOVLB 1 MOVWF PLUT#62 MOVLW 1 MOVWF PLUT#62H MOVLW 73 MOVLB 2 MOVWF PKOR#62 MOVLW 24 MOVWF ALUT#62 MOVLW 7 MOVWF ALUT#62H MOVLW 64 MOVLB 3 MOVWF AKOR#62 F1_001379 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[63] = 0X0418 : PKOR[63] = 68 : ALUT[63] = 0X0818 : AKOR[63] = 64 MOVLW 24 MOVLB 1 MOVWF PLUT#63 MOVLW 4 MOVWF PLUT#63H MOVLW 68 MOVLB 2 MOVWF PKOR#63 MOVLW 24 MOVWF ALUT#63 MOVLW 8 MOVWF ALUT#63H MOVLW 64 MOVLB 3 MOVWF AKOR#63 F1_001380 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[64] = 0X0316 : PKOR[64] = 64 : ALUT[64] = 0X0018 : AKOR[64] = 60 MOVLW 22 MOVLB 1 MOVWF PLUT#64 MOVLW 3 MOVWF PLUT#64H MOVLW 64 MOVLB 2 MOVWF PKOR#64 MOVLW 24 MOVWF ALUT#64 CLRF ALUT#64H MOVLW 60 MOVLB 3 MOVWF AKOR#64 F1_001381 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[65] = 0X001B : PKOR[65] = 62 : ALUT[65] = 0X0910 : AKOR[65] = 63 MOVLW 27 MOVLB 1 MOVWF PLUT#65 CLRF PLUT#65H MOVLW 62 MOVLB 2 MOVWF PKOR#65 MOVLW 16 MOVWF ALUT#65 MOVLW 9 MOVWF ALUT#65H MOVLW 63 MOVLB 3 MOVWF AKOR#65 F1_001382 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[66] = 0X0515 : PKOR[66] = 66 : ALUT[66] = 0X0219 : AKOR[66] = 65 MOVLW 21 MOVLB 1 MOVWF PLUT#66 MOVLW 5 MOVWF PLUT#66H MOVLW 66 MOVLB 2 MOVWF PKOR#66 MOVLW 25 MOVWF ALUT#66 MOVLW 2 MOVWF ALUT#66H MOVLW 65 MOVLB 3 MOVWF AKOR#66 F1_001383 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[67] = 0X0417 : PKOR[67] = 62 : ALUT[67] = 0X021A : AKOR[67] = 71 MOVLW 23 MOVLB 1 MOVWF PLUT#67 MOVLW 4 MOVWF PLUT#67H MOVLW 62 MOVLB 2 MOVWF PKOR#67 MOVLW 26 MOVWF ALUT#67 MOVLW 2 MOVWF ALUT#67H MOVLW 71 MOVLB 3 MOVWF AKOR#67 F1_001384 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[68] = 0X0813 : PKOR[68] = 65 : ALUT[68] = 0X001E : AKOR[68] = 60 MOVLW 19 MOVLB 1 MOVWF PLUT#68 MOVLW 8 MOVWF PLUT#68H MOVLW 65 MOVLB 2 MOVWF PKOR#68 MOVLW 30 MOVWF ALUT#68 CLRF ALUT#68H MOVLW 60 MOVLB 3 MOVWF AKOR#68 F1_001385 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[69] = 0X0616 : PKOR[69] = 63 : ALUT[69] = 0X0230 : AKOR[69] = 64 MOVLW 22 MOVLB 1 MOVWF PLUT#69 MOVLW 6 MOVWF PLUT#69H MOVLW 63 MOVLB 2 MOVWF PKOR#69 MOVLW 48 MOVWF ALUT#69 MOVLW 2 MOVWF ALUT#69H MOVLW 64 MOVLB 3 MOVWF AKOR#69 F1_001386 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[70] = 0X0A20 : PKOR[70] = 64 : ALUT[70] = 0X0330 : AKOR[70] = 64 MOVLW 32 MOVLB 1 MOVWF PLUT#70 MOVLW 10 MOVWF PLUT#70H MOVLW 64 MOVLB 2 MOVWF PKOR#70 MOVLW 48 MOVWF ALUT#70 MOVLW 3 MOVWF ALUT#70H MOVLW 64 MOVLB 3 MOVWF AKOR#70 F1_001387 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[71] = 0X0815 : PKOR[71] = 62 : ALUT[71] = 0X0519 : AKOR[71] = 67 MOVLW 21 MOVLB 1 MOVWF PLUT#71 MOVLW 8 MOVWF PLUT#71H MOVLW 62 MOVLB 2 MOVWF PKOR#71 MOVLW 25 MOVWF ALUT#71 MOVLW 5 MOVWF ALUT#71H MOVLW 67 MOVLB 3 MOVWF AKOR#71 F1_001388 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[72] = 0X0040 : PKOR[72] = 64 : ALUT[72] = 0X0530 : AKOR[72] = 64 MOVLW 64 MOVLB 1 MOVWF PLUT#72 CLRF PLUT#72H MOVLB 2 MOVWF PKOR#72 MOVLW 48 MOVWF ALUT#72 MOVLW 5 MOVWF ALUT#72H MOVLW 64 MOVLB 3 MOVWF AKOR#72 F1_001389 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[73] = 0X031E : PKOR[73] = 61 : ALUT[73] = 0X0630 : AKOR[73] = 64 MOVLW 30 MOVLB 1 MOVWF PLUT#73 MOVLW 3 MOVWF PLUT#73H MOVLW 61 MOVLB 2 MOVWF PKOR#73 MOVLW 48 MOVWF ALUT#73 MOVLW 6 MOVWF ALUT#73H MOVLW 64 MOVLB 3 MOVWF AKOR#73 F1_001390 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[74] = 0X0916 : PKOR[74] = 74 : ALUT[74] = 0X061A : AKOR[74] = 60 MOVLW 22 MOVLB 1 MOVWF PLUT#74 MOVLW 9 MOVWF PLUT#74H MOVLW 74 MOVLB 2 MOVWF PKOR#74 MOVLW 26 MOVWF ALUT#74 MOVLW 6 MOVWF ALUT#74H MOVLW 60 MOVLB 3 MOVWF AKOR#74 F1_001391 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[75] = 0X0818 : PKOR[75] = 64 : ALUT[75] = 0X061B : AKOR[75] = 65 MOVLW 24 MOVLB 1 MOVWF PLUT#75 MOVLW 8 MOVWF PLUT#75H MOVLW 64 MOVLB 2 MOVWF PKOR#75 MOVLW 27 MOVWF ALUT#75 MOVLW 6 MOVWF ALUT#75H MOVLW 65 MOVLB 3 MOVWF AKOR#75 F1_001392 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[76] = 0X0440 : PKOR[76] = 64 : ALUT[76] = 0X061C : AKOR[76] = 72 MOVLW 64 MOVLB 1 MOVWF PLUT#76 MOVLW 4 MOVWF PLUT#76H MOVLW 64 MOVLB 2 MOVWF PKOR#76 MOVLW 28 MOVWF ALUT#76 MOVLW 6 MOVWF ALUT#76H MOVLW 72 MOVLB 3 MOVWF AKOR#76 F1_001393 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[77] = 0X0540 : PKOR[77] = 64 : ALUT[77] = 0X0A30 : AKOR[77] = 64 MOVLW 64 MOVLB 1 MOVWF PLUT#77 MOVLW 5 MOVWF PLUT#77H MOVLW 64 MOVLB 2 MOVWF PKOR#77 MOVLW 48 MOVWF ALUT#77 MOVLW 10 MOVWF ALUT#77H MOVLW 64 MOVLB 3 MOVWF AKOR#77 F1_001394 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[78] = 0X0919 : PKOR[78] = 69 : ALUT[78] = 0X0B30 : AKOR[78] = 64 MOVLW 25 MOVLB 1 MOVWF PLUT#78 MOVLW 9 MOVWF PLUT#78H MOVLW 69 MOVLB 2 MOVWF PKOR#78 MOVLW 48 MOVWF ALUT#78 MOVLW 11 MOVWF ALUT#78H MOVLW 64 MOVLB 3 MOVWF AKOR#78 F1_001395 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[79] = 0X0B17 : PKOR[79] = 66 : ALUT[79] = 0X1030 : AKOR[79] = 64 MOVLW 23 MOVLB 1 MOVWF PLUT#79 MOVLW 11 MOVWF PLUT#79H MOVLW 66 MOVLB 2 MOVWF PKOR#79 MOVLW 48 MOVWF ALUT#79 MOVLW 16 MOVWF ALUT#79H MOVLW 64 MOVLB 3 MOVWF AKOR#79 F1_001396 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[80] = 0X071E : PKOR[80] = 64 : ALUT[80] = 0X1130 : AKOR[80] = 64 MOVLW 30 MOVLB 1 MOVWF PLUT#80 MOVLW 7 MOVWF PLUT#80H MOVLW 64 MOVLB 2 MOVWF PKOR#80 MOVLW 48 MOVWF ALUT#80 MOVLW 17 MOVWF ALUT#80H MOVLW 64 MOVLB 3 MOVWF AKOR#80 F1_001397 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[81] = 0X0A1C : PKOR[81] = 66 : ALUT[81] = 0X071F : AKOR[81] = 65 MOVLW 28 MOVLB 1 MOVWF PLUT#81 MOVLW 10 MOVWF PLUT#81H MOVLW 66 MOVLB 2 MOVWF PKOR#81 MOVLW 31 MOVWF ALUT#81 MOVLW 7 MOVWF ALUT#81H MOVLW 65 MOVLB 3 MOVWF AKOR#81 F1_001398 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[82] = 0X081E : PKOR[82] = 64 : ALUT[82] = 0X0720 : AKOR[82] = 65 MOVLW 30 MOVLB 1 MOVWF PLUT#82 MOVLW 8 MOVWF PLUT#82H MOVLW 64 MOVLB 2 MOVWF PKOR#82 MOVLW 32 MOVWF ALUT#82 MOVLW 7 MOVWF ALUT#82H MOVLW 65 MOVLB 3 MOVWF AKOR#82 F1_001399 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[83] = 0X0B40 : PKOR[83] = 59 : ALUT[83] = 0X1430 : AKOR[83] = 64 MOVLW 64 MOVLB 1 MOVWF PLUT#83 MOVLW 11 MOVWF PLUT#83H MOVLW 59 MOVLB 3 MOVWF PKOR#83 MOVLW 48 MOVLB 2 MOVWF ALUT#83 MOVLW 20 MOVWF ALUT#83H MOVLW 64 MOVLB 3 MOVWF AKOR#83 F1_001401 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[84] = 0X0B4D : PKOR[84] = 71 : ALUT[84] = 0X1530 : AKOR[84] = 64 MOVLW 77 MOVLB 1 MOVWF PLUT#84 MOVLW 11 MOVWF PLUT#84H MOVLW 71 MOVLB 3 MOVWF PKOR#84 MOVLW 48 MOVLB 2 MOVWF ALUT#84 MOVLW 21 MOVWF ALUT#84H MOVLW 64 MOVLB 3 MOVWF AKOR#84 F1_001402 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[85] = 0X1140 : PKOR[85] = 64 : ALUT[85] = 0X1630 : AKOR[85] = 64 MOVLB 1 MOVWF PLUT#85 MOVLW 17 MOVWF PLUT#85H MOVLW 64 MOVLB 3 MOVWF PKOR#85 MOVLW 48 MOVLB 2 MOVWF ALUT#85 MOVLW 22 MOVWF ALUT#85H MOVLW 64 MOVLB 3 MOVWF AKOR#85 F1_001403 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[86] = 0X0920 : PKOR[86] = 59 : ALUT[86] = 0X1730 : AKOR[86] = 64 MOVLW 32 MOVLB 1 MOVWF PLUT#86 MOVLW 9 MOVWF PLUT#86H MOVLW 59 MOVLB 3 MOVWF PKOR#86 MOVLW 48 MOVLB 2 MOVWF ALUT#86 MOVLW 23 MOVWF ALUT#86H MOVLW 64 MOVLB 3 MOVWF AKOR#86 F1_001404 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[87] = 0X1340 : PKOR[87] = 64 : ALUT[87] = 0X1830 : AKOR[87] = 64 MOVLB 1 MOVWF PLUT#87 MOVLW 19 MOVWF PLUT#87H MOVLW 64 MOVLB 3 MOVWF PKOR#87 MOVLW 48 MOVLB 2 MOVWF ALUT#87 MOVLW 24 MOVWF ALUT#87H MOVLW 64 MOVLB 3 MOVWF AKOR#87 F1_001405 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[88] = 0X1440 : PKOR[88] = 64 : ALUT[88] = 0X1930 : AKOR[88] = 64 MOVLB 1 MOVWF PLUT#88 MOVLW 20 MOVWF PLUT#88H MOVLW 64 MOVLB 3 MOVWF PKOR#88 MOVLW 48 MOVLB 2 MOVWF ALUT#88 MOVLW 25 MOVWF ALUT#88H MOVLW 64 MOVLB 3 MOVWF AKOR#88 F1_001406 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[89] = 0X1540 : PKOR[89] = 64 : ALUT[89] = 0X1A30 : AKOR[89] = 64 MOVLB 1 MOVWF PLUT#89 MOVLW 21 MOVWF PLUT#89H MOVLW 64 MOVLB 3 MOVWF PKOR#89 MOVLW 48 MOVLB 2 MOVWF ALUT#89 MOVLW 26 MOVWF ALUT#89H MOVLW 64 MOVLB 3 MOVWF AKOR#89 F1_001407 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[90] = 0X1640 : PKOR[90] = 64 : ALUT[90] = 0X1B30 : AKOR[90] = 64 MOVLB 1 MOVWF PLUT#90 MOVLW 22 MOVWF PLUT#90H MOVLW 64 MOVLB 3 MOVWF PKOR#90 MOVLW 48 MOVLB 2 MOVWF ALUT#90 MOVLW 27 MOVWF ALUT#90H MOVLW 64 MOVLB 3 MOVWF AKOR#90 F1_001408 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[91] = 0X1740 : PKOR[91] = 64 : ALUT[91] = 0X2030 : AKOR[91] = 64 MOVLB 1 MOVWF PLUT#91 MOVLW 23 MOVWF PLUT#91H MOVLW 64 MOVLB 3 MOVWF PKOR#91 MOVLW 48 MOVLB 2 MOVWF ALUT#91 MOVLW 32 MOVWF ALUT#91H MOVLW 64 MOVLB 3 MOVWF AKOR#91 F1_001410 EQU $ ; IN [AEIO_MASTER.BAS] RETURN MOVLB 0 RETURN 0 LOOKUP_EMPIRIC F1_001421 EQU $ ; IN [AEIO_MASTER.BAS] FOR K = 0 TO 91 CLRF _K,0 FR@LB210 MOVLW 92 SUBWF _K,W,0 BC NX@LB211 F1_001422 EQU $ ; IN [AEIO_MASTER.BAS] PKOR[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,PKOR MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001423 EQU $ ; IN [AEIO_MASTER.BAS] AKOR[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,AKOR MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001424 EQU $ ; IN [AEIO_MASTER.BAS] ALUT[K] = 0 LFSR 0,ALUT BCF STATUS,0,0 RLCF _K,W,0 ADDWF FSR0L,F,0 MOVLW 0 ADDWFC FSR0H,F,0 CLRF POSTINC0,0 CLRF INDF0,0 F1_001425 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[K] = 0 LFSR 0,PLUT BCF STATUS,0,0 RLCF _K,W,0 ADDWF FSR0L,F,0 MOVLW 0 ADDWFC FSR0H,F,0 CLRF POSTINC0,0 CLRF INDF0,0 F1_001426 EQU $ ; IN [AEIO_MASTER.BAS] NEXT INCF _K,F,0 BNZ FR@LB210 NX@LB211 F1_001428 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[0] = 0X0001 : PKOR[0] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#0 CLRF PLUT#0H MOVLW 64 MOVLB 2 MOVWF PKOR#0 F1_001429 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[1] = 0X0101 : PKOR[1] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#1 MOVWF PLUT#1H MOVLW 64 MOVLB 2 MOVWF PKOR#1 F1_001430 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[2] = 0X0201 : PKOR[2] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#2 MOVLW 2 MOVWF PLUT#2H MOVLW 64 MOVLB 2 MOVWF PKOR#2 F1_001431 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[3] = 0X0301 : PKOR[3] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#3 MOVLW 3 MOVWF PLUT#3H MOVLW 64 MOVLB 2 MOVWF PKOR#3 F1_001432 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[4] = 0X0401 : PKOR[4] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#4 MOVLW 4 MOVWF PLUT#4H MOVLW 64 MOVLB 2 MOVWF PKOR#4 F1_001433 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[5] = 0X0501 : PKOR[5] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#5 MOVLW 5 MOVWF PLUT#5H MOVLW 64 MOVLB 2 MOVWF PKOR#5 F1_001434 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[6] = 0X0601 : PKOR[6] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#6 MOVLW 6 MOVWF PLUT#6H MOVLW 64 MOVLB 2 MOVWF PKOR#6 F1_001435 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[7] = 0X0701 : PKOR[7] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#7 MOVLW 7 MOVWF PLUT#7H MOVLW 64 MOVLB 2 MOVWF PKOR#7 F1_001436 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[8] = 0X0801 : PKOR[8] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#8 MOVLW 8 MOVWF PLUT#8H MOVLW 64 MOVLB 2 MOVWF PKOR#8 F1_001437 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[9] = 0X0901 : PKOR[9] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#9 MOVLW 9 MOVWF PLUT#9H MOVLW 64 MOVLB 2 MOVWF PKOR#9 F1_001438 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[10] = 0X0A01 : PKOR[10] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#10 MOVLW 10 MOVWF PLUT#10H MOVLW 64 MOVLB 2 MOVWF PKOR#10 F1_001439 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[11] = 0X0B01 : PKOR[11] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#11 MOVLW 11 MOVWF PLUT#11H MOVLW 64 MOVLB 2 MOVWF PKOR#11 F1_001440 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[12] = 0X0002 : PKOR[12] = 66 MOVLW 2 MOVLB 1 MOVWF PLUT#12 CLRF PLUT#12H MOVLW 66 MOVLB 2 MOVWF PKOR#12 F1_001441 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[13] = 0X0102 : PKOR[13] = 68 MOVLW 2 MOVLB 1 MOVWF PLUT#13 MOVLW 1 MOVWF PLUT#13H MOVLW 68 MOVLB 2 MOVWF PKOR#13 F1_001442 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[14] = 0X0202 : PKOR[14] = 63 MOVLW 2 MOVLB 1 MOVWF PLUT#14 MOVWF PLUT#14H MOVLW 63 MOVLB 2 MOVWF PKOR#14 F1_001443 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[15] = 0X0302 : PKOR[15] = 67 MOVLW 2 MOVLB 1 MOVWF PLUT#15 MOVLW 3 MOVWF PLUT#15H MOVLW 67 MOVLB 2 MOVWF PKOR#15 F1_001444 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[16] = 0X0402 : PKOR[16] = 30 MOVLW 2 MOVLB 1 MOVWF PLUT#16 MOVLW 4 MOVWF PLUT#16H MOVLW 30 MOVLB 2 MOVWF PKOR#16 F1_001445 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[17] = 0X0502 : PKOR[17] = 54 MOVLW 2 MOVLB 1 MOVWF PLUT#17 MOVLW 5 MOVWF PLUT#17H MOVLW 54 MOVLB 2 MOVWF PKOR#17 F1_001446 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[18] = 0X0602 : PKOR[18] = 49 MOVLW 2 MOVLB 1 MOVWF PLUT#18 MOVLW 6 MOVWF PLUT#18H MOVLW 49 MOVLB 2 MOVWF PKOR#18 F1_001447 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[19] = 0X0702 : PKOR[19] = 66 : ALUT[19] = 0X0003 : AKOR[19] = 72 MOVLW 2 MOVLB 1 MOVWF PLUT#19 MOVLW 7 MOVWF PLUT#19H MOVLW 66 MOVLB 2 MOVWF PKOR#19 MOVLW 3 MOVWF ALUT#19 CLRF ALUT#19H MOVLW 72 MOVLB 3 MOVWF AKOR#19 F1_001448 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[20] = 0X0802 : PKOR[20] = 62 : ALUT[20] = 0X0103 : AKOR[20] = 74 MOVLW 2 MOVLB 1 MOVWF PLUT#20 MOVLW 8 MOVWF PLUT#20H MOVLW 62 MOVLB 2 MOVWF PKOR#20 MOVLW 3 MOVWF ALUT#20 MOVLW 1 MOVWF ALUT#20H MOVLW 74 MOVLB 3 MOVWF AKOR#20 F1_001449 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[21] = 0X0902 : PKOR[21] = 60 MOVLW 2 MOVLB 1 MOVWF PLUT#21 MOVLW 9 MOVWF PLUT#21H MOVLW 60 MOVLB 2 MOVWF PKOR#21 F1_001450 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[22] = 0X0A02 : PKOR[22] = 66 : ALUT[22] = 0X0303 : AKOR[22] = 53 MOVLW 2 MOVLB 1 MOVWF PLUT#22 MOVLW 10 MOVWF PLUT#22H MOVLW 66 MOVLB 2 MOVWF PKOR#22 MOVLW 3 MOVWF ALUT#22 MOVWF ALUT#22H MOVLW 53 MOVLB 3 MOVWF AKOR#22 F1_001451 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[23] = 0X0B02 : PKOR[23] = 72 MOVLW 2 MOVLB 1 MOVWF PLUT#23 MOVLW 11 MOVWF PLUT#23H MOVLW 72 MOVLB 2 MOVWF PKOR#23 F1_001452 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[24] = 0X0503 : PKOR[24] = 69 : ALUT[24] = 0X0004 : AKOR[24] = 71 MOVLW 3 MOVLB 1 MOVWF PLUT#24 MOVLW 5 MOVWF PLUT#24H MOVLW 69 MOVLB 2 MOVWF PKOR#24 MOVLW 4 MOVWF ALUT#24 CLRF ALUT#24H MOVLW 71 MOVLB 3 MOVWF AKOR#24 F1_001453 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[25] = 0X0104 : PKOR[25] = 76 MOVLW 4 MOVLB 1 MOVWF PLUT#25 MOVLW 1 MOVWF PLUT#25H MOVLW 76 MOVLB 2 MOVWF PKOR#25 F1_001454 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[26] = 0X0703 : PKOR[26] = 75 MOVLW 3 MOVLB 1 MOVWF PLUT#26 MOVLW 7 MOVWF PLUT#26H MOVLW 75 MOVLB 2 MOVWF PKOR#26 F1_001455 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[27] = 0X0803 : PKOR[27] = 64 : ALUT[27] = 0X0304 : AKOR[27] = 68 MOVLW 3 MOVLB 1 MOVWF PLUT#27 MOVLW 8 MOVWF PLUT#27H MOVLW 64 MOVLB 2 MOVWF PKOR#27 MOVLW 4 MOVWF ALUT#27 MOVLW 3 MOVWF ALUT#27H MOVLW 68 MOVLB 3 MOVWF AKOR#27 F1_001456 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[28] = 0X0903 : PKOR[28] = 60 : ALUT[28] = 0X0005 : AKOR[28] = 78 MOVLW 3 MOVLB 1 MOVWF PLUT#28 MOVLW 9 MOVWF PLUT#28H MOVLW 60 MOVLB 2 MOVWF PKOR#28 MOVLW 5 MOVWF ALUT#28 CLRF ALUT#28H MOVLW 78 MOVLB 3 MOVWF AKOR#28 F1_001457 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[29] = 0X0105 : PKOR[29] = 74 MOVLW 5 MOVLB 1 MOVWF PLUT#29 MOVLW 1 MOVWF PLUT#29H MOVLW 74 MOVLB 2 MOVWF PKOR#29 F1_001458 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[30] = 0X0B03 : PKOR[30] = 66 : ALUT[30] = 0X0604 : AKOR[30] = 76 MOVLW 3 MOVLB 1 MOVWF PLUT#30 MOVLW 11 MOVWF PLUT#30H MOVLW 66 MOVLB 2 MOVWF PKOR#30 MOVLW 4 MOVWF ALUT#30 MOVLW 6 MOVWF ALUT#30H MOVLW 76 MOVLB 3 MOVWF AKOR#30 F1_001459 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[31] = 0X0305 : PKOR[31] = 72 MOVLW 5 MOVLB 1 MOVWF PLUT#31 MOVLW 3 MOVWF PLUT#31H MOVLW 72 MOVLB 2 MOVWF PKOR#31 F1_001460 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[32] = 0X0804 : PKOR[32] = 74 MOVLW 4 MOVLB 1 MOVWF PLUT#32 MOVLW 8 MOVWF PLUT#32H MOVLW 74 MOVLB 2 MOVWF PKOR#32 F1_001461 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[33] = 0X0206 : PKOR[33] = 55 MOVLW 6 MOVLB 1 MOVWF PLUT#33 MOVLW 2 MOVWF PLUT#33H MOVLW 55 MOVLB 2 MOVWF PKOR#33 F1_001462 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[34] = 0X0605 : PKOR[34] = 82 MOVLW 5 MOVLB 1 MOVWF PLUT#34 MOVLW 6 MOVWF PLUT#34H MOVLW 82 MOVLB 2 MOVWF PKOR#34 F1_001463 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[35] = 0X0406 : PKOR[35] = 71 MOVLW 6 MOVLB 1 MOVWF PLUT#35 MOVLW 4 MOVWF PLUT#35H MOVLW 71 MOVLB 2 MOVWF PKOR#35 F1_001464 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[36] = 0X0008 : PKOR[36] = 70 MOVLW 8 MOVLB 1 MOVWF PLUT#36 CLRF PLUT#36H MOVLW 70 MOVLB 2 MOVWF PKOR#36 F1_001465 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[37] = 0X0108 : PKOR[37] = 58 : ALUT[37] = 0X0009 : AKOR[37] = 21 MOVLW 8 MOVLB 1 MOVWF PLUT#37 MOVLW 1 MOVWF PLUT#37H MOVLW 58 MOVLB 2 MOVWF PKOR#37 MOVLW 9 MOVWF ALUT#37 CLRF ALUT#37H MOVLW 21 MOVLB 3 MOVWF AKOR#37 F1_001466 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[38] = 0X0407 : PKOR[38] = 86 MOVLW 7 MOVLB 1 MOVWF PLUT#38 MOVLW 4 MOVWF PLUT#38H MOVLW 86 MOVLB 2 MOVWF PKOR#38 F1_001467 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[39] = 0X0806 : PKOR[39] = 52 MOVLW 6 MOVLB 1 MOVWF PLUT#39 MOVLW 8 MOVWF PLUT#39H MOVLW 52 MOVLB 2 MOVWF PKOR#39 F1_001468 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[40] = 0X0508 : PKOR[40] = 9 : ALUT[40] = 0X0308 : AKOR[40] = 107 MOVLW 8 MOVLB 1 MOVWF PLUT#40 MOVLW 5 MOVWF PLUT#40H MOVLW 9 MOVLB 2 MOVWF PKOR#40 MOVLW 8 MOVWF ALUT#40 MOVLW 3 MOVWF ALUT#40H MOVLW 107 MOVLB 3 MOVWF AKOR#40 F1_001469 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[41] = 0X0408 : PKOR[41] = 113 : ALUT[41] = 0X020A : AKOR[41] = 33 MOVLW 8 MOVLB 1 MOVWF PLUT#41 MOVLW 4 MOVWF PLUT#41H MOVLW 113 MOVLB 2 MOVWF PKOR#41 MOVLW 10 MOVWF ALUT#41 MOVLW 2 MOVWF ALUT#41H MOVLW 33 MOVLB 3 MOVWF AKOR#41 F1_001470 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[42] = 0X0A06 : PKOR[42] = 92 MOVLW 6 MOVLB 1 MOVWF PLUT#42 MOVLW 10 MOVWF PLUT#42H MOVLW 92 MOVLB 2 MOVWF PKOR#42 F1_001471 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[43] = 0X040A : PKOR[43] = 27 : ALUT[43] = 0X020B : AKOR[43] = 46 MOVLW 10 MOVLB 1 MOVWF PLUT#43 MOVLW 4 MOVWF PLUT#43H MOVLW 27 MOVLB 2 MOVWF PKOR#43 MOVLW 11 MOVWF ALUT#43 MOVLW 2 MOVWF ALUT#43H MOVLW 46 MOVLB 3 MOVWF AKOR#43 F1_001472 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[44] = 0X0B07 : PKOR[44] = 32 MOVLW 7 MOVLB 1 MOVWF PLUT#44 MOVLW 11 MOVWF PLUT#44H MOVLW 32 MOVLB 2 MOVWF PKOR#44 F1_001473 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[45] = 0X050A : PKOR[45] = 70 : ALUT[45] = 0X020C : AKOR[45] = 68 MOVLW 10 MOVLB 1 MOVWF PLUT#45 MOVLW 5 MOVWF PLUT#45H MOVLW 70 MOVLB 2 MOVWF PKOR#45 MOVLW 12 MOVWF ALUT#45 MOVLW 2 MOVWF ALUT#45H MOVLW 68 MOVLB 3 MOVWF AKOR#45 F1_001474 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[46] = 0X040C : PKOR[46] = 13 : ALUT[46] = 0X040B : AKOR[46] = 85 MOVLW 12 MOVLB 1 MOVWF PLUT#46 MOVLW 4 MOVWF PLUT#46H MOVLW 13 MOVLB 2 MOVWF PKOR#46 MOVLW 11 MOVWF ALUT#46 MOVLW 4 MOVWF ALUT#46H MOVLW 85 MOVLB 3 MOVWF AKOR#46 F1_001475 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[47] = 0X0B08 : PKOR[47] = 63 : ALUT[47] = 0X080A : AKOR[47] = 19 MOVLW 8 MOVLB 1 MOVWF PLUT#47 MOVLW 11 MOVWF PLUT#47H MOVLW 63 MOVLB 2 MOVWF PKOR#47 MOVLW 10 MOVWF ALUT#47 MOVLW 8 MOVWF ALUT#47H MOVLW 19 MOVLB 3 MOVWF AKOR#47 F1_001476 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[48] = 0X0110 : PKOR[48] = 26 : ALUT[48] = 0X010F : AKOR[48] = 82 MOVLW 16 MOVLB 1 MOVWF PLUT#48 MOVLW 1 MOVWF PLUT#48H MOVLW 26 MOVLB 2 MOVWF PKOR#48 MOVLW 15 MOVWF ALUT#48 MOVLW 1 MOVWF ALUT#48H MOVLW 82 MOVLB 3 MOVWF AKOR#48 F1_001477 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[49] = 0X0210 : PKOR[49] = 10 : ALUT[49] = 0X020F : AKOR[49] = 65 MOVLW 16 MOVLB 1 MOVWF PLUT#49 MOVLW 2 MOVWF PLUT#49H MOVLW 10 MOVLB 2 MOVWF PKOR#49 MOVLW 15 MOVWF ALUT#49 MOVLW 2 MOVWF ALUT#49H MOVLW 65 MOVLB 3 MOVWF AKOR#49 F1_001478 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[50] = 0X040F : PKOR[50] = 19 : ALUT[50] = 0X040E : AKOR[50] = 75 MOVLW 15 MOVLB 1 MOVWF PLUT#50 MOVLW 4 MOVWF PLUT#50H MOVLW 19 MOVLB 2 MOVWF PKOR#50 MOVLW 14 MOVWF ALUT#50 MOVLW 4 MOVWF ALUT#50H MOVLW 75 MOVLB 3 MOVWF AKOR#50 F1_001479 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[51] = 0X060D : PKOR[51] = 86 MOVLW 13 MOVLB 1 MOVWF PLUT#51 MOVLW 6 MOVWF PLUT#51H MOVLW 86 MOVLB 2 MOVWF PKOR#51 F1_001480 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[52] = 0X0311 : PKOR[52] = 52 MOVLW 17 MOVLB 1 MOVWF PLUT#52 MOVLW 3 MOVWF PLUT#52H MOVLW 52 MOVLB 2 MOVWF PKOR#52 F1_001481 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[53] = 0X0B0C : PKOR[53] = 9 : ALUT[53] = 0X0B0B : AKOR[53] = 84 MOVLW 12 MOVLB 1 MOVWF PLUT#53 MOVLW 11 MOVWF PLUT#53H MOVLW 9 MOVLB 2 MOVWF PKOR#53 MOVLW 11 MOVWF ALUT#53 MOVWF ALUT#53H MOVLW 84 MOVLB 3 MOVWF AKOR#53 F1_001482 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[54] = 0X0A0D : PKOR[54] = 45 MOVLW 13 MOVLB 1 MOVWF PLUT#54 MOVLW 10 MOVWF PLUT#54H MOVLW 45 MOVLB 2 MOVWF PKOR#54 F1_001483 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[55] = 0X0611 : PKOR[55] = 63 MOVLW 17 MOVLB 1 MOVWF PLUT#55 MOVLW 6 MOVWF PLUT#55H MOVLW 63 MOVLB 2 MOVWF PKOR#55 F1_001484 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[56] = 0X0A0F : PKOR[56] = 28 : ALUT[56] = 0X0A0E : AKOR[56] = 88 MOVLW 15 MOVLB 1 MOVWF PLUT#56 MOVLW 10 MOVWF PLUT#56H MOVLW 28 MOVLB 2 MOVWF PKOR#56 MOVLW 14 MOVWF ALUT#56 MOVLW 10 MOVWF ALUT#56H MOVLW 88 MOVLB 3 MOVWF AKOR#56 F1_001485 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[57] = 0X0911 : PKOR[57] = 10 : ALUT[57] = 0X0910 : AKOR[57] = 66 MOVLW 17 MOVLB 1 MOVWF PLUT#57 MOVLW 9 MOVWF PLUT#57H MOVLW 10 MOVLB 2 MOVWF PKOR#57 MOVLW 16 MOVWF ALUT#57 MOVLW 9 MOVWF ALUT#57H MOVLW 66 MOVLB 3 MOVWF AKOR#57 F1_001486 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[58] = 0X0B10 : PKOR[58] = 7 : ALUT[58] = 0X0B0F : AKOR[58] = 58 MOVLW 16 MOVLB 1 MOVWF PLUT#58 MOVLW 11 MOVWF PLUT#58H MOVLW 7 MOVLB 2 MOVWF PKOR#58 MOVLW 15 MOVWF ALUT#58 MOVLW 11 MOVWF ALUT#58H MOVLW 58 MOVLB 3 MOVWF AKOR#58 F1_001488 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[59] = 0X0B10 : PKOR[59] = 64 : ALUT[59] = 0X0418 : AKOR[59] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#59 MOVLW 11 MOVWF PLUT#59H MOVLW 64 MOVLB 2 MOVWF PKOR#59 MOVLW 24 MOVWF ALUT#59 MOVLW 4 MOVWF ALUT#59H MOVLW 64 MOVLB 3 MOVWF AKOR#59 F1_001489 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[60] = 0X070F : PKOR[60] = 60 : ALUT[60] = 0X0313 : AKOR[60] = 67 MOVLW 15 MOVLB 1 MOVWF PLUT#60 MOVLW 7 MOVWF PLUT#60H MOVLW 60 MOVLB 2 MOVWF PKOR#60 MOVLW 19 MOVWF ALUT#60 MOVLW 3 MOVWF ALUT#60H MOVLW 67 MOVLB 3 MOVWF AKOR#60 F1_001490 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[61] = 0X0116 : PKOR[61] = 64 : ALUT[61] = 0X0618 : AKOR[61] = 64 MOVLW 22 MOVLB 1 MOVWF PLUT#61 MOVLW 1 MOVWF PLUT#61H MOVLW 64 MOVLB 2 MOVWF PKOR#61 MOVLW 24 MOVWF ALUT#61 MOVLW 6 MOVWF ALUT#61H MOVLW 64 MOVLB 3 MOVWF AKOR#61 F1_001491 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[62] = 0X0117 : PKOR[62] = 73 : ALUT[62] = 0X0718 : AKOR[62] = 64 MOVLW 23 MOVLB 1 MOVWF PLUT#62 MOVLW 1 MOVWF PLUT#62H MOVLW 73 MOVLB 2 MOVWF PKOR#62 MOVLW 24 MOVWF ALUT#62 MOVLW 7 MOVWF ALUT#62H MOVLW 64 MOVLB 3 MOVWF AKOR#62 F1_001492 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[63] = 0X0418 : PKOR[63] = 68 : ALUT[63] = 0X0818 : AKOR[63] = 64 MOVLW 24 MOVLB 1 MOVWF PLUT#63 MOVLW 4 MOVWF PLUT#63H MOVLW 68 MOVLB 2 MOVWF PKOR#63 MOVLW 24 MOVWF ALUT#63 MOVLW 8 MOVWF ALUT#63H MOVLW 64 MOVLB 3 MOVWF AKOR#63 F1_001493 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[64] = 0X0316 : PKOR[64] = 64 : ALUT[64] = 0X0018 : AKOR[64] = 60 MOVLW 22 MOVLB 1 MOVWF PLUT#64 MOVLW 3 MOVWF PLUT#64H MOVLW 64 MOVLB 2 MOVWF PKOR#64 MOVLW 24 MOVWF ALUT#64 CLRF ALUT#64H MOVLW 60 MOVLB 3 MOVWF AKOR#64 F1_001494 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[65] = 0X001B : PKOR[65] = 62 : ALUT[65] = 0X0910 : AKOR[65] = 63 MOVLW 27 MOVLB 1 MOVWF PLUT#65 CLRF PLUT#65H MOVLW 62 MOVLB 2 MOVWF PKOR#65 MOVLW 16 MOVWF ALUT#65 MOVLW 9 MOVWF ALUT#65H MOVLW 63 MOVLB 3 MOVWF AKOR#65 F1_001495 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[66] = 0X0515 : PKOR[66] = 66 : ALUT[66] = 0X0219 : AKOR[66] = 65 MOVLW 21 MOVLB 1 MOVWF PLUT#66 MOVLW 5 MOVWF PLUT#66H MOVLW 66 MOVLB 2 MOVWF PKOR#66 MOVLW 25 MOVWF ALUT#66 MOVLW 2 MOVWF ALUT#66H MOVLW 65 MOVLB 3 MOVWF AKOR#66 F1_001496 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[67] = 0X0417 : PKOR[67] = 62 : ALUT[67] = 0X021A : AKOR[67] = 71 MOVLW 23 MOVLB 1 MOVWF PLUT#67 MOVLW 4 MOVWF PLUT#67H MOVLW 62 MOVLB 2 MOVWF PKOR#67 MOVLW 26 MOVWF ALUT#67 MOVLW 2 MOVWF ALUT#67H MOVLW 71 MOVLB 3 MOVWF AKOR#67 F1_001497 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[68] = 0X0813 : PKOR[68] = 65 : ALUT[68] = 0X001E : AKOR[68] = 60 MOVLW 19 MOVLB 1 MOVWF PLUT#68 MOVLW 8 MOVWF PLUT#68H MOVLW 65 MOVLB 2 MOVWF PKOR#68 MOVLW 30 MOVWF ALUT#68 CLRF ALUT#68H MOVLW 60 MOVLB 3 MOVWF AKOR#68 F1_001498 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[69] = 0X0616 : PKOR[69] = 63 : ALUT[69] = 0X0230 : AKOR[69] = 64 MOVLW 22 MOVLB 1 MOVWF PLUT#69 MOVLW 6 MOVWF PLUT#69H MOVLW 63 MOVLB 2 MOVWF PKOR#69 MOVLW 48 MOVWF ALUT#69 MOVLW 2 MOVWF ALUT#69H MOVLW 64 MOVLB 3 MOVWF AKOR#69 F1_001499 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[70] = 0X0A20 : PKOR[70] = 64 : ALUT[70] = 0X0330 : AKOR[70] = 64 MOVLW 32 MOVLB 1 MOVWF PLUT#70 MOVLW 10 MOVWF PLUT#70H MOVLW 64 MOVLB 2 MOVWF PKOR#70 MOVLW 48 MOVWF ALUT#70 MOVLW 3 MOVWF ALUT#70H MOVLW 64 MOVLB 3 MOVWF AKOR#70 F1_001500 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[71] = 0X0815 : PKOR[71] = 62 : ALUT[71] = 0X0519 : AKOR[71] = 67 MOVLW 21 MOVLB 1 MOVWF PLUT#71 MOVLW 8 MOVWF PLUT#71H MOVLW 62 MOVLB 2 MOVWF PKOR#71 MOVLW 25 MOVWF ALUT#71 MOVLW 5 MOVWF ALUT#71H MOVLW 67 MOVLB 3 MOVWF AKOR#71 F1_001501 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[72] = 0X0040 : PKOR[72] = 64 : ALUT[72] = 0X0530 : AKOR[72] = 64 MOVLW 64 MOVLB 1 MOVWF PLUT#72 CLRF PLUT#72H MOVLB 2 MOVWF PKOR#72 MOVLW 48 MOVWF ALUT#72 MOVLW 5 MOVWF ALUT#72H MOVLW 64 MOVLB 3 MOVWF AKOR#72 F1_001502 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[73] = 0X031E : PKOR[73] = 61 : ALUT[73] = 0X0630 : AKOR[73] = 64 MOVLW 30 MOVLB 1 MOVWF PLUT#73 MOVLW 3 MOVWF PLUT#73H MOVLW 61 MOVLB 2 MOVWF PKOR#73 MOVLW 48 MOVWF ALUT#73 MOVLW 6 MOVWF ALUT#73H MOVLW 64 MOVLB 3 MOVWF AKOR#73 F1_001503 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[74] = 0X0916 : PKOR[74] = 74 : ALUT[74] = 0X061A : AKOR[74] = 60 MOVLW 22 MOVLB 1 MOVWF PLUT#74 MOVLW 9 MOVWF PLUT#74H MOVLW 74 MOVLB 2 MOVWF PKOR#74 MOVLW 26 MOVWF ALUT#74 MOVLW 6 MOVWF ALUT#74H MOVLW 60 MOVLB 3 MOVWF AKOR#74 F1_001504 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[75] = 0X0818 : PKOR[75] = 64 : ALUT[75] = 0X061B : AKOR[75] = 65 MOVLW 24 MOVLB 1 MOVWF PLUT#75 MOVLW 8 MOVWF PLUT#75H MOVLW 64 MOVLB 2 MOVWF PKOR#75 MOVLW 27 MOVWF ALUT#75 MOVLW 6 MOVWF ALUT#75H MOVLW 65 MOVLB 3 MOVWF AKOR#75 F1_001505 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[76] = 0X0440 : PKOR[76] = 64 : ALUT[76] = 0X061C : AKOR[76] = 72 MOVLW 64 MOVLB 1 MOVWF PLUT#76 MOVLW 4 MOVWF PLUT#76H MOVLW 64 MOVLB 2 MOVWF PKOR#76 MOVLW 28 MOVWF ALUT#76 MOVLW 6 MOVWF ALUT#76H MOVLW 72 MOVLB 3 MOVWF AKOR#76 F1_001506 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[77] = 0X0540 : PKOR[77] = 64 : ALUT[77] = 0X0A30 : AKOR[77] = 64 MOVLW 64 MOVLB 1 MOVWF PLUT#77 MOVLW 5 MOVWF PLUT#77H MOVLW 64 MOVLB 2 MOVWF PKOR#77 MOVLW 48 MOVWF ALUT#77 MOVLW 10 MOVWF ALUT#77H MOVLW 64 MOVLB 3 MOVWF AKOR#77 F1_001507 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[78] = 0X0919 : PKOR[78] = 69 : ALUT[78] = 0X0B30 : AKOR[78] = 64 MOVLW 25 MOVLB 1 MOVWF PLUT#78 MOVLW 9 MOVWF PLUT#78H MOVLW 69 MOVLB 2 MOVWF PKOR#78 MOVLW 48 MOVWF ALUT#78 MOVLW 11 MOVWF ALUT#78H MOVLW 64 MOVLB 3 MOVWF AKOR#78 F1_001508 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[79] = 0X0B17 : PKOR[79] = 66 : ALUT[79] = 0X1030 : AKOR[79] = 64 MOVLW 23 MOVLB 1 MOVWF PLUT#79 MOVLW 11 MOVWF PLUT#79H MOVLW 66 MOVLB 2 MOVWF PKOR#79 MOVLW 48 MOVWF ALUT#79 MOVLW 16 MOVWF ALUT#79H MOVLW 64 MOVLB 3 MOVWF AKOR#79 F1_001509 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[80] = 0X071E : PKOR[80] = 64 : ALUT[80] = 0X1130 : AKOR[80] = 64 MOVLW 30 MOVLB 1 MOVWF PLUT#80 MOVLW 7 MOVWF PLUT#80H MOVLW 64 MOVLB 2 MOVWF PKOR#80 MOVLW 48 MOVWF ALUT#80 MOVLW 17 MOVWF ALUT#80H MOVLW 64 MOVLB 3 MOVWF AKOR#80 F1_001510 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[81] = 0X0A1C : PKOR[81] = 66 : ALUT[81] = 0X071F : AKOR[81] = 65 MOVLW 28 MOVLB 1 MOVWF PLUT#81 MOVLW 10 MOVWF PLUT#81H MOVLW 66 MOVLB 2 MOVWF PKOR#81 MOVLW 31 MOVWF ALUT#81 MOVLW 7 MOVWF ALUT#81H MOVLW 65 MOVLB 3 MOVWF AKOR#81 F1_001511 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[82] = 0X081E : PKOR[82] = 64 : ALUT[82] = 0X0720 : AKOR[82] = 65 MOVLW 30 MOVLB 1 MOVWF PLUT#82 MOVLW 8 MOVWF PLUT#82H MOVLW 64 MOVLB 2 MOVWF PKOR#82 MOVLW 32 MOVWF ALUT#82 MOVLW 7 MOVWF ALUT#82H MOVLW 65 MOVLB 3 MOVWF AKOR#82 F1_001512 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[83] = 0X0B40 : PKOR[83] = 59 : ALUT[83] = 0X1430 : AKOR[83] = 64 MOVLW 64 MOVLB 1 MOVWF PLUT#83 MOVLW 11 MOVWF PLUT#83H MOVLW 59 MOVLB 3 MOVWF PKOR#83 MOVLW 48 MOVLB 2 MOVWF ALUT#83 MOVLW 20 MOVWF ALUT#83H MOVLW 64 MOVLB 3 MOVWF AKOR#83 F1_001514 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[84] = 0X0B4D : PKOR[84] = 71 : ALUT[84] = 0X1530 : AKOR[84] = 64 MOVLW 77 MOVLB 1 MOVWF PLUT#84 MOVLW 11 MOVWF PLUT#84H MOVLW 71 MOVLB 3 MOVWF PKOR#84 MOVLW 48 MOVLB 2 MOVWF ALUT#84 MOVLW 21 MOVWF ALUT#84H MOVLW 64 MOVLB 3 MOVWF AKOR#84 F1_001515 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[85] = 0X1140 : PKOR[85] = 64 : ALUT[85] = 0X1630 : AKOR[85] = 64 MOVLB 1 MOVWF PLUT#85 MOVLW 17 MOVWF PLUT#85H MOVLW 64 MOVLB 3 MOVWF PKOR#85 MOVLW 48 MOVLB 2 MOVWF ALUT#85 MOVLW 22 MOVWF ALUT#85H MOVLW 64 MOVLB 3 MOVWF AKOR#85 F1_001516 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[86] = 0X0920 : PKOR[86] = 59 : ALUT[86] = 0X1730 : AKOR[86] = 64 MOVLW 32 MOVLB 1 MOVWF PLUT#86 MOVLW 9 MOVWF PLUT#86H MOVLW 59 MOVLB 3 MOVWF PKOR#86 MOVLW 48 MOVLB 2 MOVWF ALUT#86 MOVLW 23 MOVWF ALUT#86H MOVLW 64 MOVLB 3 MOVWF AKOR#86 F1_001517 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[87] = 0X1340 : PKOR[87] = 64 : ALUT[87] = 0X1830 : AKOR[87] = 64 MOVLB 1 MOVWF PLUT#87 MOVLW 19 MOVWF PLUT#87H MOVLW 64 MOVLB 3 MOVWF PKOR#87 MOVLW 48 MOVLB 2 MOVWF ALUT#87 MOVLW 24 MOVWF ALUT#87H MOVLW 64 MOVLB 3 MOVWF AKOR#87 F1_001518 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[88] = 0X1440 : PKOR[88] = 64 : ALUT[88] = 0X1930 : AKOR[88] = 64 MOVLB 1 MOVWF PLUT#88 MOVLW 20 MOVWF PLUT#88H MOVLW 64 MOVLB 3 MOVWF PKOR#88 MOVLW 48 MOVLB 2 MOVWF ALUT#88 MOVLW 25 MOVWF ALUT#88H MOVLW 64 MOVLB 3 MOVWF AKOR#88 F1_001519 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[89] = 0X1540 : PKOR[89] = 64 : ALUT[89] = 0X1A30 : AKOR[89] = 64 MOVLB 1 MOVWF PLUT#89 MOVLW 21 MOVWF PLUT#89H MOVLW 64 MOVLB 3 MOVWF PKOR#89 MOVLW 48 MOVLB 2 MOVWF ALUT#89 MOVLW 26 MOVWF ALUT#89H MOVLW 64 MOVLB 3 MOVWF AKOR#89 F1_001520 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[90] = 0X1640 : PKOR[90] = 64 : ALUT[90] = 0X1B30 : AKOR[90] = 64 MOVLB 1 MOVWF PLUT#90 MOVLW 22 MOVWF PLUT#90H MOVLW 64 MOVLB 3 MOVWF PKOR#90 MOVLW 48 MOVLB 2 MOVWF ALUT#90 MOVLW 27 MOVWF ALUT#90H MOVLW 64 MOVLB 3 MOVWF AKOR#90 F1_001521 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[91] = 0X1740 : PKOR[91] = 64 : ALUT[91] = 0X2030 : AKOR[91] = 64 MOVLB 1 MOVWF PLUT#91 MOVLW 23 MOVWF PLUT#91H MOVLW 64 MOVLB 3 MOVWF PKOR#91 MOVLW 48 MOVLB 2 MOVWF ALUT#91 MOVLW 32 MOVWF ALUT#91H MOVLW 64 MOVLB 3 MOVWF AKOR#91 F1_001523 EQU $ ; IN [AEIO_MASTER.BAS] RETURN MOVLB 0 RETURN 0 LOOKUP_EQ F1_001529 EQU $ ; IN [AEIO_MASTER.BAS] FOR K = 0 TO 91 CLRF _K,0 FR@LB212 MOVLW 92 SUBWF _K,W,0 BC NX@LB213 F1_001530 EQU $ ; IN [AEIO_MASTER.BAS] PKOR[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,PKOR MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001531 EQU $ ; IN [AEIO_MASTER.BAS] AKOR[K] = 64 MOVLW 64 MOVWF PRODL,0 LFSR 0,AKOR MOVF _K,W,0 MOVFF PRODL,PLUSW0 F1_001532 EQU $ ; IN [AEIO_MASTER.BAS] NEXT INCF _K,F,0 BNZ FR@LB212 NX@LB213 F1_001533 EQU $ ; IN [AEIO_MASTER.BAS] FOR K = 0 TO 18 CLRF _K,0 FR@LB214 MOVLW 19 SUBWF _K,W,0 BC NX@LB215 F1_001534 EQU $ ; IN [AEIO_MASTER.BAS] ALUT[K] = 0 LFSR 0,ALUT BCF STATUS,0,0 RLCF _K,W,0 ADDWF FSR0L,F,0 MOVLW 0 ADDWFC FSR0H,F,0 CLRF POSTINC0,0 CLRF INDF0,0 F1_001536 EQU $ ; IN [AEIO_MASTER.BAS] NEXT INCF _K,F,0 BNZ FR@LB214 NX@LB215 F1_001537 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[0] = 0X0001 : PKOR[0] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#0 CLRF PLUT#0H MOVLW 64 MOVLB 2 MOVWF PKOR#0 F1_001542 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[1] = 0X0101 : PKOR[1] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#1 MOVWF PLUT#1H MOVLW 64 MOVLB 2 MOVWF PKOR#1 F1_001543 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[2] = 0X0201 : PKOR[2] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#2 MOVLW 2 MOVWF PLUT#2H MOVLW 64 MOVLB 2 MOVWF PKOR#2 F1_001544 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[3] = 0X0301 : PKOR[3] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#3 MOVLW 3 MOVWF PLUT#3H MOVLW 64 MOVLB 2 MOVWF PKOR#3 F1_001545 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[4] = 0X0401 : PKOR[4] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#4 MOVLW 4 MOVWF PLUT#4H MOVLW 64 MOVLB 2 MOVWF PKOR#4 F1_001546 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[5] = 0X0501 : PKOR[5] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#5 MOVLW 5 MOVWF PLUT#5H MOVLW 64 MOVLB 2 MOVWF PKOR#5 F1_001547 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[6] = 0X0601 : PKOR[6] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#6 MOVLW 6 MOVWF PLUT#6H MOVLW 64 MOVLB 2 MOVWF PKOR#6 F1_001548 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[7] = 0X0701 : PKOR[7] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#7 MOVLW 7 MOVWF PLUT#7H MOVLW 64 MOVLB 2 MOVWF PKOR#7 F1_001549 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[8] = 0X0801 : PKOR[8] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#8 MOVLW 8 MOVWF PLUT#8H MOVLW 64 MOVLB 2 MOVWF PKOR#8 F1_001550 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[9] = 0X0901 : PKOR[9] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#9 MOVLW 9 MOVWF PLUT#9H MOVLW 64 MOVLB 2 MOVWF PKOR#9 F1_001551 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[10] = 0X0A01 : PKOR[10] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#10 MOVLW 10 MOVWF PLUT#10H MOVLW 64 MOVLB 2 MOVWF PKOR#10 F1_001552 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[11] = 0X0B01 : PKOR[11] = 64 MOVLW 1 MOVLB 1 MOVWF PLUT#11 MOVLW 11 MOVWF PLUT#11H MOVLW 64 MOVLB 2 MOVWF PKOR#11 F1_001554 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[12] = 0X0002 : PKOR[12] = 62 MOVLW 2 MOVLB 1 MOVWF PLUT#12 CLRF PLUT#12H MOVLW 62 MOVLB 2 MOVWF PKOR#12 F1_001555 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[13] = 0X0102 : PKOR[13] = 64 MOVLW 2 MOVLB 1 MOVWF PLUT#13 MOVLW 1 MOVWF PLUT#13H MOVLW 64 MOVLB 2 MOVWF PKOR#13 F1_001556 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[14] = 0X0202 : PKOR[14] = 64 MOVLW 2 MOVLB 1 MOVWF PLUT#14 MOVWF PLUT#14H MOVLW 64 MOVLB 2 MOVWF PKOR#14 F1_001557 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[15] = 0X0302 : PKOR[15] = 60 MOVLW 2 MOVLB 1 MOVWF PLUT#15 MOVLW 3 MOVWF PLUT#15H MOVLW 60 MOVLB 2 MOVWF PKOR#15 F1_001558 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[16] = 0X0402 : PKOR[16] = 65 MOVLW 2 MOVLB 1 MOVWF PLUT#16 MOVLW 4 MOVWF PLUT#16H MOVLW 65 MOVLB 2 MOVWF PKOR#16 F1_001559 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[17] = 0X0502 : PKOR[17] = 67 MOVLW 2 MOVLB 1 MOVWF PLUT#17 MOVLW 5 MOVWF PLUT#17H MOVLW 67 MOVLB 2 MOVWF PKOR#17 F1_001560 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[18] = 0X0602 : PKOR[18] = 66 MOVLW 2 MOVLB 1 MOVWF PLUT#18 MOVLW 6 MOVWF PLUT#18H MOVLW 66 MOVLB 2 MOVWF PKOR#18 F1_001561 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[19] = 0X0702 : PKOR[19] = 63 : ALUT[19] = 0X0003 : AKOR[19] = 66 MOVLW 2 MOVLB 1 MOVWF PLUT#19 MOVLW 7 MOVWF PLUT#19H MOVLW 63 MOVLB 2 MOVWF PKOR#19 MOVLW 3 MOVWF ALUT#19 CLRF ALUT#19H MOVLW 66 MOVLB 3 MOVWF AKOR#19 F1_001562 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[20] = 0X0802 : PKOR[20] = 66 : ALUT[20] = 0X0103 : AKOR[20] = 70 MOVLW 2 MOVLB 1 MOVWF PLUT#20 MOVLW 8 MOVWF PLUT#20H MOVLW 66 MOVLB 2 MOVWF PKOR#20 MOVLW 3 MOVWF ALUT#20 MOVLW 1 MOVWF ALUT#20H MOVLW 70 MOVLB 3 MOVWF AKOR#20 F1_001563 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[21] = 0X0902 : PKOR[21] = 65 : ALUT[21] = 0X0203 : AKOR[21] = 70 MOVLW 2 MOVLB 1 MOVWF PLUT#21 MOVLW 9 MOVWF PLUT#21H MOVLW 65 MOVLB 2 MOVWF PKOR#21 MOVLW 3 MOVWF ALUT#21 MOVLW 2 MOVWF ALUT#21H MOVLW 70 MOVLB 3 MOVWF AKOR#21 F1_001564 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[22] = 0X0A02 : PKOR[22] = 71 : ALUT[22] = 0X0303 : AKOR[22] = 67 MOVLW 2 MOVLB 1 MOVWF PLUT#22 MOVLW 10 MOVWF PLUT#22H MOVLW 71 MOVLB 2 MOVWF PKOR#22 MOVLW 3 MOVWF ALUT#22 MOVWF ALUT#22H MOVLW 67 MOVLB 3 MOVWF AKOR#22 F1_001565 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[23] = 0X0B02 : PKOR[23] = 73 : ALUT[23] = 0X0403 : AKOR[23] = 73 MOVLW 2 MOVLB 1 MOVWF PLUT#23 MOVLW 11 MOVWF PLUT#23H MOVLW 73 MOVLB 2 MOVWF PKOR#23 MOVLW 3 MOVWF ALUT#23 MOVLW 4 MOVWF ALUT#23H MOVLW 73 MOVLB 3 MOVWF AKOR#23 F1_001567 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[24] = 0X0004 : PKOR[24] = 65 : ALUT[24] = 0X0503 : AKOR[24] = 76 MOVLW 4 MOVLB 1 MOVWF PLUT#24 CLRF PLUT#24H MOVLW 65 MOVLB 2 MOVWF PKOR#24 MOVLW 3 MOVWF ALUT#24 MOVLW 5 MOVWF ALUT#24H MOVLW 76 MOVLB 3 MOVWF AKOR#24 F1_001568 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[25] = 0X0104 : PKOR[25] = 76 : ALUT[25] = 0X0603 : AKOR[25] = 76 MOVLW 4 MOVLB 1 MOVWF PLUT#25 MOVLW 1 MOVWF PLUT#25H MOVLW 76 MOVLB 2 MOVWF PKOR#25 MOVLW 3 MOVWF ALUT#25 MOVLW 6 MOVWF ALUT#25H MOVLW 76 MOVLB 3 MOVWF AKOR#25 F1_001569 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[26] = 0X0204 : PKOR[26] = 78 : ALUT[26] = 0X0703 : AKOR[26] = 74 MOVLW 4 MOVLB 1 MOVWF PLUT#26 MOVLW 2 MOVWF PLUT#26H MOVLW 78 MOVLB 2 MOVWF PKOR#26 MOVLW 3 MOVWF ALUT#26 MOVLW 7 MOVWF ALUT#26H MOVLW 74 MOVLB 3 MOVWF AKOR#26 F1_001570 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[27] = 0X0304 : PKOR[27] = 75 : ALUT[27] = 0 : AKOR[27] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#27 MOVLW 3 MOVWF PLUT#27H MOVLW 75 MOVLB 2 MOVWF PKOR#27 CLRF ALUT#27 CLRF ALUT#27H MOVLW 64 MOVLB 3 MOVWF AKOR#27 F1_001571 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[28] = 0X0404 : PKOR[28] = 83 : ALUT[28] = 0 : AKOR[28] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#28 MOVWF PLUT#28H MOVLW 83 MOVLB 2 MOVWF PKOR#28 CLRF ALUT#28 CLRF ALUT#28H MOVLW 64 MOVLB 3 MOVWF AKOR#28 F1_001572 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[29] = 0X0504 : PKOR[29] = 85 : ALUT[29] = 0 : AKOR[29] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#29 MOVLW 5 MOVWF PLUT#29H MOVLW 85 MOVLB 2 MOVWF PKOR#29 CLRF ALUT#29 CLRF ALUT#29H MOVLW 64 MOVLB 3 MOVWF AKOR#29 F1_001573 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[30] = 0X0604 : PKOR[30] = 88 : ALUT[30] = 0 : AKOR[30] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#30 MOVLW 6 MOVWF PLUT#30H MOVLW 88 MOVLB 2 MOVWF PKOR#30 CLRF ALUT#30 CLRF ALUT#30H MOVLW 64 MOVLB 3 MOVWF AKOR#30 F1_001574 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[31] = 0X0704 : PKOR[31] = 86 : ALUT[31] = 0 : AKOR[31] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#31 MOVLW 7 MOVWF PLUT#31H MOVLW 86 MOVLB 2 MOVWF PKOR#31 CLRF ALUT#31 CLRF ALUT#31H MOVLW 64 MOVLB 3 MOVWF AKOR#31 F1_001575 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[32] = 0X0804 : PKOR[32] = 92 : ALUT[32] = 0 : AKOR[32] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#32 MOVLW 8 MOVWF PLUT#32H MOVLW 92 MOVLB 2 MOVWF PKOR#32 CLRF ALUT#32 CLRF ALUT#32H MOVLW 64 MOVLB 3 MOVWF AKOR#32 F1_001576 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[33] = 0X0904 : PKOR[33] = 93 : ALUT[33] = 0 : AKOR[33] = 64 MOVLW 4 MOVLB 1 MOVWF PLUT#33 MOVLW 9 MOVWF PLUT#33H MOVLW 93 MOVLB 2 MOVWF PKOR#33 CLRF ALUT#33 CLRF ALUT#33H MOVLW 64 MOVLB 3 MOVWF AKOR#33 F1_001577 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[34] = 0X0007 : PKOR[34] = 85 : ALUT[34] = 0 : AKOR[34] = 64 MOVLW 7 MOVLB 1 MOVWF PLUT#34 CLRF PLUT#34H MOVLW 85 MOVLB 2 MOVWF PKOR#34 CLRF ALUT#34 CLRF ALUT#34H MOVLW 64 MOVLB 3 MOVWF AKOR#34 F1_001578 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[35] = 0X0A04 : PKOR[35] = 44 : ALUT[35] = 0X0605 : AKOR[35] = 45 MOVLW 4 MOVLB 1 MOVWF PLUT#35 MOVLW 10 MOVWF PLUT#35H MOVLW 44 MOVLB 2 MOVWF PKOR#35 MOVLW 5 MOVWF ALUT#35 MOVLW 6 MOVWF ALUT#35H MOVLW 45 MOVLB 3 MOVWF AKOR#35 F1_001579 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[36] = 0X0B04 : PKOR[36] = 59 : ALUT[36] = 0 : AKOR[36] = 59 MOVLW 4 MOVLB 1 MOVWF PLUT#36 MOVLW 11 MOVWF PLUT#36H MOVLW 59 MOVLB 2 MOVWF PKOR#36 CLRF ALUT#36 CLRF ALUT#36H MOVLB 3 MOVWF AKOR#36 F1_001580 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[37] = 0X0506 : PKOR[37] = 65 : ALUT[37] = 0X0008 : AKOR[37] = 63 MOVLW 6 MOVLB 1 MOVWF PLUT#37 MOVLW 5 MOVWF PLUT#37H MOVLW 65 MOVLB 2 MOVWF PKOR#37 MOVLW 8 MOVWF ALUT#37 CLRF ALUT#37H MOVLW 63 MOVLB 3 MOVWF AKOR#37 F1_001581 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[38] = 0X0905 : PKOR[38] = 66 : ALUT[38] = 0X0606 : AKOR[38] = 70 MOVLW 5 MOVLB 1 MOVWF PLUT#38 MOVLW 9 MOVWF PLUT#38H MOVLW 66 MOVLB 2 MOVWF PKOR#38 MOVLW 6 MOVWF ALUT#38 MOVWF ALUT#38H MOVLW 70 MOVLB 3 MOVWF AKOR#38 F1_001582 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[39] = 0X0A05 : PKOR[39] = 69 : ALUT[39] = 0X0009 : AKOR[39] = 78 MOVLW 5 MOVLB 1 MOVWF PLUT#39 MOVLW 10 MOVWF PLUT#39H MOVLW 69 MOVLB 2 MOVWF PKOR#39 MOVLW 9 MOVWF ALUT#39 CLRF ALUT#39H MOVLW 78 MOVLB 3 MOVWF AKOR#39 F1_001583 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[40] = 0X0507 : PKOR[40] = 67 : ALUT[40] = 0X0906 : AKOR[40] = 64 MOVLW 7 MOVLB 1 MOVWF PLUT#40 MOVLW 5 MOVWF PLUT#40H MOVLW 67 MOVLB 2 MOVWF PKOR#40 MOVLW 6 MOVWF ALUT#40 MOVLW 9 MOVWF ALUT#40H MOVLW 64 MOVLB 3 MOVWF AKOR#40 F1_001584 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[41] = 0X0508 : PKOR[41] = 64 : ALUT[41] = 0X0A06 : AKOR[41] = 64 MOVLW 8 MOVLB 1 MOVWF PLUT#41 MOVLW 5 MOVWF PLUT#41H MOVLW 64 MOVLB 2 MOVWF PKOR#41 MOVLW 6 MOVWF ALUT#41 MOVLW 10 MOVWF ALUT#41H MOVLW 64 MOVLB 3 MOVWF AKOR#41 F1_001585 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[42] = 0X0608 : PKOR[42] = 64 : ALUT[42] = 0X0B06 : AKOR[42] = 64 MOVLW 8 MOVLB 1 MOVWF PLUT#42 MOVLW 6 MOVWF PLUT#42H MOVLW 64 MOVLB 2 MOVWF PKOR#42 MOVLW 6 MOVWF ALUT#42 MOVLW 11 MOVWF ALUT#42H MOVLW 64 MOVLB 3 MOVWF AKOR#42 F1_001586 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[43] = 0X0708 : PKOR[43] = 64 : ALUT[43] = 0X000C : AKOR[43] = 64 MOVLW 8 MOVLB 1 MOVWF PLUT#43 MOVLW 7 MOVWF PLUT#43H MOVLW 64 MOVLB 2 MOVWF PKOR#43 MOVLW 12 MOVWF ALUT#43 CLRF ALUT#43H MOVLW 64 MOVLB 3 MOVWF AKOR#43 F1_001587 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[44] = 0X0409 : PKOR[44] = 64 : ALUT[44] = 0X010C : AKOR[44] = 64 MOVLW 9 MOVLB 1 MOVWF PLUT#44 MOVLW 4 MOVWF PLUT#44H MOVLW 64 MOVLB 2 MOVWF PKOR#44 MOVLW 12 MOVWF ALUT#44 MOVLW 1 MOVWF ALUT#44H MOVLW 64 MOVLB 3 MOVWF AKOR#44 F1_001588 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[45] = 0X0708 : PKOR[45] = 68 : ALUT[45] = 0X030A : AKOR[45] = 60 MOVLW 8 MOVLB 1 MOVWF PLUT#45 MOVLW 7 MOVWF PLUT#45H MOVLW 68 MOVLB 2 MOVWF PKOR#45 MOVLW 10 MOVWF ALUT#45 MOVLW 3 MOVWF ALUT#45H MOVLW 60 MOVLB 3 MOVWF AKOR#45 F1_001589 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[46] = 0X0A07 : PKOR[46] = 65 : ALUT[46] = 0X030C : AKOR[46] = 64 MOVLW 7 MOVLB 1 MOVWF PLUT#46 MOVLW 10 MOVWF PLUT#46H MOVLW 65 MOVLB 2 MOVWF PKOR#46 MOVLW 12 MOVWF ALUT#46 MOVLW 3 MOVWF ALUT#46H MOVLW 64 MOVLB 3 MOVWF AKOR#46 F1_001590 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[47] = 0X000D : PKOR[47] = 60 : ALUT[47] = 0X030B : AKOR[47] = 63 MOVLW 13 MOVLB 1 MOVWF PLUT#47 CLRF PLUT#47H MOVLW 60 MOVLB 2 MOVWF PKOR#47 MOVLW 11 MOVWF ALUT#47 MOVLW 3 MOVWF ALUT#47H MOVLW 63 MOVLB 3 MOVWF AKOR#47 F1_001591 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[48] = 0X0010 : PKOR[48] = 64 : ALUT[48] = 0X050C : AKOR[48] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#48 CLRF PLUT#48H MOVLW 64 MOVLB 2 MOVWF PKOR#48 MOVLW 12 MOVWF ALUT#48 MOVLW 5 MOVWF ALUT#48H MOVLW 64 MOVLB 3 MOVWF AKOR#48 F1_001592 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[49] = 0X0809 : PKOR[49] = 63 : ALUT[49] = 0X030C : AKOR[49] = 60 MOVLW 9 MOVLB 1 MOVWF PLUT#49 MOVLW 8 MOVWF PLUT#49H MOVLW 63 MOVLB 2 MOVWF PKOR#49 MOVLW 12 MOVWF ALUT#49 MOVLW 3 MOVWF ALUT#49H MOVLW 60 MOVLB 3 MOVWF AKOR#49 F1_001593 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[50] = 0X0710 : PKOR[50] = 64 : ALUT[50] = 0X070C : AKOR[50] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#50 MOVLW 7 MOVWF PLUT#50H MOVLW 64 MOVLB 2 MOVWF PKOR#50 MOVLW 12 MOVWF ALUT#50 MOVLW 7 MOVWF ALUT#50H MOVLW 64 MOVLB 3 MOVWF AKOR#50 F1_001594 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[51] = 0X0310 : PKOR[51] = 64 : ALUT[51] = 0X080C : AKOR[51] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#51 MOVLW 3 MOVWF PLUT#51H MOVLW 64 MOVLB 2 MOVWF PKOR#51 MOVLW 12 MOVWF ALUT#51 MOVLW 8 MOVWF ALUT#51H MOVLW 64 MOVLB 3 MOVWF AKOR#51 F1_001595 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[52] = 0X0410 : PKOR[52] = 64 : ALUT[52] = 0X090C : AKOR[52] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#52 MOVLW 4 MOVWF PLUT#52H MOVLW 64 MOVLB 2 MOVWF PKOR#52 MOVLW 12 MOVWF ALUT#52 MOVLW 9 MOVWF ALUT#52H MOVLW 64 MOVLB 3 MOVWF AKOR#52 F1_001596 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[53] = 0X0011 : PKOR[53] = 63 : ALUT[53] = 0X060C : AKOR[53] = 64 MOVLW 17 MOVLB 1 MOVWF PLUT#53 CLRF PLUT#53H MOVLW 63 MOVLB 2 MOVWF PKOR#53 MOVLW 12 MOVWF ALUT#53 MOVLW 6 MOVWF ALUT#53H MOVLW 64 MOVLB 3 MOVWF AKOR#53 F1_001597 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[54] = 0X040E : PKOR[54] = 61 : ALUT[54] = 0X030F : AKOR[54] = 70 MOVLW 14 MOVLB 1 MOVWF PLUT#54 MOVLW 4 MOVWF PLUT#54H MOVLW 61 MOVLB 2 MOVWF PKOR#54 MOVLW 15 MOVWF ALUT#54 MOVLW 3 MOVWF ALUT#54H MOVLW 70 MOVLB 3 MOVWF AKOR#54 F1_001598 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[55] = 0X060D : PKOR[55] = 61 : ALUT[55] = 0X0018 : AKOR[55] = 64 MOVLW 13 MOVLB 1 MOVWF PLUT#55 MOVLW 6 MOVWF PLUT#55H MOVLW 61 MOVLB 2 MOVWF PKOR#55 MOVLW 24 MOVWF ALUT#55 CLRF ALUT#55H MOVLW 64 MOVLB 3 MOVWF AKOR#55 F1_001599 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[56] = 0X0810 : PKOR[56] = 64 : ALUT[56] = 0X0118 : AKOR[56] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#56 MOVLW 8 MOVWF PLUT#56H MOVLW 64 MOVLB 2 MOVWF PKOR#56 MOVLW 24 MOVWF ALUT#56 MOVLW 1 MOVWF ALUT#56H MOVLW 64 MOVLB 3 MOVWF AKOR#56 F1_001600 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[57] = 0X050F : PKOR[57] = 68 : ALUT[57] = 0X0014 : AKOR[57] = 64 MOVLW 15 MOVLB 1 MOVWF PLUT#57 MOVLW 5 MOVWF PLUT#57H MOVLW 68 MOVLB 2 MOVWF PKOR#57 MOVLW 20 MOVWF ALUT#57 CLRF ALUT#57H MOVLW 64 MOVLB 3 MOVWF AKOR#57 F1_001601 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[58] = 0X0A10 : PKOR[58] = 64 : ALUT[58] = 0X0318 : AKOR[58] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#58 MOVLW 10 MOVWF PLUT#58H MOVLW 64 MOVLB 2 MOVWF PKOR#58 MOVLW 24 MOVWF ALUT#58 MOVLW 3 MOVWF ALUT#58H MOVLW 64 MOVLB 3 MOVWF AKOR#58 F1_001602 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[59] = 0X0B10 : PKOR[59] = 64 : ALUT[59] = 0X0418 : AKOR[59] = 64 MOVLW 16 MOVLB 1 MOVWF PLUT#59 MOVLW 11 MOVWF PLUT#59H MOVLW 64 MOVLB 2 MOVWF PKOR#59 MOVLW 24 MOVWF ALUT#59 MOVLW 4 MOVWF ALUT#59H MOVLW 64 MOVLB 3 MOVWF AKOR#59 F1_001603 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[60] = 0X070F : PKOR[60] = 60 : ALUT[60] = 0X0313 : AKOR[60] = 67 MOVLW 15 MOVLB 1 MOVWF PLUT#60 MOVLW 7 MOVWF PLUT#60H MOVLW 60 MOVLB 2 MOVWF PKOR#60 MOVLW 19 MOVWF ALUT#60 MOVLW 3 MOVWF ALUT#60H MOVLW 67 MOVLB 3 MOVWF AKOR#60 F1_001604 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[61] = 0X0116 : PKOR[61] = 64 : ALUT[61] = 0X0618 : AKOR[61] = 64 MOVLW 22 MOVLB 1 MOVWF PLUT#61 MOVLW 1 MOVWF PLUT#61H MOVLW 64 MOVLB 2 MOVWF PKOR#61 MOVLW 24 MOVWF ALUT#61 MOVLW 6 MOVWF ALUT#61H MOVLW 64 MOVLB 3 MOVWF AKOR#61 F1_001605 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[62] = 0X0117 : PKOR[62] = 73 : ALUT[62] = 0X0718 : AKOR[62] = 64 MOVLW 23 MOVLB 1 MOVWF PLUT#62 MOVLW 1 MOVWF PLUT#62H MOVLW 73 MOVLB 2 MOVWF PKOR#62 MOVLW 24 MOVWF ALUT#62 MOVLW 7 MOVWF ALUT#62H MOVLW 64 MOVLB 3 MOVWF AKOR#62 F1_001606 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[63] = 0X0418 : PKOR[63] = 68 : ALUT[63] = 0X0818 : AKOR[63] = 64 MOVLW 24 MOVLB 1 MOVWF PLUT#63 MOVLW 4 MOVWF PLUT#63H MOVLW 68 MOVLB 2 MOVWF PKOR#63 MOVLW 24 MOVWF ALUT#63 MOVLW 8 MOVWF ALUT#63H MOVLW 64 MOVLB 3 MOVWF AKOR#63 F1_001607 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[64] = 0X0316 : PKOR[64] = 64 : ALUT[64] = 0X0018 : AKOR[64] = 60 MOVLW 22 MOVLB 1 MOVWF PLUT#64 MOVLW 3 MOVWF PLUT#64H MOVLW 64 MOVLB 2 MOVWF PKOR#64 MOVLW 24 MOVWF ALUT#64 CLRF ALUT#64H MOVLW 60 MOVLB 3 MOVWF AKOR#64 F1_001608 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[65] = 0X001B : PKOR[65] = 62 : ALUT[65] = 0X0910 : AKOR[65] = 63 MOVLW 27 MOVLB 1 MOVWF PLUT#65 CLRF PLUT#65H MOVLW 62 MOVLB 2 MOVWF PKOR#65 MOVLW 16 MOVWF ALUT#65 MOVLW 9 MOVWF ALUT#65H MOVLW 63 MOVLB 3 MOVWF AKOR#65 F1_001609 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[66] = 0X0515 : PKOR[66] = 66 : ALUT[66] = 0X0219 : AKOR[66] = 65 MOVLW 21 MOVLB 1 MOVWF PLUT#66 MOVLW 5 MOVWF PLUT#66H MOVLW 66 MOVLB 2 MOVWF PKOR#66 MOVLW 25 MOVWF ALUT#66 MOVLW 2 MOVWF ALUT#66H MOVLW 65 MOVLB 3 MOVWF AKOR#66 F1_001610 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[67] = 0X0417 : PKOR[67] = 62 : ALUT[67] = 0X021A : AKOR[67] = 71 MOVLW 23 MOVLB 1 MOVWF PLUT#67 MOVLW 4 MOVWF PLUT#67H MOVLW 62 MOVLB 2 MOVWF PKOR#67 MOVLW 26 MOVWF ALUT#67 MOVLW 2 MOVWF ALUT#67H MOVLW 71 MOVLB 3 MOVWF AKOR#67 F1_001611 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[68] = 0X0813 : PKOR[68] = 65 : ALUT[68] = 0X001E : AKOR[68] = 60 MOVLW 19 MOVLB 1 MOVWF PLUT#68 MOVLW 8 MOVWF PLUT#68H MOVLW 65 MOVLB 2 MOVWF PKOR#68 MOVLW 30 MOVWF ALUT#68 CLRF ALUT#68H MOVLW 60 MOVLB 3 MOVWF AKOR#68 F1_001612 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[69] = 0X0616 : PKOR[69] = 63 : ALUT[69] = 0X0230 : AKOR[69] = 64 MOVLW 22 MOVLB 1 MOVWF PLUT#69 MOVLW 6 MOVWF PLUT#69H MOVLW 63 MOVLB 2 MOVWF PKOR#69 MOVLW 48 MOVWF ALUT#69 MOVLW 2 MOVWF ALUT#69H MOVLW 64 MOVLB 3 MOVWF AKOR#69 F1_001613 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[70] = 0X0A20 : PKOR[70] = 64 : ALUT[70] = 0X0330 : AKOR[70] = 64 MOVLW 32 MOVLB 1 MOVWF PLUT#70 MOVLW 10 MOVWF PLUT#70H MOVLW 64 MOVLB 2 MOVWF PKOR#70 MOVLW 48 MOVWF ALUT#70 MOVLW 3 MOVWF ALUT#70H MOVLW 64 MOVLB 3 MOVWF AKOR#70 F1_001614 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[71] = 0X0815 : PKOR[71] = 62 : ALUT[71] = 0X0519 : AKOR[71] = 67 MOVLW 21 MOVLB 1 MOVWF PLUT#71 MOVLW 8 MOVWF PLUT#71H MOVLW 62 MOVLB 2 MOVWF PKOR#71 MOVLW 25 MOVWF ALUT#71 MOVLW 5 MOVWF ALUT#71H MOVLW 67 MOVLB 3 MOVWF AKOR#71 F1_001615 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[72] = 0X0040 : PKOR[72] = 64 : ALUT[72] = 0X0530 : AKOR[72] = 64 MOVLW 64 MOVLB 1 MOVWF PLUT#72 CLRF PLUT#72H MOVLB 2 MOVWF PKOR#72 MOVLW 48 MOVWF ALUT#72 MOVLW 5 MOVWF ALUT#72H MOVLW 64 MOVLB 3 MOVWF AKOR#72 F1_001616 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[73] = 0X031E : PKOR[73] = 61 : ALUT[73] = 0X0630 : AKOR[73] = 64 MOVLW 30 MOVLB 1 MOVWF PLUT#73 MOVLW 3 MOVWF PLUT#73H MOVLW 61 MOVLB 2 MOVWF PKOR#73 MOVLW 48 MOVWF ALUT#73 MOVLW 6 MOVWF ALUT#73H MOVLW 64 MOVLB 3 MOVWF AKOR#73 F1_001617 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[74] = 0X0916 : PKOR[74] = 74 : ALUT[74] = 0X061A : AKOR[74] = 60 MOVLW 22 MOVLB 1 MOVWF PLUT#74 MOVLW 9 MOVWF PLUT#74H MOVLW 74 MOVLB 2 MOVWF PKOR#74 MOVLW 26 MOVWF ALUT#74 MOVLW 6 MOVWF ALUT#74H MOVLW 60 MOVLB 3 MOVWF AKOR#74 F1_001618 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[75] = 0X0818 : PKOR[75] = 64 : ALUT[75] = 0X061B : AKOR[75] = 65 MOVLW 24 MOVLB 1 MOVWF PLUT#75 MOVLW 8 MOVWF PLUT#75H MOVLW 64 MOVLB 2 MOVWF PKOR#75 MOVLW 27 MOVWF ALUT#75 MOVLW 6 MOVWF ALUT#75H MOVLW 65 MOVLB 3 MOVWF AKOR#75 F1_001619 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[76] = 0X0440 : PKOR[76] = 64 : ALUT[76] = 0X061C : AKOR[76] = 72 MOVLW 64 MOVLB 1 MOVWF PLUT#76 MOVLW 4 MOVWF PLUT#76H MOVLW 64 MOVLB 2 MOVWF PKOR#76 MOVLW 28 MOVWF ALUT#76 MOVLW 6 MOVWF ALUT#76H MOVLW 72 MOVLB 3 MOVWF AKOR#76 F1_001620 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[77] = 0X0540 : PKOR[77] = 64 : ALUT[77] = 0X0A30 : AKOR[77] = 64 MOVLW 64 MOVLB 1 MOVWF PLUT#77 MOVLW 5 MOVWF PLUT#77H MOVLW 64 MOVLB 2 MOVWF PKOR#77 MOVLW 48 MOVWF ALUT#77 MOVLW 10 MOVWF ALUT#77H MOVLW 64 MOVLB 3 MOVWF AKOR#77 F1_001621 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[78] = 0X0919 : PKOR[78] = 69 : ALUT[78] = 0X0B30 : AKOR[78] = 64 MOVLW 25 MOVLB 1 MOVWF PLUT#78 MOVLW 9 MOVWF PLUT#78H MOVLW 69 MOVLB 2 MOVWF PKOR#78 MOVLW 48 MOVWF ALUT#78 MOVLW 11 MOVWF ALUT#78H MOVLW 64 MOVLB 3 MOVWF AKOR#78 F1_001622 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[79] = 0X0B17 : PKOR[79] = 66 : ALUT[79] = 0X1030 : AKOR[79] = 64 MOVLW 23 MOVLB 1 MOVWF PLUT#79 MOVLW 11 MOVWF PLUT#79H MOVLW 66 MOVLB 2 MOVWF PKOR#79 MOVLW 48 MOVWF ALUT#79 MOVLW 16 MOVWF ALUT#79H MOVLW 64 MOVLB 3 MOVWF AKOR#79 F1_001623 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[80] = 0X071E : PKOR[80] = 64 : ALUT[80] = 0X1130 : AKOR[80] = 64 MOVLW 30 MOVLB 1 MOVWF PLUT#80 MOVLW 7 MOVWF PLUT#80H MOVLW 64 MOVLB 2 MOVWF PKOR#80 MOVLW 48 MOVWF ALUT#80 MOVLW 17 MOVWF ALUT#80H MOVLW 64 MOVLB 3 MOVWF AKOR#80 F1_001624 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[81] = 0X0A1C : PKOR[81] = 66 : ALUT[81] = 0X071F : AKOR[81] = 65 MOVLW 28 MOVLB 1 MOVWF PLUT#81 MOVLW 10 MOVWF PLUT#81H MOVLW 66 MOVLB 2 MOVWF PKOR#81 MOVLW 31 MOVWF ALUT#81 MOVLW 7 MOVWF ALUT#81H MOVLW 65 MOVLB 3 MOVWF AKOR#81 F1_001625 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[82] = 0X081E : PKOR[82] = 64 : ALUT[82] = 0X0720 : AKOR[82] = 65 MOVLW 30 MOVLB 1 MOVWF PLUT#82 MOVLW 8 MOVWF PLUT#82H MOVLW 64 MOVLB 2 MOVWF PKOR#82 MOVLW 32 MOVWF ALUT#82 MOVLW 7 MOVWF ALUT#82H MOVLW 65 MOVLB 3 MOVWF AKOR#82 F1_001626 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[83] = 0X0B40 : PKOR[83] = 59 : ALUT[83] = 0X1430 : AKOR[83] = 64 MOVLW 64 MOVLB 1 MOVWF PLUT#83 MOVLW 11 MOVWF PLUT#83H MOVLW 59 MOVLB 3 MOVWF PKOR#83 MOVLW 48 MOVLB 2 MOVWF ALUT#83 MOVLW 20 MOVWF ALUT#83H MOVLW 64 MOVLB 3 MOVWF AKOR#83 F1_001628 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[84] = 0X0B4D : PKOR[84] = 71 : ALUT[84] = 0X1530 : AKOR[84] = 64 MOVLW 77 MOVLB 1 MOVWF PLUT#84 MOVLW 11 MOVWF PLUT#84H MOVLW 71 MOVLB 3 MOVWF PKOR#84 MOVLW 48 MOVLB 2 MOVWF ALUT#84 MOVLW 21 MOVWF ALUT#84H MOVLW 64 MOVLB 3 MOVWF AKOR#84 F1_001629 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[85] = 0X1140 : PKOR[85] = 64 : ALUT[85] = 0X1630 : AKOR[85] = 64 MOVLB 1 MOVWF PLUT#85 MOVLW 17 MOVWF PLUT#85H MOVLW 64 MOVLB 3 MOVWF PKOR#85 MOVLW 48 MOVLB 2 MOVWF ALUT#85 MOVLW 22 MOVWF ALUT#85H MOVLW 64 MOVLB 3 MOVWF AKOR#85 F1_001630 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[86] = 0X0920 : PKOR[86] = 59 : ALUT[86] = 0X1730 : AKOR[86] = 64 MOVLW 32 MOVLB 1 MOVWF PLUT#86 MOVLW 9 MOVWF PLUT#86H MOVLW 59 MOVLB 3 MOVWF PKOR#86 MOVLW 48 MOVLB 2 MOVWF ALUT#86 MOVLW 23 MOVWF ALUT#86H MOVLW 64 MOVLB 3 MOVWF AKOR#86 F1_001631 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[87] = 0X1340 : PKOR[87] = 64 : ALUT[87] = 0X1830 : AKOR[87] = 64 MOVLB 1 MOVWF PLUT#87 MOVLW 19 MOVWF PLUT#87H MOVLW 64 MOVLB 3 MOVWF PKOR#87 MOVLW 48 MOVLB 2 MOVWF ALUT#87 MOVLW 24 MOVWF ALUT#87H MOVLW 64 MOVLB 3 MOVWF AKOR#87 F1_001632 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[88] = 0X1440 : PKOR[88] = 64 : ALUT[88] = 0X1930 : AKOR[88] = 64 MOVLB 1 MOVWF PLUT#88 MOVLW 20 MOVWF PLUT#88H MOVLW 64 MOVLB 3 MOVWF PKOR#88 MOVLW 48 MOVLB 2 MOVWF ALUT#88 MOVLW 25 MOVWF ALUT#88H MOVLW 64 MOVLB 3 MOVWF AKOR#88 F1_001633 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[89] = 0X1540 : PKOR[89] = 64 : ALUT[89] = 0X1A30 : AKOR[89] = 64 MOVLB 1 MOVWF PLUT#89 MOVLW 21 MOVWF PLUT#89H MOVLW 64 MOVLB 3 MOVWF PKOR#89 MOVLW 48 MOVLB 2 MOVWF ALUT#89 MOVLW 26 MOVWF ALUT#89H MOVLW 64 MOVLB 3 MOVWF AKOR#89 F1_001634 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[90] = 0X1640 : PKOR[90] = 64 : ALUT[90] = 0X1B30 : AKOR[90] = 64 MOVLB 1 MOVWF PLUT#90 MOVLW 22 MOVWF PLUT#90H MOVLW 64 MOVLB 3 MOVWF PKOR#90 MOVLW 48 MOVLB 2 MOVWF ALUT#90 MOVLW 27 MOVWF ALUT#90H MOVLW 64 MOVLB 3 MOVWF AKOR#90 F1_001635 EQU $ ; IN [AEIO_MASTER.BAS] PLUT[91] = 0X1740 : PKOR[91] = 64 : ALUT[91] = 0X2030 : AKOR[91] = 64 MOVLB 1 MOVWF PLUT#91 MOVLW 23 MOVWF PLUT#91H MOVLW 64 MOVLB 3 MOVWF PKOR#91 MOVLW 48 MOVLB 2 MOVWF ALUT#91 MOVLW 32 MOVWF ALUT#91H MOVLW 64 MOVLB 3 MOVWF AKOR#91 F1_001636 EQU $ ; IN [AEIO_MASTER.BAS] RETURN MOVLB 0 RETURN 0 F1_EOF EQU $ ; AEIO_MASTER.BAS PB@LB216 BRA PB@LB216 __EOF CONFIG DEBUG = OFF CONFIG XINST = OFF CONFIG STVREN = OFF CONFIG WDTEN = OFF CONFIG FCMEN = ON CONFIG FOSC = HSPLL CONFIG IESO = OFF CONFIG WDTPS = 128 CONFIG BOREN = SBORDIS CONFIG BORV = 27 CONFIG MCLRE = ON CONFIG HFOFST = ON CONFIG LPT1OSC = ON CONFIG PBADEN = OFF CONFIG CCP2MX = PORTC CONFIG LVP = OFF CONFIG CP0 = OFF CONFIG CP1 = OFF CONFIG CPB = OFF CONFIG CPD = OFF CONFIG WRT0 = OFF CONFIG WRT1 = OFF CONFIG WRTB = OFF CONFIG WRTC = OFF CONFIG WRTD = OFF CONFIG EBTR0 = OFF CONFIG EBTR1 = OFF CONFIG EBTRB = OFF END