Dead Hackers Society
Other BBSes »
 
 
Demoscene  Coding  CT60  Buy/sell

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


Reply to this message
Name:
Topic:
Anti-troll code:

Message:

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.
© 1994-2024 Dead Hackers Society Contact: Anders Eriksson