|
|
Atari coding BBS
Re: Lance's 50 KHz playroutine |
Posted by: ljbk
|
Mar,01.2013-17:36
|
Here is the rest of the message (i hope) that was cut by the display:
.mt_ana_code12
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy0,(a6)
move.w .mt_ch1_fetch,(a1)+
move.l .mt_ch1_fetch+2,(a1)+
move.w .mt_add10,(a1)+
rts
.mt_ana_code12_0
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy0,(a6)
move .mt_addq1,(a1)+
move.w .mt_ch1_fetch,(a1)+
move.l .mt_ch1_fetch+2,(a1)+
move.w .mt_add10,(a1)+
rts
.mt_ana_code13
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy0,(a6)
move.l .mt_ch01fetadd1,(a1)+
move.l .mt_ch01fetadd1+4,(a1)+
move.w .mt_add10,(a1)+
rts
.mt_ana_code11_2
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy0,(a6)
move .mt_addq0,(a1)+
move.l .mt_ch01fetadd1,(a1)+
move.l .mt_ch01fetadd1+4,(a1)+
move.w .mt_add10,(a1)+
rts
.mt_ana_code12_1
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy0,(a6)
move .mt_addq1,(a1)+
move.l .mt_ch01fetadd1,(a1)+
move.l .mt_ch01fetadd1+4,(a1)+
move.w .mt_add10,(a1)+
rts
.mt_ana_code12_2
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy0,(a6)
move .mt_addq0,(a1)+
move .mt_addq1,(a1)+
move.l .mt_ch01fetadd1,(a1)+
move.l .mt_ch01fetadd1+4,(a1)+
move.w .mt_add10,(a1)+
rts
.mt_ana_code2
* cmp.w #3,d0
* beq.s .mt_ana_code23
* cmp.w #2,d0
* beq.s .mt_ana_code22
cmp.w #%1010,d0 2 2
beq.s .mt_ana_code22_2
cmp.w #%1001,d0 2 1
beq.s .mt_ana_code22_1
cmp.w #%1000,d0 2 0
beq.s .mt_ana_code22_0
cmp.w #%0110,d0 1 2
beq.s .mt_ana_code21_2
cmp.w #%0101,d0 1 1
beq.s .mt_ana_code23
cmp.w #%0100,d0 1 0
beq.s .mt_ana_code22
cmp.w #%0010,d0 0 2
beq.s .mt_ana_code20_2
.mt_ana_code21
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy1,(a6)
move.w .mt_ch0_fetch,(a1)+
move.w .mt_add01,(a1)+
rts
.mt_ana_code20_2
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy1,(a6)
move .mt_addq0,(a1)+
move.w .mt_ch0_fetch,(a1)+
move.w .mt_add01,(a1)+
rts
.mt_ana_code22
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy1,(a6)
move.w .mt_ch1_fetch,(a1)+
move.l .mt_ch1_fetch+2,(a1)+
move.w .mt_add01,(a1)+
rts
.mt_ana_code22_0
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy1,(a6)
move .mt_addq1,(a1)+
move.w .mt_ch1_fetch,(a1)+
move.l .mt_ch1_fetch+2,(a1)+
move.w .mt_add01,(a1)+
rts
.mt_ana_code23
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy1,(a6)
move.l .mt_ch01fetadd1,(a1)+
move.l .mt_ch01fetadd1+4,(a1)+
move.w .mt_add01,(a1)+
rts
.mt_ana_code21_2
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy1,(a6)
move .mt_addq0,(a1)+
move.l .mt_ch01fetadd1,(a1)+
move.l .mt_ch01fetadd1+4,(a1)+
move.w .mt_add01,(a1)+
rts
.mt_ana_code22_1
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy1,(a6)
move .mt_addq1,(a1)+
move.l .mt_ch01fetadd1,(a1)+
move.l .mt_ch01fetadd1+4,(a1)+
move.w .mt_add01,(a1)+
rts
.mt_ana_code22_2
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy1,(a6)
move .mt_addq0,(a1)+
move .mt_addq1,(a1)+
move.l .mt_ch01fetadd1,(a1)+
move.l .mt_ch01fetadd1+4,(a1)+
move.w .mt_add01,(a1)+
rts
.mt_ana_code3
* cmp.w #3,d0
* beq.s .mt_ana_code33
* cmp.w #2,d0
* beq.s .mt_ana_code32
cmp.w #%1010,d0 2 2
beq.s .mt_ana_code32_2
cmp.w #%1001,d0 2 1
beq.s .mt_ana_code32_1
cmp.w #%1000,d0 2 0
beq.s .mt_ana_code32_0
cmp.w #%0110,d0 1 2
beq.s .mt_ana_code31_2
cmp.w #%0101,d0 1 1
beq.s .mt_ana_code33
cmp.w #%0100,d0 1 0
beq.s .mt_ana_code32
cmp.w #%0010,d0 0 2
beq.s .mt_ana_code30_2
.mt_ana_code31
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy1,(a6)
move.w .mt_ch0_fet_add,(a1)+
rts
.mt_ana_code30_2
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy1,(a6)
move .mt_addq0,(a1)+
move.w .mt_ch0_fet_add,(a1)+
rts
.mt_ana_code32
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy0,(a6)
move.w .mt_ch1_fet_add,(a1)+
move.l .mt_ch1_fet_add+2,(a1)+
rts
.mt_ana_code32_0
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy0,(a6)
move .mt_addq1,(a1)+
move.w .mt_ch1_fet_add,(a1)+
move.l .mt_ch1_fet_add+2,(a1)+
rts
.mt_ana_code33
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy0,(a6)
move.l .mt_ch01fetadd0,(a1)+
move.l .mt_ch01fetadd0+4,(a1)+
rts
.mt_ana_code31_2
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy0,(a6)
move .mt_addq0,(a1)+
move.l .mt_ch01fetadd0,(a1)+
move.l .mt_ch01fetadd0+4,(a1)+
rts
.mt_ana_code32_1
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy0,(a6)
move .mt_addq1,(a1)+
move.l .mt_ch01fetadd0,(a1)+
move.l .mt_ch01fetadd0+4,(a1)+
rts
.mt_ana_code32_2
moveq #0,d4
moveq #1,d1
lea .mt_copy,a6
move.w .mt_copy0,(a6)
move .mt_addq0,(a1)+
move .mt_addq1,(a1)+
move.l .mt_ch01fetadd0,(a1)+
move.l .mt_ch01fetadd0+4,(a1)+
rts
.mt_copy
move.b d2,(sp)+
.mt_copy0
move.b d0,(sp)+
.mt_copy1
move.b d1,(sp)+
.mt_copy2
move.b d2,(sp)+
.mt_ch0_fetch
move.b (a0)+,d0
.mt_ch0_fet_add
add.b (a0)+,d1
.mt_ch1_fetch
move.b (a1)+,d1
move.l d1,a2
move.b (a2),d1
.mt_ch1_fet_add
move.b (a1)+,d1
move.l d1,a2
add.b (a2),d0
.mt_ch01fetadd0
move.b (a0)+,d0
move.b (a1)+,d1
move.l d1,a2
add.b (a2),d0
.mt_ch01fetadd1
move.b (a0)+,d0
move.b (a1)+,d1
move.l d1,a2
move.b (a2),d1
.mt_add01
add.b d0,d1
.mt_add10
add.b d1,d0
.mt_add012
move.b d0,d2
add.b d1,d2
.mt_addq0
addq #1,a0
.mt_addq1
addq #1,a1
; Ok. That's it.
; I have not tried it so don't blame me if it does not work.
; It should be pretty close to work if it does not.
;
; Time for you to test it if you are interested.
;
; Enjoy it.
;
; Paulo Simoes / 1st March 2013
;
;------------------------------------------------------------------------
|
[All messages in this thread] [Start new thread]
Topic
|
Posted by
|
Date
|
Lance's 50khz playroutine
|
Bod/STAX
|
Feb,18.2013-17:35
|
Re: Lance's 50khz playroutine
|
gwEm
|
Feb,18.2013-20:42
|
Re: Lance's 50khz playroutine
|
ggn
|
Feb,18.2013-20:53
|
Re: Lance's 50khz playroutine
|
Bod/STAX
|
Feb,18.2013-21:28
|
Re: Lance's 50khz playroutine
|
gwEm
|
Feb,18.2013-23:05
|
Re: Lance's 50khz playroutine
|
gwEm
|
Feb,18.2013-23:16
|
Re: Lance's 50khz playroutine
|
gwEm
|
Feb,19.2013-02:21
|
Re: Lance's 50khz playroutine
|
Bod/STAX
|
Feb,22.2013-17:08
|
Re: Lance's 50khz playroutine
|
gwEm
|
Feb,25.2013-20:36
|
Re: Lance's 50khz playroutine
|
ljbk
|
Feb,25.2013-23:54
|
Re: Lance's 50khz playroutine
|
Bod/STAX
|
Feb,26.2013-11:23
|
Re: Lance's 50khz playroutine
|
evil
|
Feb,26.2013-12:04
|
Re: Lance's 50khz playroutine
|
ljbk
|
Feb,26.2013-14:45
|
Re: Lance's 50khz playroutine
|
ljbk
|
Feb,26.2013-21:46
|
Re: Lance's 50khz playroutine
|
evil
|
Feb,27.2013-17:01
|
Re: Lance's 50khz playroutine
|
ljbk
|
Feb,28.2013-13:24
|
Re: Lance's 50khz playroutine
|
ljbk
|
Feb,28.2013-13:28
|
Re: Lance's 50khz playroutine
|
gwEm
|
Feb,28.2013-14:07
|
Re: Lance's 50khz playroutine
|
Bod/STAX
|
Feb,28.2013-21:41
|
Re: Lance's 50khz playroutine
|
ljbk
|
Feb,28.2013-22:42
|
Sem assunto
|
ljbk
|
Mar,01.2013-13:27
|
Lance's 50 KHz playroutine
|
ljbk
|
Mar,01.2013-15:49
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,01.2013-17:34
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,01.2013-17:36
|
Re: Lance's 50 KHz playroutine
|
evil
|
Mar,01.2013-19:03
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,02.2013-00:18
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,04.2013-17:39
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,06.2013-02:21
|
Re: Lance's 50 KHz playroutine
|
gwEm
|
Mar,06.2013-13:23
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,06.2013-15:57
|
Re: Lance's 50 KHz playroutine
|
evil
|
Mar,06.2013-16:48
|
Re: Lance's 50 KHz playroutine
|
ggn
|
Mar,06.2013-17:31
|
Re: Lance's 50 KHz playroutine
|
evil
|
Mar,06.2013-17:48
|
Re: Lance's 50 KHz playroutine
|
ggn
|
Mar,06.2013-23:54
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,06.2013-18:18
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,06.2013-21:51
|
Re: Lance's 50 KHz playroutine
|
ggn
|
Mar,06.2013-23:59
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,07.2013-02:31
|
Re: Lance's 50 KHz playroutine
|
ggn
|
Mar,07.2013-12:34
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,07.2013-14:00
|
Re: Lance's 50 KHz playroutine
|
gwEm
|
Mar,07.2013-18:00
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,07.2013-18:51
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,08.2013-02:10
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,08.2013-13:12
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,09.2013-00:17
|
Re: Lance's 50 KHz playroutine
|
ljbk
|
Mar,06.2013-19:28
|
Re: Lance's 50khz playroutine
|
ljbk
|
Feb,28.2013-15:47
|
Re: Lance's 50khz playroutine
|
ljbk
|
Feb,28.2013-15:51
|
Re: Lance's 50khz playroutine
|
ljbk
|
Feb,28.2013-18:56
|
Re: Lance's 50khz playroutine
|
nativ
|
Mar,24.2013-00:07
|
Re: Lance's 50khz playroutine
|
ljbk
|
Apr,13.2013-01:21
|
Re: Lance's 50khz playroutine
|
ljbk
|
Apr,16.2013-16:12
|
Re: Lance's 50khz playroutine
|
ljbk
|
Apr,19.2013-12:14
|
Re: Lance's 50khz playroutine
|
ljbk
|
Apr,22.2013-14:54
|
Re: Lance's 50khz playroutine
|
ljbk
|
Apr,25.2013-19:03
|
Re: Lance's 50khz playroutine
|
ggn
|
Apr,25.2013-21:03
|
Re: Lance's 50khz playroutine
|
ljbk
|
Apr,26.2013-09:18
|
Re: Lance's 50khz playroutine
|
ggn
|
Apr,26.2013-11:28
|
Re: Lance's 50khz playroutine
|
ljbk
|
Apr,26.2013-12:13
|
Re: Lance's 50khz playroutine
|
ljbk
|
May,01.2013-22:30
|
Re: Lance's 50khz playroutine
|
evil
|
May,02.2013-14:46
|
Re: Lance's 50khz playroutine
|
gwEm
|
May,02.2013-20:00
|
Re: Lance's 50khz playroutine
|
Damo
|
May,02.2013-21:00
|
Re: Lance's 50khz playroutine
|
evil
|
May,03.2013-13:00
|
Re: Lance's 50khz playroutine
|
ljbk
|
May,08.2013-17:50
|
Re: Lance's 50khz playroutine
|
Cyprian
|
May,10.2013-13:01
|
Re: Lance's 50khz playroutine
|
ljbk
|
May,11.2013-00:22
|
Re: Lance's 50khz playroutine
|
ljbk
|
May,11.2013-08:54
|
Re: Lance's 50khz playroutine
|
Cyprian
|
May,11.2013-15:18
|
Re: Lance's 50khz playroutine
|
ljbk
|
May,11.2013-15:35
|
Re: Lance's 50khz playroutine
|
Lance
|
May,23.2013-00:02
|
Re: Lance's 50khz playroutine
|
ljbk
|
May,23.2013-14:44
|
Re: Lance's 50khz playroutine
|
Bod/STAX
|
Jun,06.2013-20:32
|
Re: Lance's 50khz playroutine
|
Bod/STAX
|
Jun,06.2013-20:39
|
Re: Lance's 50khz playroutine
|
ljbk
|
Jun,07.2013-00:09
|
Re: Lance's 50khz playroutine
|
Bod/STAX
|
Jun,07.2013-18:38
|
Re: Lance's 50khz playroutine
|
ljbk
|
Jun,07.2013-21:46
|
What's the anti-troll code? That's your personal code to be able to add comments and messages on the dhs.nu site.
Don't have a code or forgot it? Fix it here.
|
|
|