base:3d_dot_scroll
no way to compare when less than two revisions
Differences
This shows you the differences between two versions of the page.
— | base:3d_dot_scroll [2015-04-17 04:30] (current) – created - external edit 127.0.0.1 | ||
---|---|---|---|
Line 1: | Line 1: | ||
+ | {{: | ||
+ | |||
+ | |||
+ | Executable prg file {{: | ||
+ | |||
+ | < | ||
+ | ;USED ASSEMBLER 64tass v1.45 | ||
+ | |||
+ | ;THIS IS THE EXAMPLE CODE OF 3D DOT SCROLL ON THE C64 | ||
+ | ;NO IRQ, WITHOUT MSX, NO DOUBBLE BUFFERING THIS IS ONLY SAMPLE | ||
+ | ;I VERY LIKE THIS ART ON THIS COMPUTER | ||
+ | ;THE RULE IS SIMPLE - ON THE 3D TRAJECTORY DATA OF CHARSET ARE WRITTING | ||
+ | ;THE TRAJECTORY WAS PREPARED IN MY PROGRAM CREATED IN DELPHI | ||
+ | |||
+ | ; | ||
+ | ;= C64 3D DOT SCROLL | ||
+ | ;= BY WEGI /BS/SMR/FTM = | ||
+ | ; | ||
+ | |||
+ | *= $0801 | ||
+ | |||
+ | ;BASIC LINE START | ||
+ | .BYTE $0B, | ||
+ | .BYTE $30, | ||
+ | |||
+ | ;-------- | ||
+ | COUNTLINES = 8 ;8 LINES IN CHAR | ||
+ | COUNTCHAR = 16 ;16 CHARS TO SHIFT | ||
+ | LENLOOP = $62 ;LENGTH LOOP FOR SPEEDCODE ITERATION | ||
+ | |||
+ | |||
+ | STOREPLOT = $04 ;4 VECTOR FOR STORE MISC DATA | ||
+ | VECTR1 | ||
+ | VECTR2 | ||
+ | VECTR3 | ||
+ | |||
+ | SCREEN | ||
+ | SPEEDCODE = $4000 ;UNROLED CODE ADDRES FOR DISPLAY DATA | ||
+ | SPEEDCLEAR = SPEEDCODE + ( COUNTCHAR * LENLOOP * COUNTLINES)+1 | ||
+ | ;SPEED CLEAR ALL 1024 PLOT | ||
+ | |||
+ | CHAR1 = $20 ;CHAR TO SHIFT (ON ZP) | ||
+ | CHAR2 = CHAR1 + COUNTCHAR | ||
+ | CHAR3 = CHAR2 + COUNTCHAR | ||
+ | CHAR4 = CHAR3 + COUNTCHAR | ||
+ | CHAR5 = CHAR4 + COUNTCHAR | ||
+ | CHAR6 = CHAR5 + COUNTCHAR | ||
+ | CHAR7 = CHAR6 + COUNTCHAR | ||
+ | CHAR8 = CHAR7 + COUNTCHAR | ||
+ | CSET2 = CHAR8 + COUNTCHAR | ||
+ | |||
+ | ;--- | ||
+ | START | ||
+ | SEI | ||
+ | CLD | ||
+ | LDX #$FB | ||
+ | TXS | ||
+ | LDA #$37 | ||
+ | STA $01 | ||
+ | JSR $FDA3 | ||
+ | JSR $FD15 | ||
+ | JSR $E3BF | ||
+ | JSR $FF5B | ||
+ | SEI | ||
+ | LDA #<DRAW | ||
+ | STA $0318 | ||
+ | STA $FFFA | ||
+ | STA $FFFE | ||
+ | LDA #>DRAW | ||
+ | STA $0319 | ||
+ | STA $FFFB | ||
+ | STA $FFFF | ||
+ | JSR INITGRAPH ;ENABLE HIRES ETC. | ||
+ | JSR FILLCHAR | ||
+ | JSR SETTBADR | ||
+ | JSR MAKESPEEDCODE ;MAKE LONG AND BORNING CODE FOR DOTSCROLL | ||
+ | ;AND SETTING PLOTS FOR WAIT LOOK | ||
+ | JSR SPEEDCODE ;NOW PLOTS WILL BE CLEAR | ||
+ | JSR CLEARCHAR ;NOW CHAR BE CLEAR | ||
+ | JSR MAKESPEEDCLEAR ;LIKE BEFORE FOR CLEAR PLOTS AND SET PLOTS | ||
+ | JSR SPEEDCLEAR ;OK NOW CLEAR PLOTS | ||
+ | |||
+ | ;========== | ||
+ | ;HERE IS IRQ NMI AND BRK FOR NEVERENDING LOOP | ||
+ | ;IN THIS SAMPLE WE DON'T WORK IN THE IRQ | ||
+ | ; | ||
+ | DRAW | ||
+ | |||
+ | SEI | ||
+ | CLD | ||
+ | LDX #$FB ;STACK INIT | ||
+ | TXS | ||
+ | LDA #$38 ;SHOW ALL 64 RAM (IN THIS SAMPLE NOT NECESSARY) | ||
+ | STA $01 | ||
+ | JSR CLEARCHAR | ||
+ | JSR SPEEDCLEAR ;CLEAR PLOTS | ||
+ | STA POSSCROLL | ||
+ | |||
+ | |||
+ | ;AFTER INIT AND MAKE SPEEDCODE HERE IS MAINLOP | ||
+ | ;AND ALL NECESSARY ROUTINES TO WORK DOT SCROLL | ||
+ | ;REALLY NOT THAT BIG ;-) | ||
+ | ;FROM $0801 TO $0A29 | ||
+ | ;OF COURSE SPEEDCODE FROM $4000 TO $7D03 STILL OVER HERE | ||
+ | |||
+ | MAINLOOP | ||
+ | JSR ROLCHAR ;SHIFT DATA FOR DOT SCROLL | ||
+ | LDA #$35 ;SHOW I/O | ||
+ | STA $01 | ||
+ | |||
+ | LDX #$C8 | ||
+ | CPX $D012 | ||
+ | BNE *-3 | ||
+ | |||
+ | INC $D020 | ||
+ | LDA #$38 ;SHOW ALL RAM | ||
+ | STA $01 | ||
+ | JSR SPEEDCLEAR ;CLEAR PLOTS ON THE BITMAP | ||
+ | JSR SPEEDCODE | ||
+ | LDA #$35 ;SHOW I/O VIC ETC. | ||
+ | STA $01 | ||
+ | DEC $D020 | ||
+ | |||
+ | LDA #$EF | ||
+ | CMP $DC01 ;SPACE? | ||
+ | BNE MAINLOOP | ||
+ | CMP $DC01 | ||
+ | BEQ *-3 | ||
+ | LDA #$38 | ||
+ | STA $01 | ||
+ | BRK ;GO TO DRAW OF COURSE | ||
+ | |||
+ | ; | ||
+ | ;CLEAR OR FILL CHAR DATA | ||
+ | ; | ||
+ | CLEARCHAR | ||
+ | LDA #$00 | ||
+ | .BYTE $2C | ||
+ | FILLCHAR | ||
+ | LDA #$FF | ||
+ | INITCHAR | ||
+ | LDX #$00 | ||
+ | |||
+ | - | ||
+ | STA CHAR1,X | ||
+ | INX | ||
+ | CPX # | ||
+ | BCC - | ||
+ | |||
+ | RTS | ||
+ | ; | ||
+ | ROLCHAR | ||
+ | ;======= | ||
+ | ;SHIFT ALL BITS FOR DOT SCROLL | ||
+ | ;DATA ON ZERO PAGE FOR SPEED | ||
+ | ;======= | ||
+ | |||
+ | ASL CSET2 | ||
+ | |||
+ | ROL CHAR1 + COUNTCHAR-1 | ||
+ | ROL CHAR1 + COUNTCHAR-2 | ||
+ | ROL CHAR1 + COUNTCHAR-3 | ||
+ | ROL CHAR1 + COUNTCHAR-4 | ||
+ | ROL CHAR1 + COUNTCHAR-5 | ||
+ | ROL CHAR1 + COUNTCHAR-6 | ||
+ | ROL CHAR1 + COUNTCHAR-7 | ||
+ | ROL CHAR1 + COUNTCHAR-8 | ||
+ | ROL CHAR1 + COUNTCHAR-9 | ||
+ | ROL CHAR1 + COUNTCHAR-10 | ||
+ | ROL CHAR1 + COUNTCHAR-11 | ||
+ | ROL CHAR1 + COUNTCHAR-12 | ||
+ | ROL CHAR1 + COUNTCHAR-13 | ||
+ | ROL CHAR1 + COUNTCHAR-14 | ||
+ | ROL CHAR1 + COUNTCHAR-15 | ||
+ | ROL CHAR1 | ||
+ | | ||
+ | ASL CSET2+1 | ||
+ | |||
+ | ROL CHAR2 + COUNTCHAR-1 | ||
+ | ROL CHAR2 + COUNTCHAR-2 | ||
+ | ROL CHAR2 + COUNTCHAR-3 | ||
+ | ROL CHAR2 + COUNTCHAR-4 | ||
+ | ROL CHAR2 + COUNTCHAR-5 | ||
+ | ROL CHAR2 + COUNTCHAR-6 | ||
+ | ROL CHAR2 + COUNTCHAR-7 | ||
+ | ROL CHAR2 + COUNTCHAR-8 | ||
+ | ROL CHAR2 + COUNTCHAR-9 | ||
+ | ROL CHAR2 + COUNTCHAR-10 | ||
+ | ROL CHAR2 + COUNTCHAR-11 | ||
+ | ROL CHAR2 + COUNTCHAR-12 | ||
+ | ROL CHAR2 + COUNTCHAR-13 | ||
+ | ROL CHAR2 + COUNTCHAR-14 | ||
+ | ROL CHAR2 + COUNTCHAR-15 | ||
+ | ROL CHAR2 | ||
+ | |||
+ | ASL CSET2+2 | ||
+ | |||
+ | ROL CHAR3 + COUNTCHAR-1 | ||
+ | ROL CHAR3 + COUNTCHAR-2 | ||
+ | ROL CHAR3 + COUNTCHAR-3 | ||
+ | ROL CHAR3 + COUNTCHAR-4 | ||
+ | ROL CHAR3 + COUNTCHAR-5 | ||
+ | ROL CHAR3 + COUNTCHAR-6 | ||
+ | ROL CHAR3 + COUNTCHAR-7 | ||
+ | ROL CHAR3 + COUNTCHAR-8 | ||
+ | ROL CHAR3 + COUNTCHAR-9 | ||
+ | ROL CHAR3 + COUNTCHAR-10 | ||
+ | ROL CHAR3 + COUNTCHAR-11 | ||
+ | ROL CHAR3 + COUNTCHAR-12 | ||
+ | ROL CHAR3 + COUNTCHAR-13 | ||
+ | ROL CHAR3 + COUNTCHAR-14 | ||
+ | ROL CHAR3 + COUNTCHAR-15 | ||
+ | ROL CHAR3 | ||
+ | |||
+ | ASL CSET2+3 | ||
+ | |||
+ | ROL CHAR4 + COUNTCHAR-1 | ||
+ | ROL CHAR4 + COUNTCHAR-2 | ||
+ | ROL CHAR4 + COUNTCHAR-3 | ||
+ | ROL CHAR4 + COUNTCHAR-4 | ||
+ | ROL CHAR4 + COUNTCHAR-5 | ||
+ | ROL CHAR4 + COUNTCHAR-6 | ||
+ | ROL CHAR4 + COUNTCHAR-7 | ||
+ | ROL CHAR4 + COUNTCHAR-8 | ||
+ | ROL CHAR4 + COUNTCHAR-9 | ||
+ | ROL CHAR4 + COUNTCHAR-10 | ||
+ | ROL CHAR4 + COUNTCHAR-11 | ||
+ | ROL CHAR4 + COUNTCHAR-12 | ||
+ | ROL CHAR4 + COUNTCHAR-13 | ||
+ | ROL CHAR4 + COUNTCHAR-14 | ||
+ | ROL CHAR4 + COUNTCHAR-15 | ||
+ | ROL CHAR4 | ||
+ | |||
+ | ASL CSET2+4 | ||
+ | |||
+ | ROL CHAR5 + COUNTCHAR-1 | ||
+ | ROL CHAR5 + COUNTCHAR-2 | ||
+ | ROL CHAR5 + COUNTCHAR-3 | ||
+ | ROL CHAR5 + COUNTCHAR-4 | ||
+ | ROL CHAR5 + COUNTCHAR-5 | ||
+ | ROL CHAR5 + COUNTCHAR-6 | ||
+ | ROL CHAR5 + COUNTCHAR-7 | ||
+ | ROL CHAR5 + COUNTCHAR-8 | ||
+ | ROL CHAR5 + COUNTCHAR-9 | ||
+ | ROL CHAR5 + COUNTCHAR-10 | ||
+ | ROL CHAR5 + COUNTCHAR-11 | ||
+ | ROL CHAR5 + COUNTCHAR-12 | ||
+ | ROL CHAR5 + COUNTCHAR-13 | ||
+ | ROL CHAR5 + COUNTCHAR-14 | ||
+ | ROL CHAR5 + COUNTCHAR-15 | ||
+ | ROL CHAR5 | ||
+ | |||
+ | ASL CSET2+5 | ||
+ | |||
+ | ROL CHAR6 + COUNTCHAR-1 | ||
+ | ROL CHAR6 + COUNTCHAR-2 | ||
+ | ROL CHAR6 + COUNTCHAR-3 | ||
+ | ROL CHAR6 + COUNTCHAR-4 | ||
+ | ROL CHAR6 + COUNTCHAR-5 | ||
+ | ROL CHAR6 + COUNTCHAR-6 | ||
+ | ROL CHAR6 + COUNTCHAR-7 | ||
+ | ROL CHAR6 + COUNTCHAR-8 | ||
+ | ROL CHAR6 + COUNTCHAR-9 | ||
+ | ROL CHAR6 + COUNTCHAR-10 | ||
+ | ROL CHAR6 + COUNTCHAR-11 | ||
+ | ROL CHAR6 + COUNTCHAR-12 | ||
+ | ROL CHAR6 + COUNTCHAR-13 | ||
+ | ROL CHAR6 + COUNTCHAR-14 | ||
+ | ROL CHAR6 + COUNTCHAR-15 | ||
+ | ROL CHAR6 | ||
+ | |||
+ | ASL CSET2+6 | ||
+ | |||
+ | ROL CHAR7 + COUNTCHAR-1 | ||
+ | ROL CHAR7 + COUNTCHAR-2 | ||
+ | ROL CHAR7 + COUNTCHAR-3 | ||
+ | ROL CHAR7 + COUNTCHAR-4 | ||
+ | ROL CHAR7 + COUNTCHAR-5 | ||
+ | ROL CHAR7 + COUNTCHAR-6 | ||
+ | ROL CHAR7 + COUNTCHAR-7 | ||
+ | ROL CHAR7 + COUNTCHAR-8 | ||
+ | ROL CHAR7 + COUNTCHAR-9 | ||
+ | ROL CHAR7 + COUNTCHAR-10 | ||
+ | ROL CHAR7 + COUNTCHAR-11 | ||
+ | ROL CHAR7 + COUNTCHAR-12 | ||
+ | ROL CHAR7 + COUNTCHAR-13 | ||
+ | ROL CHAR7 + COUNTCHAR-14 | ||
+ | ROL CHAR7 + COUNTCHAR-15 | ||
+ | ROL CHAR7 | ||
+ | |||
+ | ASL CSET2+7 | ||
+ | |||
+ | ROL CHAR8 + COUNTCHAR-1 | ||
+ | ROL CHAR8 + COUNTCHAR-2 | ||
+ | ROL CHAR8 + COUNTCHAR-3 | ||
+ | ROL CHAR8 + COUNTCHAR-4 | ||
+ | ROL CHAR8 + COUNTCHAR-5 | ||
+ | ROL CHAR8 + COUNTCHAR-6 | ||
+ | ROL CHAR8 + COUNTCHAR-7 | ||
+ | ROL CHAR8 + COUNTCHAR-8 | ||
+ | ROL CHAR8 + COUNTCHAR-9 | ||
+ | ROL CHAR8 + COUNTCHAR-10 | ||
+ | ROL CHAR8 + COUNTCHAR-11 | ||
+ | ROL CHAR8 + COUNTCHAR-12 | ||
+ | ROL CHAR8 + COUNTCHAR-13 | ||
+ | ROL CHAR8 + COUNTCHAR-14 | ||
+ | ROL CHAR8 + COUNTCHAR-15 | ||
+ | ROL CHAR8 | ||
+ | |||
+ | INC CNTROL | ||
+ | LDA CNTROL | ||
+ | AND #$07 ;IF ALL CHAR WAS SHIFTED THEN SCROLL NEXT CHAR | ||
+ | BEQ MYSCROL | ||
+ | RTS | ||
+ | ; | ||
+ | MYSCROL | ||
+ | ; | ||
+ | ;SIMPLE SCROLL ROUTINE (MAX 256 CHAR!!!) | ||
+ | ; | ||
+ | LDX POSSCROLL | ||
+ | LDA TXTSCROL,X | ||
+ | BNE + | ||
+ | STA POSSCROLL | ||
+ | LDA TXTSCROL | ||
+ | + | ||
+ | AND #$3F | ||
+ | ASL | ||
+ | ASL | ||
+ | ASL ;CHAR MULTIPLY 8 FOR ADDRES IN THE CHARGEN | ||
+ | STA VECTR1 | ||
+ | LDA #$00 | ||
+ | ADC #$D0 | ||
+ | STA VECTR1+1 | ||
+ | PHP ;STATUS REGISTER SAVE | ||
+ | LDY #$07 | ||
+ | SEI | ||
+ | LDA $01 | ||
+ | PHA ;SAVE $01 | ||
+ | LDA #$33 ;HERE IS USED CHARGEN FROM C64 ROM | ||
+ | STA $01 ;YOU CAN USED SOMETHING OWN | ||
+ | - | ||
+ | LDA (VECTR1),Y | ||
+ | STA CSET2,Y | ||
+ | DEY | ||
+ | BPL - | ||
+ | | ||
+ | PLA ; | ||
+ | STA $01 | ||
+ | PLP ; | ||
+ | INC POSSCROLL | ||
+ | RTS | ||
+ | |||
+ | |||
+ | ; | ||
+ | POSSCROLL | ||
+ | CNTROL | ||
+ | TXTSCROL | ||
+ | .BYTE 0 | ||
+ | ; | ||
+ | ; | ||
+ | ;AFTER INIT ALL DATA AND PROC. BELOW CAN BE ERASE | ||
+ | ; | ||
+ | *= $1000 | ||
+ | INITGRAPH | ||
+ | ; | ||
+ | ;ENABLE HIRES, FILL COLLOR, CLEAR BITMAP | ||
+ | ; | ||
+ | |||
+ | LDA #$18 | ||
+ | STA $D018 | ||
+ | |||
+ | LDA $D011 | ||
+ | ORA #$20 | ||
+ | STA $D011 | ||
+ | |||
+ | |||
+ | LDX #$00 | ||
+ | LDA #246 | ||
+ | |||
+ | - | ||
+ | STA $0400,X | ||
+ | STA $0500,X | ||
+ | STA $0600,X | ||
+ | STA $06F8,X | ||
+ | INX | ||
+ | BNE - | ||
+ | STX POSSCROLL | ||
+ | |||
+ | LDX #>SCREEN | ||
+ | STX VECTR1+1 | ||
+ | LDY #$00 | ||
+ | STY VECTR1 | ||
+ | |||
+ | |||
+ | LDA #$00 | ||
+ | - | ||
+ | STA (VECTR1),Y | ||
+ | INY | ||
+ | BNE - | ||
+ | INC VECTR1+1 | ||
+ | DEX | ||
+ | BNE - | ||
+ | RTS | ||
+ | ; | ||
+ | ;CALCULATE TB ROW ADDRESS IN THE BITMAP | ||
+ | ; | ||
+ | SETTBADR | ||
+ | LDX #$00 | ||
+ | LDA #>SCREEN | ||
+ | STX VECTR1 | ||
+ | STA VECTR1+1 | ||
+ | - | ||
+ | LDA VECTR1 | ||
+ | STA TBADLO,X | ||
+ | LDA VECTR1+1 | ||
+ | STA TBADHI,X | ||
+ | |||
+ | LDA VECTR1 | ||
+ | CLC | ||
+ | ADC #$40 | ||
+ | STA VECTR1 | ||
+ | |||
+ | LDA VECTR1+1 | ||
+ | ADC #$01 | ||
+ | STA VECTR1+1 | ||
+ | INX | ||
+ | CPX #25 | ||
+ | BCC - | ||
+ | RTS | ||
+ | ;-------- | ||
+ | TBBIT | ||
+ | .BYTE %10000000 | ||
+ | .BYTE %01000000 | ||
+ | .BYTE %00100000 | ||
+ | .BYTE %00010000 | ||
+ | .BYTE %00001000 | ||
+ | .BYTE %00000100 | ||
+ | .BYTE %00000010 | ||
+ | .BYTE %00000001 | ||
+ | ;--- | ||
+ | TBADLO | ||
+ | .BYTE 0,0,0,0,0 | ||
+ | .BYTE 0,0,0,0,0 | ||
+ | .BYTE 0,0,0,0,0 | ||
+ | .BYTE 0,0,0,0,0 | ||
+ | .BYTE 0,0,0,0,0 | ||
+ | ;--- | ||
+ | TBADHI | ||
+ | .BYTE 0,0,0,0,0 | ||
+ | .BYTE 0,0,0,0,0 | ||
+ | .BYTE 0,0,0,0,0 | ||
+ | .BYTE 0,0,0,0,0 | ||
+ | .BYTE 0,0,0,0,0 | ||
+ | ;-------- | ||
+ | XPOSS .BYTE 0,0 | ||
+ | YPOSS .BYTE 0 | ||
+ | ;-------- | ||
+ | CALCPLOTADD | ||
+ | ; | ||
+ | ;CONVERT DATA FROM XPOSS LO HI AND YPOS (BITMAP POSS.) AND RETURN | ||
+ | ;TO ACC #<PLOT ADDRES, YREG #>PLOT ADDRES, XREG BIT POSS. | ||
+ | ; | ||
+ | LDA YPOSS | ||
+ | LSR A | ||
+ | LSR A | ||
+ | LSR A | ||
+ | TAX | ||
+ | |||
+ | LDA YPOSS | ||
+ | AND #$07 | ||
+ | TAY | ||
+ | |||
+ | LDA XPOSS | ||
+ | AND #$F8 | ||
+ | CLC | ||
+ | ADC TBADLO,X | ||
+ | STA STOREPLOT | ||
+ | |||
+ | LDA TBADHI,X | ||
+ | ADC XPOSS+1 | ||
+ | STA STOREPLOT+1 | ||
+ | |||
+ | LDA XPOSS | ||
+ | AND #$07 | ||
+ | TAX | ||
+ | |||
+ | ;SET PLOT THIS IS NOT NECESSARY ONLY FOR WAIT LOOK | ||
+ | LDA (STOREPLOT), | ||
+ | EOR TBBIT,X | ||
+ | STA (STOREPLOT), | ||
+ | ; RTS | ||
+ | ;OR THIS IS ONLY EOR PLOT PROCEDURE | ||
+ | TYA | ||
+ | CLC | ||
+ | ADC STOREPLOT | ||
+ | STA STOREPLOT | ||
+ | BCC + | ||
+ | INC STOREPLOT+1 | ||
+ | + | ||
+ | LDA TBBIT,X | ||
+ | TAX | ||
+ | LDA STOREPLOT | ||
+ | LDY STOREPLOT+1 | ||
+ | ;IN ACC #<PLOT ADDRES, YREG #>PLOT ADDRES, XREG BIT POSS. | ||
+ | RTS | ||
+ | ; | ||
+ | MAKESPEEDCODE | ||
+ | ; | ||
+ | ;ITERATOR FOR GENERATE UNROLLED CODE | ||
+ | ;FROM SPEEDCODE BASE | ||
+ | ; | ||
+ | LDA #< | ||
+ | STA VECTR3 | ||
+ | LDA #> | ||
+ | STA VECTR3+1 | ||
+ | | ||
+ | |||
+ | LDY #$00 | ||
+ | STY CNTRCOLUMN | ||
+ | | ||
+ | | ||
+ | LDA #<CHAR1 | ||
+ | STA CNTCHAR | ||
+ | |||
+ | MCOD0 | ||
+ | LDA #<PLOTS | ||
+ | STA VECTR1 | ||
+ | LDA #>PLOTS | ||
+ | STA VECTR1+1 | ||
+ | LDA CNTRCOLUMN | ||
+ | ASL | ||
+ | ADC CNTRCOLUMN | ||
+ | ADC VECTR1 | ||
+ | STA VECTR1 | ||
+ | BCC + | ||
+ | INC VECTR1+1 | ||
+ | + | ||
+ | LDY #$00 | ||
+ | STY CNTRLINES | ||
+ | JSR STOREDATA | ||
+ | | ||
+ | MCOD1 | ||
+ | |||
+ | JSR CALCPLOTADD ;IN ACC #<PLOT ADDRES, YREG #>PLOT ADDRES, XREG BIT POSS. | ||
+ | STA DOT8 | ||
+ | STA DOT8+5 | ||
+ | STY DOT8+1 | ||
+ | STY DOT8+6 | ||
+ | STX DOT8+3 | ||
+ | | ||
+ | JSR NEXTROW | ||
+ | JSR CALCPLOTADD | ||
+ | STA DOT7 | ||
+ | STA DOT7+5 | ||
+ | STY DOT7+1 | ||
+ | STY DOT7+6 | ||
+ | STX DOT7+3 | ||
+ | |||
+ | JSR NEXTROW | ||
+ | JSR CALCPLOTADD | ||
+ | STA DOT6 | ||
+ | STA DOT6+5 | ||
+ | STY DOT6+1 | ||
+ | STY DOT6+6 | ||
+ | STX DOT6+3 | ||
+ | | ||
+ | JSR NEXTROW | ||
+ | JSR CALCPLOTADD | ||
+ | STA DOT5 | ||
+ | STA DOT5+5 | ||
+ | STY DOT5+1 | ||
+ | STY DOT5+6 | ||
+ | STX DOT5+3 | ||
+ | | ||
+ | JSR NEXTROW | ||
+ | JSR CALCPLOTADD | ||
+ | STA DOT4 | ||
+ | STA DOT4+5 | ||
+ | STY DOT4+1 | ||
+ | STY DOT4+6 | ||
+ | STX DOT4+3 | ||
+ | | ||
+ | JSR NEXTROW | ||
+ | JSR CALCPLOTADD | ||
+ | STA DOT3 | ||
+ | STA DOT3+5 | ||
+ | STY DOT3+1 | ||
+ | STY DOT3+6 | ||
+ | STX DOT3+3 | ||
+ | | ||
+ | JSR NEXTROW | ||
+ | JSR CALCPLOTADD | ||
+ | STA DOT2 | ||
+ | STA DOT2+5 | ||
+ | STY DOT2+1 | ||
+ | STY DOT2+6 | ||
+ | STX DOT2+3 | ||
+ | | ||
+ | JSR NEXTROW | ||
+ | JSR CALCPLOTADD | ||
+ | STA DOT1 | ||
+ | STA DOT1+5 | ||
+ | STY DOT1+1 | ||
+ | STY DOT1+6 | ||
+ | STX DOT1+3 | ||
+ | | ||
+ | JSR NEXTROW | ||
+ | LDA CNTCHAR | ||
+ | STA LITERA1 | ||
+ | INC CNTCHAR | ||
+ | |||
+ | | ||
+ | LDY #$00 | ||
+ | - | ||
+ | LDA FCOD,Y | ||
+ | STA (VECTR3),Y | ||
+ | INY | ||
+ | CPY #LENLOOP+1 | ||
+ | BNE - | ||
+ | LDA VECTR3 | ||
+ | CLC | ||
+ | ADC #LENLOOP | ||
+ | STA VECTR3 | ||
+ | BCC + | ||
+ | INC VECTR3+1 | ||
+ | + | ||
+ | | ||
+ | | ||
+ | | ||
+ | INC CNTRLINES | ||
+ | LDA CNTRLINES | ||
+ | CMP #COUNTCHAR | ||
+ | BEQ + | ||
+ | JMP MCOD1 | ||
+ | + | ||
+ | INC CNTRCOLUMN | ||
+ | LDA CNTRCOLUMN | ||
+ | CMP #COUNTLINES | ||
+ | BEQ + | ||
+ | JMP MCOD0 | ||
+ | + | ||
+ | RTS | ||
+ | ; | ||
+ | ;MAKE STA $ADDRESS PLOT FOR FAST CLEAR ALL 1024 BITS | ||
+ | ;NOT SUPER OPTIMIZE!!! COS DON'T ELLIMINATED THIS SAME ADDRES FOR | ||
+ | ;ANY PLOTS | ||
+ | ; | ||
+ | MAKESPEEDCLEAR | ||
+ | | ||
+ | LDA #< | ||
+ | STA VECTR3 | ||
+ | LDA #> | ||
+ | STA VECTR3+1 | ||
+ | | ||
+ | LDA #<PLOTS | ||
+ | STA VECTR1 | ||
+ | LDA #>PLOTS | ||
+ | STA VECTR1+1 | ||
+ | | ||
+ | LDA #$A9 | ||
+ | LDY #$00 | ||
+ | STA (VECTR3),Y | ||
+ | TYA | ||
+ | INY | ||
+ | STA (VECTR3),Y | ||
+ | LDA VECTR3 | ||
+ | CLC | ||
+ | ADC #$02 | ||
+ | STA VECTR3 | ||
+ | BCC + | ||
+ | INC VECTR3+1 | ||
+ | + | ||
+ | - | ||
+ | LDY #$00 | ||
+ | LDA #$8D | ||
+ | STA (VECTR3),Y | ||
+ | LDY #$03 | ||
+ | LDA #$60 | ||
+ | STA (VECTR3),Y | ||
+ | | ||
+ | JSR STOREDATA | ||
+ | JSR CALCPLOTADD | ||
+ | TAX | ||
+ | TYA | ||
+ | LDY #$02 | ||
+ | STA (VECTR3),Y | ||
+ | TXA | ||
+ | DEY | ||
+ | STA (VECTR3),Y | ||
+ | LDA VECTR1 | ||
+ | CLC | ||
+ | ADC #$03 | ||
+ | STA VECTR1 | ||
+ | BCC + | ||
+ | INC VECTR1+1 | ||
+ | + | ||
+ | LDA VECTR3 | ||
+ | CLC | ||
+ | ADC #$03 | ||
+ | STA VECTR3 | ||
+ | BCC + | ||
+ | INC VECTR3+1 | ||
+ | + | ||
+ | |||
+ | LDA VECTR1+1 | ||
+ | CMP #>EPLOT | ||
+ | BNE - | ||
+ | LDA VECTR1 | ||
+ | CMP #<EPLOT | ||
+ | BNE - | ||
+ | | ||
+ | RTS | ||
+ | ;=== | ||
+ | ;NEXT 8 DOT'S | ||
+ | ;======== | ||
+ | NEXTROW | ||
+ | LDA VECTR1 | ||
+ | CLC | ||
+ | ADC #24 | ||
+ | STA VECTR1 | ||
+ | BCC + | ||
+ | INC VECTR1+1 | ||
+ | + | ||
+ | STOREDATA | ||
+ | LDY #$00 | ||
+ | LDA (VECTR1),Y | ||
+ | STA XPOSS | ||
+ | INY | ||
+ | LDA (VECTR1),Y | ||
+ | STA YPOSS | ||
+ | INY | ||
+ | LDA (VECTR1),Y | ||
+ | STA XPOSS+1 | ||
+ | RTS | ||
+ | ; | ||
+ | CNTRLINES | ||
+ | CNTRCOLUMN | ||
+ | CNTCHAR | ||
+ | ; | ||
+ | ;BELOW IS THE SPEEDCODE BASE FOR ITERATION | ||
+ | ; | ||
+ | |||
+ | FCOD | ||
+ | LITERA1 = *+1 | ||
+ | |||
+ | LDA $77 | ||
+ | ASL ;WHY ASL AND TAX? COS LOWEST BIT IN NYBBLES NOT WORKING | ||
+ | TAX ;IN ILLEGAL OPCODE $8B (ANE... ANX) SO AFTER ASL | ||
+ | AND #$10 ;HI BIT IN CARRY LOWEST BIT IS SECOND SAVE ACC TO XREG | ||
+ | BEQ + ;AND CHECK THE LOWEST BIT IN HI NYBBLE (AND #$10) | ||
+ | |||
+ | DOT4 = *+1 | ||
+ | LDA $1000 ;HERE WILL BE OVERWRITE ADDRES OF PLOT | ||
+ | EOR #$10 ;AND HERE BIT POSS. OF PLOT | ||
+ | STA $1000 | ||
+ | + | ||
+ | BCC + | ||
+ | DOT8 = *+1 | ||
+ | LDA $1000 | ||
+ | EOR #$10 | ||
+ | STA $1000 | ||
+ | + | ||
+ | .BYTE $8B , $80 ;ANX #$80 | ||
+ | BEQ + | ||
+ | DOT7 = *+1 | ||
+ | LDA $1000 ;AND LIKE BEFORE... | ||
+ | EOR #$10 | ||
+ | STA $1000 | ||
+ | + | ||
+ | .BYTE $8B , $40 ;ANX #$40 YOU UNDERSTAND I HOPPE | ||
+ | BEQ + | ||
+ | DOT6 = *+1 | ||
+ | LDA $1000 | ||
+ | EOR #$10 | ||
+ | STA $1000 | ||
+ | + | ||
+ | .BYTE $8B , $20 | ||
+ | BEQ + ;IF BIT IS SET SO SET BIT ON THE BITMAP | ||
+ | DOT5 = *+1 | ||
+ | LDA $1000 | ||
+ | EOR #$10 | ||
+ | STA $1000 | ||
+ | + | ||
+ | .BYTE $8B , $08 ;IF BIT IS NOT SET GO TO THE NEXT | ||
+ | BEQ + | ||
+ | DOT3 = *+1 | ||
+ | LDA $1000 | ||
+ | EOR #$10 | ||
+ | STA $1000 | ||
+ | + | ||
+ | .BYTE $8B , $04 | ||
+ | BEQ + | ||
+ | DOT2 = *+1 | ||
+ | LDA $1000 | ||
+ | EOR #$10 | ||
+ | STA $1000 | ||
+ | + | ||
+ | .BYTE $8B , $02 | ||
+ | BEQ + | ||
+ | DOT1 = *+1 | ||
+ | LDA $1000 | ||
+ | EOR #$10 | ||
+ | STA $1000 | ||
+ | + | ||
+ | RTS | ||
+ | ; | ||
+ | ;MAIN TRAJECTORY 1024 PLOT POSS. IN THE HIRES SCREEN | ||
+ | ; | ||
+ | PLOTS | ||
+ | |||
+ | ; LOW X POS, Y POS, HI X POS ... | ||
+ | .BYTE 13 , 56 , 0 , 13 , 57 , 0 , 13 , 58 , 0 , 13 , 59 , 0 , 13 , 61 , 0 , 13 , 62 , 0 , 13 , 63 , 0 , 13 , 64 , 0 | ||
+ | .BYTE 14 , 56 , 0 , 14 , 57 , 0 , 14 , 58 , 0 , 14 , 59 , 0 , 14 , 61 , 0 , 14 , 62 , 0 , 14 , 63 , 0 , 14 , 64 , 0 | ||
+ | .BYTE 15 , 56 , 0 , 15 , 57 , 0 , 15 , 58 , 0 , 15 , 59 , 0 , 15 , 60 , 0 , 15 , 62 , 0 , 15 , 63 , 0 , 15 , 64 , 0 | ||
+ | .BYTE 16 , 55 , 0 , 16 , 57 , 0 , 16 , 58 , 0 , 16 , 59 , 0 , 16 , 60 , 0 , 16 , 62 , 0 , 16 , 63 , 0 , 16 , 64 , 0 | ||
+ | .BYTE 18 , 55 , 0 , 18 , 57 , 0 , 18 , 58 , 0 , 18 , 59 , 0 , 18 , 60 , 0 , 18 , 61 , 0 , 18 , 63 , 0 , 18 , 64 , 0 | ||
+ | .BYTE 19 , 55 , 0 , 19 , 56 , 0 , 19 , 58 , 0 , 19 , 59 , 0 , 19 , 60 , 0 , 19 , 61 , 0 , 19 , 63 , 0 , 19 , 64 , 0 | ||
+ | .BYTE 20 , 55 , 0 , 20 , 56 , 0 , 20 , 57 , 0 , 20 , 59 , 0 , 20 , 60 , 0 , 20 , 61 , 0 , 20 , 62 , 0 , 20 , 64 , 0 | ||
+ | .BYTE 21 , 55 , 0 , 21 , 56 , 0 , 21 , 57 , 0 , 21 , 58 , 0 , 21 , 60 , 0 , 21 , 61 , 0 , 21 , 62 , 0 , 21 , 63 , 0 | ||
+ | .BYTE 22 , 54 , 0 , 22 , 56 , 0 , 22 , 57 , 0 , 22 , 58 , 0 , 22 , 59 , 0 , 22 , 61 , 0 , 22 , 62 , 0 , 22 , 63 , 0 | ||
+ | .BYTE 23 , 54 , 0 , 23 , 55 , 0 , 23 , 57 , 0 , 23 , 58 , 0 , 23 , 59 , 0 , 23 , 60 , 0 , 23 , 62 , 0 , 23 , 63 , 0 | ||
+ | .BYTE 24 , 54 , 0 , 24 , 55 , 0 , 24 , 56 , 0 , 24 , 58 , 0 , 24 , 59 , 0 , 24 , 60 , 0 , 24 , 61 , 0 , 24 , 63 , 0 | ||
+ | .BYTE 24 , 54 , 0 , 24 , 55 , 0 , 24 , 56 , 0 , 24 , 57 , 0 , 24 , 59 , 0 , 24 , 60 , 0 , 24 , 61 , 0 , 24 , 62 , 0 | ||
+ | .BYTE 25 , 53 , 0 , 25 , 54 , 0 , 25 , 56 , 0 , 25 , 57 , 0 , 25 , 58 , 0 , 25 , 60 , 0 , 25 , 61 , 0 , 25 , 62 , 0 | ||
+ | .BYTE 26 , 53 , 0 , 26 , 54 , 0 , 26 , 55 , 0 , 26 , 57 , 0 , 26 , 58 , 0 , 26 , 59 , 0 , 26 , 60 , 0 , 26 , 62 , 0 | ||
+ | .BYTE 27 , 52 , 0 , 27 , 54 , 0 , 27 , 55 , 0 , 27 , 56 , 0 , 27 , 58 , 0 , 27 , 59 , 0 , 27 , 60 , 0 , 27 , 61 , 0 | ||
+ | .BYTE 28 , 52 , 0 , 28 , 53 , 0 , 28 , 55 , 0 , 28 , 56 , 0 , 28 , 57 , 0 , 28 , 58 , 0 , 28 , 60 , 0 , 28 , 61 , 0 | ||
+ | .BYTE 29 , 52 , 0 , 29 , 53 , 0 , 29 , 54 , 0 , 29 , 55 , 0 , 29 , 57 , 0 , 29 , 58 , 0 , 29 , 59 , 0 , 29 , 61 , 0 | ||
+ | .BYTE 30 , 51 , 0 , 30 , 52 , 0 , 30 , 54 , 0 , 30 , 55 , 0 , 30 , 56 , 0 , 30 , 58 , 0 , 30 , 59 , 0 , 30 , 60 , 0 | ||
+ | .BYTE 31 , 51 , 0 , 31 , 52 , 0 , 31 , 53 , 0 , 31 , 54 , 0 , 31 , 56 , 0 , 31 , 57 , 0 , 31 , 58 , 0 , 31 , 60 , 0 | ||
+ | .BYTE 31 , 50 , 0 , 31 , 51 , 0 , 31 , 53 , 0 , 31 , 54 , 0 , 31 , 55 , 0 , 31 , 57 , 0 , 31 , 58 , 0 , 31 , 59 , 0 | ||
+ | .BYTE 32 , 49 , 0 , 32 , 51 , 0 , 32 , 52 , 0 , 32 , 53 , 0 , 32 , 55 , 0 , 32 , 56 , 0 , 32 , 57 , 0 , 32 , 59 , 0 | ||
+ | .BYTE 33 , 49 , 0 , 33 , 50 , 0 , 33 , 52 , 0 , 33 , 53 , 0 , 33 , 54 , 0 , 33 , 56 , 0 , 33 , 57 , 0 , 33 , 58 , 0 | ||
+ | .BYTE 34 , 48 , 0 , 34 , 50 , 0 , 34 , 51 , 0 , 34 , 52 , 0 , 34 , 54 , 0 , 34 , 55 , 0 , 34 , 57 , 0 , 34 , 58 , 0 | ||
+ | .BYTE 35 , 48 , 0 , 35 , 49 , 0 , 35 , 51 , 0 , 35 , 52 , 0 , 35 , 53 , 0 , 35 , 55 , 0 , 35 , 56 , 0 , 35 , 57 , 0 | ||
+ | .BYTE 35 , 47 , 0 , 35 , 49 , 0 , 35 , 50 , 0 , 35 , 51 , 0 , 35 , 53 , 0 , 35 , 54 , 0 , 35 , 56 , 0 , 35 , 57 , 0 | ||
+ | .BYTE 36 , 47 , 0 , 36 , 48 , 0 , 36 , 49 , 0 , 36 , 51 , 0 , 36 , 52 , 0 , 36 , 54 , 0 , 36 , 55 , 0 , 36 , 56 , 0 | ||
+ | .BYTE 37 , 46 , 0 , 37 , 47 , 0 , 37 , 49 , 0 , 37 , 50 , 0 , 37 , 52 , 0 , 37 , 53 , 0 , 37 , 55 , 0 , 37 , 56 , 0 | ||
+ | .BYTE 38 , 45 , 0 , 38 , 47 , 0 , 38 , 48 , 0 , 38 , 50 , 0 , 38 , 51 , 0 , 38 , 53 , 0 , 38 , 54 , 0 , 38 , 56 , 0 | ||
+ | .BYTE 39 , 45 , 0 , 39 , 46 , 0 , 39 , 48 , 0 , 39 , 49 , 0 , 39 , 51 , 0 , 39 , 52 , 0 , 39 , 54 , 0 , 39 , 55 , 0 | ||
+ | .BYTE 39 , 44 , 0 , 39 , 46 , 0 , 39 , 47 , 0 , 39 , 49 , 0 , 39 , 50 , 0 , 39 , 52 , 0 , 39 , 53 , 0 , 39 , 55 , 0 | ||
+ | .BYTE 40 , 44 , 0 , 40 , 45 , 0 , 40 , 47 , 0 , 40 , 48 , 0 , 40 , 50 , 0 , 40 , 51 , 0 , 40 , 53 , 0 , 40 , 54 , 0 | ||
+ | .BYTE 41 , 43 , 0 , 41 , 45 , 0 , 41 , 46 , 0 , 41 , 48 , 0 , 41 , 49 , 0 , 41 , 51 , 0 , 41 , 52 , 0 , 41 , 54 , 0 | ||
+ | .BYTE 42 , 43 , 0 , 42 , 44 , 0 , 42 , 46 , 0 , 42 , 47 , 0 , 42 , 49 , 0 , 42 , 50 , 0 , 42 , 52 , 0 , 42 , 53 , 0 | ||
+ | .BYTE 43 , 42 , 0 , 43 , 44 , 0 , 43 , 45 , 0 , 43 , 47 , 0 , 43 , 48 , 0 , 43 , 50 , 0 , 43 , 51 , 0 , 43 , 53 , 0 | ||
+ | .BYTE 44 , 41 , 0 , 44 , 43 , 0 , 44 , 45 , 0 , 44 , 46 , 0 , 44 , 48 , 0 , 44 , 49 , 0 , 44 , 51 , 0 , 44 , 53 , 0 | ||
+ | .BYTE 44 , 41 , 0 , 44 , 43 , 0 , 44 , 44 , 0 , 44 , 46 , 0 , 44 , 47 , 0 , 44 , 49 , 0 , 44 , 51 , 0 , 44 , 52 , 0 | ||
+ | .BYTE 45 , 40 , 0 , 45 , 42 , 0 , 45 , 44 , 0 , 45 , 45 , 0 , 45 , 47 , 0 , 45 , 49 , 0 , 45 , 50 , 0 , 45 , 52 , 0 | ||
+ | .BYTE 46 , 40 , 0 , 46 , 42 , 0 , 46 , 43 , 0 , 46 , 45 , 0 , 46 , 47 , 0 , 46 , 48 , 0 , 46 , 50 , 0 , 46 , 52 , 0 | ||
+ | .BYTE 47 , 39 , 0 , 47 , 41 , 0 , 47 , 43 , 0 , 47 , 45 , 0 , 47 , 46 , 0 , 47 , 48 , 0 , 47 , 50 , 0 , 47 , 51 , 0 | ||
+ | .BYTE 48 , 39 , 0 , 48 , 41 , 0 , 48 , 42 , 0 , 48 , 44 , 0 , 48 , 46 , 0 , 48 , 48 , 0 , 48 , 49 , 0 , 48 , 51 , 0 | ||
+ | .BYTE 49 , 39 , 0 , 49 , 40 , 0 , 49 , 42 , 0 , 49 , 44 , 0 , 49 , 46 , 0 , 49 , 47 , 0 , 49 , 49 , 0 , 49 , 51 , 0 | ||
+ | .BYTE 50 , 38 , 0 , 50 , 40 , 0 , 50 , 42 , 0 , 50 , 44 , 0 , 50 , 45 , 0 , 50 , 47 , 0 , 50 , 49 , 0 , 50 , 51 , 0 | ||
+ | .BYTE 51 , 38 , 0 , 51 , 40 , 0 , 51 , 42 , 0 , 51 , 43 , 0 , 51 , 45 , 0 , 51 , 47 , 0 , 51 , 49 , 0 , 51 , 51 , 0 | ||
+ | .BYTE 52 , 38 , 0 , 52 , 40 , 0 , 52 , 41 , 0 , 52 , 43 , 0 , 52 , 45 , 0 , 52 , 47 , 0 , 52 , 49 , 0 , 52 , 51 , 0 | ||
+ | .BYTE 53 , 38 , 0 , 53 , 39 , 0 , 53 , 41 , 0 , 53 , 43 , 0 , 53 , 45 , 0 , 53 , 47 , 0 , 53 , 49 , 0 , 53 , 51 , 0 | ||
+ | .BYTE 55 , 37 , 0 , 55 , 39 , 0 , 55 , 41 , 0 , 55 , 43 , 0 , 55 , 45 , 0 , 55 , 47 , 0 , 55 , 49 , 0 , 55 , 51 , 0 | ||
+ | .BYTE 56 , 37 , 0 , 56 , 39 , 0 , 56 , 41 , 0 , 56 , 43 , 0 , 56 , 45 , 0 , 56 , 47 , 0 , 56 , 49 , 0 , 56 , 51 , 0 | ||
+ | .BYTE 57 , 37 , 0 , 57 , 39 , 0 , 57 , 41 , 0 , 57 , 43 , 0 , 57 , 45 , 0 , 57 , 47 , 0 , 57 , 49 , 0 , 57 , 51 , 0 | ||
+ | .BYTE 58 , 37 , 0 , 58 , 39 , 0 , 58 , 41 , 0 , 58 , 43 , 0 , 58 , 45 , 0 , 58 , 48 , 0 , 58 , 50 , 0 , 58 , 52 , 0 | ||
+ | .BYTE 60 , 37 , 0 , 60 , 40 , 0 , 60 , 42 , 0 , 60 , 44 , 0 , 60 , 46 , 0 , 60 , 48 , 0 , 60 , 50 , 0 , 60 , 52 , 0 | ||
+ | .BYTE 61 , 38 , 0 , 61 , 40 , 0 , 61 , 42 , 0 , 61 , 44 , 0 , 61 , 46 , 0 , 61 , 48 , 0 , 61 , 50 , 0 , 61 , 53 , 0 | ||
+ | .BYTE 63 , 38 , 0 , 63 , 40 , 0 , 63 , 42 , 0 , 63 , 44 , 0 , 63 , 47 , 0 , 63 , 49 , 0 , 63 , 51 , 0 , 63 , 53 , 0 | ||
+ | .BYTE 64 , 38 , 0 , 64 , 41 , 0 , 64 , 43 , 0 , 64 , 45 , 0 , 64 , 47 , 0 , 64 , 49 , 0 , 64 , 52 , 0 , 64 , 54 , 0 | ||
+ | .BYTE 66 , 39 , 0 , 66 , 41 , 0 , 66 , 43 , 0 , 66 , 46 , 0 , 66 , 48 , 0 , 66 , 50 , 0 , 66 , 52 , 0 , 66 , 55 , 0 | ||
+ | .BYTE 68 , 39 , 0 , 68 , 42 , 0 , 68 , 44 , 0 , 68 , 46 , 0 , 68 , 49 , 0 , 68 , 51 , 0 , 68 , 53 , 0 , 68 , 56 , 0 | ||
+ | .BYTE 69 , 40 , 0 , 69 , 42 , 0 , 69 , 45 , 0 , 69 , 47 , 0 , 69 , 50 , 0 , 69 , 52 , 0 , 69 , 54 , 0 , 69 , 57 , 0 | ||
+ | .BYTE 71 , 41 , 0 , 71 , 43 , 0 , 71 , 46 , 0 , 71 , 48 , 0 , 71 , 51 , 0 , 71 , 53 , 0 , 71 , 55 , 0 , 71 , 58 , 0 | ||
+ | .BYTE 73 , 42 , 0 , 73 , 44 , 0 , 73 , 47 , 0 , 73 , 49 , 0 , 73 , 52 , 0 , 73 , 54 , 0 , 73 , 57 , 0 , 73 , 59 , 0 | ||
+ | .BYTE 75 , 43 , 0 , 75 , 45 , 0 , 75 , 48 , 0 , 75 , 50 , 0 , 75 , 53 , 0 , 75 , 56 , 0 , 75 , 58 , 0 , 75 , 61 , 0 | ||
+ | .BYTE 78 , 44 , 0 , 78 , 46 , 0 , 78 , 49 , 0 , 78 , 52 , 0 , 78 , 54 , 0 , 78 , 57 , 0 , 78 , 60 , 0 , 78 , 62 , 0 | ||
+ | .BYTE 80 , 45 , 0 , 80 , 48 , 0 , 80 , 50 , 0 , 80 , 53 , 0 , 80 , 56 , 0 , 80 , 59 , 0 , 80 , 61 , 0 , 80 , 64 , 0 | ||
+ | .BYTE 83 , 46 , 0 , 83 , 49 , 0 , 83 , 52 , 0 , 83 , 55 , 0 , 83 , 58 , 0 , 83 , 60 , 0 , 83 , 63 , 0 , 83 , 66 , 0 | ||
+ | .BYTE 85 , 48 , 0 , 85 , 51 , 0 , 85 , 54 , 0 , 85 , 57 , 0 , 85 , 59 , 0 , 85 , 62 , 0 , 85 , 65 , 0 , 85 , 68 , 0 | ||
+ | .BYTE 88 , 50 , 0 , 88 , 53 , 0 , 88 , 56 , 0 , 88 , 59 , 0 , 88 , 61 , 0 , 88 , 64 , 0 , 88 , 67 , 0 , 88 , 70 , 0 | ||
+ | .BYTE 91 , 52 , 0 , 91 , 55 , 0 , 91 , 58 , 0 , 91 , 61 , 0 , 91 , 64 , 0 , 91 , 67 , 0 , 91 , 70 , 0 , 91 , 73 , 0 | ||
+ | .BYTE 94 , 54 , 0 , 94 , 57 , 0 , 94 , 60 , 0 , 94 , 63 , 0 , 94 , 66 , 0 , 94 , 69 , 0 , 94 , 72 , 0 , 94 , 75 , 0 | ||
+ | .BYTE 97 , 56 , 0 , 97 , 59 , 0 , 97 , 62 , 0 , 97 , 65 , 0 , 97 , 68 , 0 , 97 , 72 , 0 , 97 , 75 , 0 , 97 , 78 , 0 | ||
+ | .BYTE 101 , 58 , 0 , 101 , 61 , 0 , 101 , 65 , 0 , 101 , 68 , 0 , 101 , 71 , 0 , 101 , 74 , 0 , 101 , 78 , 0 , 101 , 81 , 0 | ||
+ | .BYTE 105 , 60 , 0 , 105 , 64 , 0 , 105 , 67 , 0 , 105 , 71 , 0 , 105 , 74 , 0 , 105 , 77 , 0 , 105 , 81 , 0 , 105 , 84 , 0 | ||
+ | .BYTE 108 , 63 , 0 , 108 , 67 , 0 , 108 , 70 , 0 , 108 , 74 , 0 , 108 , 77 , 0 , 108 , 80 , 0 , 108 , 84 , 0 , 108 , 87 , 0 | ||
+ | .BYTE 112 , 66 , 0 , 112 , 69 , 0 , 112 , 73 , 0 , 112 , 77 , 0 , 112 , 80 , 0 , 112 , 84 , 0 , 112 , 87 , 0 , 112 , 91 , 0 | ||
+ | .BYTE 117 , 69 , 0 , 117 , 73 , 0 , 117 , 76 , 0 , 117 , 80 , 0 , 117 , 84 , 0 , 117 , 87 , 0 , 117 , 91 , 0 , 117 , 95 , 0 | ||
+ | .BYTE 121 , 72 , 0 , 121 , 76 , 0 , 121 , 80 , 0 , 121 , 83 , 0 , 121 , 87 , 0 , 121 , 91 , 0 , 121 , 95 , 0 , 121 , 98 , 0 | ||
+ | .BYTE 126 , 75 , 0 , 126 , 79 , 0 , 126 , 83 , 0 , 126 , 87 , 0 , 126 , 91 , 0 , 126 , 95 , 0 , 126 , 98 , 0 , 126 , 102 , 0 | ||
+ | .BYTE 131 , 79 , 0 , 131 , 83 , 0 , 131 , 87 , 0 , 131 , 91 , 0 , 131 , 95 , 0 , 131 , 98 , 0 , 131 , 102 , 0 , 131 , 106 , 0 | ||
+ | .BYTE 136 , 82 , 0 , 136 , 86 , 0 , 136 , 90 , 0 , 136 , 94 , 0 , 136 , 98 , 0 , 136 , 103 , 0 , 136 , 107 , 0 , 136 , 111 , 0 | ||
+ | .BYTE 141 , 86 , 0 , 141 , 90 , 0 , 141 , 94 , 0 , 141 , 98 , 0 , 141 , 103 , 0 , 141 , 107 , 0 , 141 , 111 , 0 , 141 , 115 , 0 | ||
+ | .BYTE 147 , 90 , 0 , 147 , 94 , 0 , 147 , 98 , 0 , 147 , 102 , 0 , 147 , 107 , 0 , 147 , 111 , 0 , 147 , 115 , 0 , 147 , 120 , 0 | ||
+ | .BYTE 153 , 93 , 0 , 153 , 98 , 0 , 153 , 102 , 0 , 153 , 107 , 0 , 153 , 111 , 0 , 153 , 115 , 0 , 153 , 120 , 0 , 153 , 124 , 0 | ||
+ | .BYTE 159 , 97 , 0 , 159 , 102 , 0 , 159 , 106 , 0 , 159 , 111 , 0 , 159 , 115 , 0 , 159 , 120 , 0 , 159 , 124 , 0 , 159 , 129 , 0 | ||
+ | .BYTE 165 , 101 , 0 , 165 , 106 , 0 , 165 , 110 , 0 , 165 , 115 , 0 , 165 , 120 , 0 , 165 , 124 , 0 , 165 , 129 , 0 , 165 , 134 , 0 | ||
+ | .BYTE 171 , 105 , 0 , 171 , 110 , 0 , 171 , 115 , 0 , 171 , 119 , 0 , 171 , 124 , 0 , 171 , 129 , 0 , 171 , 134 , 0 , 171 , 138 , 0 | ||
+ | .BYTE 178 , 109 , 0 , 178 , 114 , 0 , 178 , 119 , 0 , 178 , 124 , 0 , 178 , 128 , 0 , 178 , 133 , 0 , 178 , 138 , 0 , 178 , 143 , 0 | ||
+ | .BYTE 185 , 113 , 0 , 185 , 118 , 0 , 185 , 123 , 0 , 185 , 128 , 0 , 185 , 133 , 0 , 185 , 138 , 0 , 185 , 143 , 0 , 185 , 147 , 0 | ||
+ | .BYTE 191 , 117 , 0 , 191 , 122 , 0 , 191 , 127 , 0 , 191 , 132 , 0 , 191 , 137 , 0 , 191 , 142 , 0 , 191 , 147 , 0 , 191 , 152 , 0 | ||
+ | .BYTE 198 , 121 , 0 , 198 , 126 , 0 , 198 , 131 , 0 , 198 , 136 , 0 , 198 , 141 , 0 , 198 , 146 , 0 , 198 , 151 , 0 , 198 , 156 , 0 | ||
+ | .BYTE 205 , 124 , 0 , 205 , 129 , 0 , 205 , 135 , 0 , 205 , 140 , 0 , 205 , 145 , 0 , 205 , 150 , 0 , 205 , 155 , 0 , 205 , 161 , 0 | ||
+ | .BYTE 212 , 128 , 0 , 212 , 133 , 0 , 212 , 138 , 0 , 212 , 143 , 0 , 212 , 149 , 0 , 212 , 154 , 0 , 212 , 159 , 0 , 212 , 164 , 0 | ||
+ | .BYTE 219 , 131 , 0 , 219 , 136 , 0 , 219 , 141 , 0 , 219 , 147 , 0 , 219 , 152 , 0 , 219 , 157 , 0 , 219 , 163 , 0 , 219 , 168 , 0 | ||
+ | .BYTE 226 , 134 , 0 , 226 , 139 , 0 , 226 , 144 , 0 , 226 , 150 , 0 , 226 , 155 , 0 , 226 , 161 , 0 , 226 , 166 , 0 , 226 , 171 , 0 | ||
+ | .BYTE 233 , 136 , 0 , 233 , 142 , 0 , 233 , 147 , 0 , 233 , 153 , 0 , 233 , 158 , 0 , 233 , 164 , 0 , 233 , 169 , 0 , 233 , 174 , 0 | ||
+ | .BYTE 240 , 138 , 0 , 240 , 144 , 0 , 240 , 150 , 0 , 240 , 155 , 0 , 240 , 161 , 0 , 240 , 166 , 0 , 240 , 172 , 0 , 240 , 177 , 0 | ||
+ | .BYTE 246 , 140 , 0 , 246 , 146 , 0 , 246 , 152 , 0 , 246 , 157 , 0 , 246 , 163 , 0 , 246 , 168 , 0 , 246 , 174 , 0 , 246 , 179 , 0 | ||
+ | .BYTE 253 , 142 , 0 , 253 , 148 , 0 , 253 , 153 , 0 , 253 , 159 , 0 , 253 , 164 , 0 , 253 , 170 , 0 , 253 , 175 , 0 , 253 , 181 , 0 | ||
+ | .BYTE 3 , 143 , 1 , 3 , 149 , 1 , 3 , 154 , 1 , 3 , 160 , 1 , 3 , 166 , 1 , 3 , 171 , 1 , 3 , 177 , 1 , 3 , 182 , 1 | ||
+ | .BYTE 9 , 144 , 1 , 9 , 149 , 1 , 9 , 155 , 1 , 9 , 161 , 1 , 9 , 166 , 1 , 9 , 172 , 1 , 9 , 177 , 1 , 9 , 183 , 1 | ||
+ | .BYTE 14 , 144 , 1 , 14 , 150 , 1 , 14 , 155 , 1 , 14 , 161 , 1 , 14 , 167 , 1 , 14 , 172 , 1 , 14 , 178 , 1 , 14 , 183 , 1 | ||
+ | .BYTE 19 , 144 , 1 , 19 , 150 , 1 , 19 , 155 , 1 , 19 , 161 , 1 , 19 , 166 , 1 , 19 , 172 , 1 , 19 , 178 , 1 , 19 , 183 , 1 | ||
+ | .BYTE 24 , 144 , 1 , 24 , 149 , 1 , 24 , 155 , 1 , 24 , 160 , 1 , 24 , 166 , 1 , 24 , 171 , 1 , 24 , 177 , 1 , 24 , 182 , 1 | ||
+ | .BYTE 28 , 143 , 1 , 28 , 148 , 1 , 28 , 154 , 1 , 28 , 159 , 1 , 28 , 165 , 1 , 28 , 170 , 1 , 28 , 176 , 1 , 28 , 181 , 1 | ||
+ | .BYTE 32 , 141 , 1 , 32 , 147 , 1 , 32 , 152 , 1 , 32 , 158 , 1 , 32 , 163 , 1 , 32 , 169 , 1 , 32 , 174 , 1 , 32 , 179 , 1 | ||
+ | .BYTE 35 , 139 , 1 , 35 , 145 , 1 , 35 , 150 , 1 , 35 , 156 , 1 , 35 , 161 , 1 , 35 , 166 , 1 , 35 , 172 , 1 , 35 , 177 , 1 | ||
+ | .BYTE 38 , 137 , 1 , 38 , 143 , 1 , 38 , 148 , 1 , 38 , 153 , 1 , 38 , 159 , 1 , 38 , 164 , 1 , 38 , 169 , 1 , 38 , 175 , 1 | ||
+ | .BYTE 41 , 135 , 1 , 41 , 140 , 1 , 41 , 145 , 1 , 41 , 151 , 1 , 41 , 156 , 1 , 41 , 161 , 1 , 41 , 166 , 1 , 41 , 172 , 1 | ||
+ | .BYTE 43 , 132 , 1 , 43 , 137 , 1 , 43 , 142 , 1 , 43 , 148 , 1 , 43 , 153 , 1 , 43 , 158 , 1 , 43 , 163 , 1 , 43 , 168 , 1 | ||
+ | .BYTE 45 , 129 , 1 , 45 , 134 , 1 , 45 , 139 , 1 , 45 , 144 , 1 , 45 , 149 , 1 , 45 , 155 , 1 , 45 , 160 , 1 , 45 , 165 , 1 | ||
+ | .BYTE 46 , 126 , 1 , 46 , 131 , 1 , 46 , 136 , 1 , 46 , 141 , 1 , 46 , 146 , 1 , 46 , 151 , 1 , 46 , 156 , 1 , 46 , 161 , 1 | ||
+ | .BYTE 47 , 122 , 1 , 47 , 127 , 1 , 47 , 132 , 1 , 47 , 137 , 1 , 47 , 142 , 1 , 47 , 147 , 1 , 47 , 152 , 1 , 47 , 157 , 1 | ||
+ | .BYTE 47 , 119 , 1 , 47 , 123 , 1 , 47 , 128 , 1 , 47 , 133 , 1 , 47 , 138 , 1 , 47 , 143 , 1 , 47 , 147 , 1 , 47 , 152 , 1 | ||
+ | .BYTE 48 , 115 , 1 , 48 , 119 , 1 , 48 , 124 , 1 , 48 , 129 , 1 , 48 , 134 , 1 , 48 , 138 , 1 , 48 , 143 , 1 , 48 , 148 , 1 | ||
+ | .BYTE 47 , 111 , 1 , 47 , 115 , 1 , 47 , 120 , 1 , 47 , 125 , 1 , 47 , 129 , 1 , 47 , 134 , 1 , 47 , 139 , 1 , 47 , 143 , 1 | ||
+ | .BYTE 47 , 107 , 1 , 47 , 111 , 1 , 47 , 116 , 1 , 47 , 120 , 1 , 47 , 125 , 1 , 47 , 129 , 1 , 47 , 134 , 1 , 47 , 138 , 1 | ||
+ | .BYTE 46 , 103 , 1 , 46 , 107 , 1 , 46 , 112 , 1 , 46 , 116 , 1 , 46 , 120 , 1 , 46 , 125 , 1 , 46 , 129 , 1 , 46 , 134 , 1 | ||
+ | .BYTE 46 , 99 , 1 , 46 , 103 , 1 , 46 , 107 , 1 , 46 , 112 , 1 , 46 , 116 , 1 , 46 , 120 , 1 , 46 , 124 , 1 , 46 , 129 , 1 | ||
+ | .BYTE 44 , 95 , 1 , 44 , 99 , 1 , 44 , 103 , 1 , 44 , 107 , 1 , 44 , 111 , 1 , 44 , 116 , 1 , 44 , 120 , 1 , 44 , 124 , 1 | ||
+ | .BYTE 43 , 91 , 1 , 43 , 95 , 1 , 43 , 99 , 1 , 43 , 103 , 1 , 43 , 107 , 1 , 43 , 111 , 1 , 43 , 115 , 1 , 43 , 119 , 1 | ||
+ | .BYTE 42 , 87 , 1 , 42 , 91 , 1 , 42 , 95 , 1 , 42 , 99 , 1 , 42 , 102 , 1 , 42 , 106 , 1 , 42 , 110 , 1 , 42 , 114 , 1 | ||
+ | .BYTE 40 , 83 , 1 , 40 , 87 , 1 , 40 , 90 , 1 , 40 , 94 , 1 , 40 , 98 , 1 , 40 , 102 , 1 , 40 , 106 , 1 , 40 , 110 , 1 | ||
+ | .BYTE 38 , 79 , 1 , 38 , 83 , 1 , 38 , 86 , 1 , 38 , 90 , 1 , 38 , 94 , 1 , 38 , 98 , 1 , 38 , 101 , 1 , 38 , 105 , 1 | ||
+ | .BYTE 37 , 75 , 1 , 37 , 79 , 1 , 37 , 82 , 1 , 37 , 86 , 1 , 37 , 90 , 1 , 37 , 93 , 1 , 37 , 97 , 1 , 37 , 101 , 1 | ||
+ | .BYTE 35 , 71 , 1 , 35 , 75 , 1 , 35 , 79 , 1 , 35 , 82 , 1 , 35 , 86 , 1 , 35 , 89 , 1 , 35 , 93 , 1 , 35 , 96 , 1 | ||
+ | .BYTE 33 , 68 , 1 , 33 , 71 , 1 , 33 , 75 , 1 , 33 , 78 , 1 , 33 , 82 , 1 , 33 , 85 , 1 , 33 , 89 , 1 , 33 , 92 , 1 | ||
+ | .BYTE 31 , 65 , 1 , 31 , 68 , 1 , 31 , 71 , 1 , 31 , 75 , 1 , 31 , 78 , 1 , 31 , 81 , 1 , 31 , 85 , 1 , 31 , 88 , 1 | ||
+ | .BYTE 29 , 61 , 1 , 29 , 65 , 1 , 29 , 68 , 1 , 29 , 71 , 1 , 29 , 74 , 1 , 29 , 78 , 1 , 29 , 81 , 1 , 29 , 84 , 1 | ||
+ | .BYTE 27 , 58 , 1 , 27 , 61 , 1 , 27 , 65 , 1 , 27 , 68 , 1 , 27 , 71 , 1 , 27 , 74 , 1 , 27 , 77 , 1 , 27 , 81 , 1 | ||
+ | .BYTE 25 , 55 , 1 , 25 , 58 , 1 , 25 , 61 , 1 , 25 , 65 , 1 , 25 , 68 , 1 , 25 , 71 , 1 , 25 , 74 , 1 , 25 , 77 , 1 | ||
+ | .BYTE 23 , 52 , 1 , 23 , 55 , 1 , 23 , 58 , 1 , 23 , 61 , 1 , 23 , 64 , 1 , 23 , 68 , 1 , 23 , 71 , 1 , 23 , 74 , 1 | ||
+ | .BYTE 21 , 50 , 1 , 21 , 53 , 1 , 21 , 56 , 1 , 21 , 59 , 1 , 21 , 61 , 1 , 21 , 64 , 1 , 21 , 67 , 1 , 21 , 70 , 1 | ||
+ | |||
+ | |||
+ | |||
+ | EPLOT | ||
+ | |||
+ | .TEXT "END OF DATA" | ||
+ | </ |
base/3d_dot_scroll.txt · Last modified: 2015-04-17 04:30 by 127.0.0.1