Diff
checker
टेक्स्ट
टेक्स्ट
छवियां
दस्तावेज़
Excel
फ़ोल्डर्स
Legal
Enterprise
डेस्कटॉप
मूल्य
साइन इन करें
Diffchecker डेस्कटॉप डाउनलोड करें
टेक्स्ट की तुलना करें
दो टेक्स्ट फ़ाइलों के बीच अंतर ढूंढें
उपकरण
इतिहास
रियल-टाइम एडिटर
अपरिवर्तित संक्षिप्त करें
लाइन रैप बंद
लेआउट
विभाजित
संयुक्त
परिवर्तन हाइलाइट करें
स्मार्ट
शब्द
अक्षर
सिंटैक्स हाइलाइटिंग
सिंटैक्स चुनें
अनदेखा करें
टेक्स्ट बदलें
पहले अंतर पर जाएँ
इनपुट संपादित करें
Diffchecker Desktop
Diffchecker चलाने का सबसे सुरक्षित तरीका। Diffchecker Desktop ऐप पाएं: आपके diffs कभी आपके कंप्यूटर से बाहर नहीं जाते!
Desktop पाएं
Untitled diff
बनाया गया
11 वर्ष पहले
Diff कभी समाप्त नहीं होता
साफ़
निर्यात करें
शेयर करें
समझाएं
35 हटाए गए
लाइनें
कुल
हटाया गया
अक्षर
कुल
हटाया गया
इस सुविधा का उपयोग जारी रखने के लिए, अपग्रेड करें
Diff
checker
Pro
मूल्य देखें
199 लाइनें
सभी को कॉपी करें
34 जोड़े गए
लाइनें
कुल
जोड़ा गया
अक्षर
कुल
जोड़ा गया
इस सुविधा का उपयोग जारी रखने के लिए, अपग्रेड करें
Diff
checker
Pro
मूल्य देखें
197 लाइनें
सभी को कॉपी करें
;;====================================;;
;;====================================;;
;; SA-1 32x32 Rotation Routine
;; SA-1 32x32 Rotation Routine
;;====================================;;
;;====================================;;
;;====================================;;
;;====================================;;
;; How to Use:
;; How to Use:
;; 1. Put Graphics in !Source
;; 1. Put Graphics in !Source
;; 2. JSR to SUB_ROTATE
;; 2. JSR to SUB_ROTATE
;; 3. Update contents of !DestBWRAM
;; 3. Update contents of !DestBWRAM
;; to VRAM using CDMA Type #1, 4BPP,
;; to VRAM using CDMA Type #1, 4BPP,
;; 32 horizontal, 512 bytes.
;; 32 horizontal, 512 bytes.
;;====================================;;
;;====================================;;
;; Destination BW-RAM "Virtual RAM" & BW-RAM
;; Destination BW-RAM "Virtual RAM" & BW-RAM
!DestVRAM = $604000 ; Dest VRAM is same as BWRAM, but each byte is 4-bits only.
!DestVRAM = $604000 ; Dest VRAM is same as BWRAM, but each byte is 4-bits only.
; i.e $40:0000 = $60:0000 | ($60:0001 << 4)
; i.e $40:0000 = $60:0000 | ($60:0001 << 4)
!DestBWRAM = $402000
!DestBWRAM = $402000
;; RAM Definitions
;; RAM Definitions
!Degress = $6000 ; #$00 to #$FF ($00 = 0 degress)
!Degress = $6000 ; #$00 to #$FF ($00 = 0 degress)
!Scale = $6001 ; #$0000 to #$7FFF ($0100 = 100%)
!Scale = $6001 ; #$0000 to #$7FFF ($0100 = 100%)
;; Stracth RAM
;; Stracth RAM
!cosT = $04
!cosT = $04
!sinT = $06
!sinT = $06
!rowX = $08
!rowX = $08
!rowY = $0A
!rowY = $0A
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
!X = $
0C
!X = $
00
!Y = $0E
!Y = $0E
!Pointer = $14
!Pointer = $14
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
!Pointer2 = $17
;=====================
;=====================
SUB_ROTATE:
SUB_ROTATE:
PHP
PHP
PHD
PHD
REP #$30 ;| 16-bit AXY
REP #$30 ;| 16-bit AXY
LDA #$3100
LDA #$3100
TCD
TCD
LDA !Degress ;\ Calculate
LDA !Degress ;\ Calculate
AND #$00FF ;| Cos & Sin values
AND #$00FF ;| Cos & Sin values
ASL ;|
ASL ;|
TAX ;|
TAX ;|
LDA.w CosTable,X ;|
LDA.w CosTable,X ;|
STA !cosT ;|
STA !cosT ;|
TXA ;|
TXA ;|
CLC ;|
CLC ;|
ADC #$0180 ;|
ADC #$0180 ;|
AND #$01FE ;|
AND #$01FE ;|
TAX ;|
TAX ;|
LDA.w CosTable,X ;|
LDA.w CosTable,X ;|
STA !sinT ;/
STA !sinT ;/
STZ $2250 ; scale cos/sin
STZ $2250 ; scale cos/sin
LDA !Scale
LDA !Scale
STA $2251
STA $2251
LDA !cosT
LDA !cosT
STA $2253
STA $2253
NOP
NOP
LDY !sinT
LDY !sinT
LDA $2307
LDA $2307
STA !cosT
STA !cosT
STY $2253
STY $2253
NOP
NOP
BRA $00
BRA $00
LDA $2307
LDA $2307
STA !sinT
STA !sinT
LDA #$FFF0 ; center and correct starting X/Y position
LDA #$FFF0 ; center and correct starting X/Y position
STA $2251
STA $2251
LDA !cosT
LDA !cosT
STA $2253
STA $2253
NOP
NOP
LDY !sinT
LDY !sinT
LDA $2306
LDA $2306
STA !rowX
STA !rowX
STA !rowY
STA !rowY
STY $2253
STY $2253
NOP
NOP
BRA $00
BRA $00
LDA $2306
LDA $2306
CLC
CLC
ADC !rowX
ADC !rowX
CLC
CLC
ADC #$1000
ADC #$1000
SEC
SEC
SBC !cosT
SBC !cosT
STA !rowX
STA !rowX
STA !X
STA !X
LDA !rowY
LDA !rowY
SEC
SEC
SBC $2306
SBC $2306
CLC
CLC
ADC #$1000
ADC #$1000
CLC
CLC
ADC !sinT
ADC !sinT
STA !rowY
STA !rowY
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
STA !Y
TAY
STZ !Pointer ; Clear source bitmap pointer
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
SEP #$10 ; XY 8-bit
LDA #!DestVRAM
STA !Pointer
LDA #!DestVRAM>>8
STA !Pointer+1
PHB
PHB
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
LDX #
$40
PEA
$40
40
PHX
PLB
PLB
PLB
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
ST
Z $0
2
LDA #$0030 ;high byte
ST
A !X+
2
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
LD
Y
#$
1F
LD
A
#$
001F
STA $1E
.Y_Loop
.Y_Loop
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
STY $1F
LD
X
#$
001F
LD
Y
#$
1F
CLC
.X_Loop
.X_Loop
LDA !X
LDA !X
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
CLC
ADC !cosT
ADC !cosT
STA !X
STA !X
CMP #$2000
CMP #$2000
BCS .contX_Loop1
BCS .contX_Loop1
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
AND #$FF00
STA $00
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
LDA !Y
TYA
SEC
SEC
SBC !sinT
SBC !sinT
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
STA !
Y
TA
Y
CMP #$2000
CMP #$2000
BCS .contX_Loop2
BCS .contX_Loop2
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
AND #$
F
F00
AND #$
1
F00
LSR
LSR
LSR
LSR
LSR
LSR
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
ADC
$0
1
ADC
!X+
1
REP #$10
STA !Pointer2
TAX
SEP #$20
SEP #$20
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
LDA
$3000,x ;$403000
LDA
(
!Pointer
2)
LDX
!Pointer
STA
[!Pointer]
STA
!DestVRAM,X
REP #$
21
SEP #$10
REP #$
20
.contX_Loop2
.contX_Loop2
INC !Pointer
INC !Pointer
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
DE
Y
DE
X
BPL .X_Loop
BPL .X_Loop
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
LDY $1F
LDA !rowX
LDA !rowX
CLC
CLC
ADC !sinT
ADC !sinT
STA !rowX
STA !rowX
STA !X
STA !X
LDA !rowY
LDA !rowY
CLC
CLC
ADC !cosT
ADC !cosT
STA !rowY
STA !rowY
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
STA !
Y
TA
Y
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
DE
Y
DE
C $1E
BPL .Y_Loop
BPL .Y_Loop
SEP #$30
SEP #$30
PLB
PLB
PLD
PLD
PLP
PLP
RTS
RTS
.contX_Loop1
.contX_Loop1
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
LDA !Y
TYA
SBC !sinT
SBC !sinT
कॉपी
कॉपी हुआ
कॉपी
कॉपी हुआ
STA !
Y
TA
Y
BRA .contX_Loop2
BRA .contX_Loop2
CosTable:
CosTable:
dw $0100,$0100,$0100,$00FF,$00FF,$00FE,$00FD,$00FC,$00FB,$00FA,$00F8,$00F7,$00F5,$00F3,$00F1,$00EF
dw $0100,$0100,$0100,$00FF,$00FF,$00FE,$00FD,$00FC,$00FB,$00FA,$00F8,$00F7,$00F5,$00F3,$00F1,$00EF
dw $00ED,$00EA,$00E7,$00E5,$00E2,$00DF,$00DC,$00D8,$00D5,$00D1,$00CE,$00CA,$00C6,$00C2,$00BE,$00B9
dw $00ED,$00EA,$00E7,$00E5,$00E2,$00DF,$00DC,$00D8,$00D5,$00D1,$00CE,$00CA,$00C6,$00C2,$00BE,$00B9
dw $00B5,$00B1,$00AC,$00A7,$00A2,$009D,$0098,$0093,$008E,$0089,$0084,$007E,$0079,$0073,$006D,$0068
dw $00B5,$00B1,$00AC,$00A7,$00A2,$009D,$0098,$0093,$008E,$0089,$0084,$007E,$0079,$0073,$006D,$0068
dw $0062,$005C,$0056,$0050,$004A,$0044,$003E,$0038,$0032,$002C,$0026,$001F,$0019,$0013,$000D,$0006
dw $0062,$005C,$0056,$0050,$004A,$0044,$003E,$0038,$0032,$002C,$0026,$001F,$0019,$0013,$000D,$0006
dw $0000,$FFFA,$FFF3,$FFED,$FFE7,$FFE1,$FFDA,$FFD4,$FFCE,$FFC8,$FFC2,$FFBC,$FFB6,$FFB0,$FFAA,$FFA4
dw $0000,$FFFA,$FFF3,$FFED,$FFE7,$FFE1,$FFDA,$FFD4,$FFCE,$FFC8,$FFC2,$FFBC,$FFB6,$FFB0,$FFAA,$FFA4
dw $FF9E,$FF98,$FF93,$FF8D,$FF87,$FF82,$FF7C,$FF77,$FF72,$FF6D,$FF68,$FF63,$FF5E,$FF59,$FF54,$FF4F
dw $FF9E,$FF98,$FF93,$FF8D,$FF87,$FF82,$FF7C,$FF77,$FF72,$FF6D,$FF68,$FF63,$FF5E,$FF59,$FF54,$FF4F
dw $FF4B,$FF47,$FF42,$FF3E,$FF3A,$FF36,$FF32,$FF2F,$FF2B,$FF28,$FF24,$FF21,$FF1E,$FF1B,$FF19,$FF16
dw $FF4B,$FF47,$FF42,$FF3E,$FF3A,$FF36,$FF32,$FF2F,$FF2B,$FF28,$FF24,$FF21,$FF1E,$FF1B,$FF19,$FF16
dw $FF13,$FF11,$FF0F,$FF0D,$FF0B,$FF09,$FF08,$FF06,$FF05,$FF04,$FF03,$FF02,$FF01,$FF01,$FF00,$FF00
dw $FF13,$FF11,$FF0F,$FF0D,$FF0B,$FF09,$FF08,$FF06,$FF05,$FF04,$FF03,$FF02,$FF01,$FF01,$FF00,$FF00
dw $FF00,$FF00,$FF00,$FF01,$FF01,$FF02,$FF03,$FF04,$FF05,$FF06,$FF08,$FF09,$FF0B,$FF0D,$FF0F,$FF11
dw $FF00,$FF00,$FF00,$FF01,$FF01,$FF02,$FF03,$FF04,$FF05,$FF06,$FF08,$FF09,$FF0B,$FF0D,$FF0F,$FF11
dw $FF13,$FF16,$FF19,$FF1B,$FF1E,$FF21,$FF24,$FF28,$FF2B,$FF2F,$FF32,$FF36,$FF3A,$FF3E,$FF42,$FF47
dw $FF13,$FF16,$FF19,$FF1B,$FF1E,$FF21,$FF24,$FF28,$FF2B,$FF2F,$FF32,$FF36,$FF3A,$FF3E,$FF42,$FF47
dw $FF4B,$FF4F,$FF54,$FF59,$FF5E,$FF63,$FF68,$FF6D,$FF72,$FF77,$FF7C,$FF82,$FF87,$FF8D,$FF93,$FF98
dw $FF4B,$FF4F,$FF54,$FF59,$FF5E,$FF63,$FF68,$FF6D,$FF72,$FF77,$FF7C,$FF82,$FF87,$FF8D,$FF93,$FF98
dw $FF9E,$FFA4,$FFAA,$FFB0,$FFB6,$FFBC,$FFC2,$FFC8,$FFCE,$FFD4,$FFDA,$FFE1,$FFE7,$FFED,$FFF3,$FFFA
dw $FF9E,$FFA4,$FFAA,$FFB0,$FFB6,$FFBC,$FFC2,$FFC8,$FFCE,$FFD4,$FFDA,$FFE1,$FFE7,$FFED,$FFF3,$FFFA
dw $0000,$0006,$000D,$0013,$0019,$001F,$0026,$002C,$0032,$0038,$003E,$0044,$004A,$0050,$0056,$005C
dw $0000,$0006,$000D,$0013,$0019,$001F,$0026,$002C,$0032,$0038,$003E,$0044,$004A,$0050,$0056,$005C
dw $0062,$0068,$006D,$0073,$0079,$007E,$0084,$0089,$008E,$0093,$0098,$009D,$00A2,$00A7,$00AC,$00B1
dw $0062,$0068,$006D,$0073,$0079,$007E,$0084,$0089,$008E,$0093,$0098,$009D,$00A2,$00A7,$00AC,$00B1
dw $00B5,$00B9,$00BE,$00C2,$00C6,$00CA,$00CE,$00D1,$00D5,$00D8,$00DC,$00DF,$00E2,$00E5,$00E7,$00EA
dw $00B5,$00B9,$00BE,$00C2,$00C6,$00CA,$00CE,$00D1,$00D5,$00D8,$00DC,$00DF,$00E2,$00E5,$00E7,$00EA
dw $00ED,$00EF,$00F1,$00F3,$00F5,$00F7,$00F8,$00FA,$00FB,$00FC,$00FD,$00FE,$00FF,$00FF,$0100,$0100
dw $00ED,$00EF,$00F1,$00F3,$00F5,$00F7,$00F8,$00FA,$00FB,$00FC,$00FD,$00FE,$00FF,$00FF,$0100,$0100
सेव किए गए Diffs
ऑरिजनल टेक्स्ट
फ़ाइल खोलें
;;====================================;; ;; SA-1 32x32 Rotation Routine ;;====================================;; ;;====================================;; ;; How to Use: ;; 1. Put Graphics in !Source ;; 2. JSR to SUB_ROTATE ;; 3. Update contents of !DestBWRAM ;; to VRAM using CDMA Type #1, 4BPP, ;; 32 horizontal, 512 bytes. ;;====================================;; ;; Destination BW-RAM "Virtual RAM" & BW-RAM !DestVRAM = $604000 ; Dest VRAM is same as BWRAM, but each byte is 4-bits only. ; i.e $40:0000 = $60:0000 | ($60:0001 << 4) !DestBWRAM = $402000 ;; RAM Definitions !Degress = $6000 ; #$00 to #$FF ($00 = 0 degress) !Scale = $6001 ; #$0000 to #$7FFF ($0100 = 100%) ;; Stracth RAM !cosT = $04 !sinT = $06 !rowX = $08 !rowY = $0A !X = $0C !Y = $0E !Pointer = $14 ;===================== SUB_ROTATE: PHP PHD REP #$30 ;| 16-bit AXY LDA #$3100 TCD LDA !Degress ;\ Calculate AND #$00FF ;| Cos & Sin values ASL ;| TAX ;| LDA.w CosTable,X ;| STA !cosT ;| TXA ;| CLC ;| ADC #$0180 ;| AND #$01FE ;| TAX ;| LDA.w CosTable,X ;| STA !sinT ;/ STZ $2250 ; scale cos/sin LDA !Scale STA $2251 LDA !cosT STA $2253 NOP LDY !sinT LDA $2307 STA !cosT STY $2253 NOP BRA $00 LDA $2307 STA !sinT LDA #$FFF0 ; center and correct starting X/Y position STA $2251 LDA !cosT STA $2253 NOP LDY !sinT LDA $2306 STA !rowX STA !rowY STY $2253 NOP BRA $00 LDA $2306 CLC ADC !rowX CLC ADC #$1000 SEC SBC !cosT STA !rowX STA !X LDA !rowY SEC SBC $2306 CLC ADC #$1000 CLC ADC !sinT STA !rowY STA !Y STZ !Pointer ; Clear source bitmap pointer SEP #$10 ; XY 8-bit PHB LDX #$40 PHX PLB STZ $02 LDY #$1F .Y_Loop STY $1F LDY #$1F .X_Loop LDA !X CLC ADC !cosT STA !X CMP #$2000 BCS .contX_Loop1 AND #$FF00 STA $00 LDA !Y SEC SBC !sinT STA !Y CMP #$2000 BCS .contX_Loop2 AND #$FF00 LSR LSR LSR ADC $01 REP #$10 TAX SEP #$20 LDA $3000,x ;$403000 LDX !Pointer STA !DestVRAM,X SEP #$10 REP #$20 .contX_Loop2 INC !Pointer DEY BPL .X_Loop LDY $1F LDA !rowX CLC ADC !sinT STA !rowX STA !X LDA !rowY CLC ADC !cosT STA !rowY STA !Y DEY BPL .Y_Loop SEP #$30 PLB PLD PLP RTS .contX_Loop1 LDA !Y SBC !sinT STA !Y BRA .contX_Loop2 CosTable: dw $0100,$0100,$0100,$00FF,$00FF,$00FE,$00FD,$00FC,$00FB,$00FA,$00F8,$00F7,$00F5,$00F3,$00F1,$00EF dw $00ED,$00EA,$00E7,$00E5,$00E2,$00DF,$00DC,$00D8,$00D5,$00D1,$00CE,$00CA,$00C6,$00C2,$00BE,$00B9 dw $00B5,$00B1,$00AC,$00A7,$00A2,$009D,$0098,$0093,$008E,$0089,$0084,$007E,$0079,$0073,$006D,$0068 dw $0062,$005C,$0056,$0050,$004A,$0044,$003E,$0038,$0032,$002C,$0026,$001F,$0019,$0013,$000D,$0006 dw $0000,$FFFA,$FFF3,$FFED,$FFE7,$FFE1,$FFDA,$FFD4,$FFCE,$FFC8,$FFC2,$FFBC,$FFB6,$FFB0,$FFAA,$FFA4 dw $FF9E,$FF98,$FF93,$FF8D,$FF87,$FF82,$FF7C,$FF77,$FF72,$FF6D,$FF68,$FF63,$FF5E,$FF59,$FF54,$FF4F dw $FF4B,$FF47,$FF42,$FF3E,$FF3A,$FF36,$FF32,$FF2F,$FF2B,$FF28,$FF24,$FF21,$FF1E,$FF1B,$FF19,$FF16 dw $FF13,$FF11,$FF0F,$FF0D,$FF0B,$FF09,$FF08,$FF06,$FF05,$FF04,$FF03,$FF02,$FF01,$FF01,$FF00,$FF00 dw $FF00,$FF00,$FF00,$FF01,$FF01,$FF02,$FF03,$FF04,$FF05,$FF06,$FF08,$FF09,$FF0B,$FF0D,$FF0F,$FF11 dw $FF13,$FF16,$FF19,$FF1B,$FF1E,$FF21,$FF24,$FF28,$FF2B,$FF2F,$FF32,$FF36,$FF3A,$FF3E,$FF42,$FF47 dw $FF4B,$FF4F,$FF54,$FF59,$FF5E,$FF63,$FF68,$FF6D,$FF72,$FF77,$FF7C,$FF82,$FF87,$FF8D,$FF93,$FF98 dw $FF9E,$FFA4,$FFAA,$FFB0,$FFB6,$FFBC,$FFC2,$FFC8,$FFCE,$FFD4,$FFDA,$FFE1,$FFE7,$FFED,$FFF3,$FFFA dw $0000,$0006,$000D,$0013,$0019,$001F,$0026,$002C,$0032,$0038,$003E,$0044,$004A,$0050,$0056,$005C dw $0062,$0068,$006D,$0073,$0079,$007E,$0084,$0089,$008E,$0093,$0098,$009D,$00A2,$00A7,$00AC,$00B1 dw $00B5,$00B9,$00BE,$00C2,$00C6,$00CA,$00CE,$00D1,$00D5,$00D8,$00DC,$00DF,$00E2,$00E5,$00E7,$00EA dw $00ED,$00EF,$00F1,$00F3,$00F5,$00F7,$00F8,$00FA,$00FB,$00FC,$00FD,$00FE,$00FF,$00FF,$0100,$0100
परिवर्तित टेक्स्ट
फ़ाइल खोलें
;;====================================;; ;; SA-1 32x32 Rotation Routine ;;====================================;; ;;====================================;; ;; How to Use: ;; 1. Put Graphics in !Source ;; 2. JSR to SUB_ROTATE ;; 3. Update contents of !DestBWRAM ;; to VRAM using CDMA Type #1, 4BPP, ;; 32 horizontal, 512 bytes. ;;====================================;; ;; Destination BW-RAM "Virtual RAM" & BW-RAM !DestVRAM = $604000 ; Dest VRAM is same as BWRAM, but each byte is 4-bits only. ; i.e $40:0000 = $60:0000 | ($60:0001 << 4) !DestBWRAM = $402000 ;; RAM Definitions !Degress = $6000 ; #$00 to #$FF ($00 = 0 degress) !Scale = $6001 ; #$0000 to #$7FFF ($0100 = 100%) ;; Stracth RAM !cosT = $04 !sinT = $06 !rowX = $08 !rowY = $0A !X = $00 !Y = $0E !Pointer = $14 !Pointer2 = $17 ;===================== SUB_ROTATE: PHP PHD REP #$30 ;| 16-bit AXY LDA #$3100 TCD LDA !Degress ;\ Calculate AND #$00FF ;| Cos & Sin values ASL ;| TAX ;| LDA.w CosTable,X ;| STA !cosT ;| TXA ;| CLC ;| ADC #$0180 ;| AND #$01FE ;| TAX ;| LDA.w CosTable,X ;| STA !sinT ;/ STZ $2250 ; scale cos/sin LDA !Scale STA $2251 LDA !cosT STA $2253 NOP LDY !sinT LDA $2307 STA !cosT STY $2253 NOP BRA $00 LDA $2307 STA !sinT LDA #$FFF0 ; center and correct starting X/Y position STA $2251 LDA !cosT STA $2253 NOP LDY !sinT LDA $2306 STA !rowX STA !rowY STY $2253 NOP BRA $00 LDA $2306 CLC ADC !rowX CLC ADC #$1000 SEC SBC !cosT STA !rowX STA !X LDA !rowY SEC SBC $2306 CLC ADC #$1000 CLC ADC !sinT STA !rowY TAY LDA #!DestVRAM STA !Pointer LDA #!DestVRAM>>8 STA !Pointer+1 PHB PEA $4040 PLB PLB LDA #$0030 ;high byte STA !X+2 LDA #$001F STA $1E .Y_Loop LDX #$001F CLC .X_Loop LDA !X ADC !cosT STA !X CMP #$2000 BCS .contX_Loop1 TYA SEC SBC !sinT TAY CMP #$2000 BCS .contX_Loop2 AND #$1F00 LSR LSR LSR ADC !X+1 STA !Pointer2 SEP #$20 LDA (!Pointer2) STA [!Pointer] REP #$21 .contX_Loop2 INC !Pointer DEX BPL .X_Loop LDA !rowX CLC ADC !sinT STA !rowX STA !X LDA !rowY CLC ADC !cosT STA !rowY TAY DEC $1E BPL .Y_Loop SEP #$30 PLB PLD PLP RTS .contX_Loop1 TYA SBC !sinT TAY BRA .contX_Loop2 CosTable: dw $0100,$0100,$0100,$00FF,$00FF,$00FE,$00FD,$00FC,$00FB,$00FA,$00F8,$00F7,$00F5,$00F3,$00F1,$00EF dw $00ED,$00EA,$00E7,$00E5,$00E2,$00DF,$00DC,$00D8,$00D5,$00D1,$00CE,$00CA,$00C6,$00C2,$00BE,$00B9 dw $00B5,$00B1,$00AC,$00A7,$00A2,$009D,$0098,$0093,$008E,$0089,$0084,$007E,$0079,$0073,$006D,$0068 dw $0062,$005C,$0056,$0050,$004A,$0044,$003E,$0038,$0032,$002C,$0026,$001F,$0019,$0013,$000D,$0006 dw $0000,$FFFA,$FFF3,$FFED,$FFE7,$FFE1,$FFDA,$FFD4,$FFCE,$FFC8,$FFC2,$FFBC,$FFB6,$FFB0,$FFAA,$FFA4 dw $FF9E,$FF98,$FF93,$FF8D,$FF87,$FF82,$FF7C,$FF77,$FF72,$FF6D,$FF68,$FF63,$FF5E,$FF59,$FF54,$FF4F dw $FF4B,$FF47,$FF42,$FF3E,$FF3A,$FF36,$FF32,$FF2F,$FF2B,$FF28,$FF24,$FF21,$FF1E,$FF1B,$FF19,$FF16 dw $FF13,$FF11,$FF0F,$FF0D,$FF0B,$FF09,$FF08,$FF06,$FF05,$FF04,$FF03,$FF02,$FF01,$FF01,$FF00,$FF00 dw $FF00,$FF00,$FF00,$FF01,$FF01,$FF02,$FF03,$FF04,$FF05,$FF06,$FF08,$FF09,$FF0B,$FF0D,$FF0F,$FF11 dw $FF13,$FF16,$FF19,$FF1B,$FF1E,$FF21,$FF24,$FF28,$FF2B,$FF2F,$FF32,$FF36,$FF3A,$FF3E,$FF42,$FF47 dw $FF4B,$FF4F,$FF54,$FF59,$FF5E,$FF63,$FF68,$FF6D,$FF72,$FF77,$FF7C,$FF82,$FF87,$FF8D,$FF93,$FF98 dw $FF9E,$FFA4,$FFAA,$FFB0,$FFB6,$FFBC,$FFC2,$FFC8,$FFCE,$FFD4,$FFDA,$FFE1,$FFE7,$FFED,$FFF3,$FFFA dw $0000,$0006,$000D,$0013,$0019,$001F,$0026,$002C,$0032,$0038,$003E,$0044,$004A,$0050,$0056,$005C dw $0062,$0068,$006D,$0073,$0079,$007E,$0084,$0089,$008E,$0093,$0098,$009D,$00A2,$00A7,$00AC,$00B1 dw $00B5,$00B9,$00BE,$00C2,$00C6,$00CA,$00CE,$00D1,$00D5,$00D8,$00DC,$00DF,$00E2,$00E5,$00E7,$00EA dw $00ED,$00EF,$00F1,$00F3,$00F5,$00F7,$00F8,$00FA,$00FB,$00FC,$00FD,$00FE,$00FF,$00FF,$0100,$0100
अंतर खोजें