/[projet1]/public/atari/tools/MOULINEX/EXEC_MOD.S
Defence Force logotype

Contents of /public/atari/tools/MOULINEX/EXEC_MOD.S

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1389 - (show annotations)
Tue Mar 7 19:16:33 2017 UTC (2 years, 6 months ago) by dbug
File size: 813 byte(s)
Added Moulinex, old tool to convert MOD files to LOW format and vice versa
1 opt d-,w-,o+
2 output pres.prg
3 jmp ok
4 ; ds.b 100000 * c nul mais g pas le temps...
5 * securite pour reciopie
6 ok
7 * module player
8 pea debut(pc)
9 move #$26,-(sp)
10 trap #14
11 addq.l #6,sp
12 clr -(sp)
13 trap #1
14 debut
15
16 move #0,-(sp)
17 move.l #-1,-(sp)
18 move.l #-1,-(sp)
19 move #5,-(sp)
20 trap #14
21 lea 12(sp),sp
22
23 move #$2300,sr
24 lea $ffff8240.w,a6
25 move #$777,(a6)
26 moveq #6,d7
27 cou0
28 rept 3
29 move #$25,-(sp)
30 trap #14
31 addq.l #2,sp
32 endr
33 sub #$111,(a6)
34 dbra d7,cou0
35 * okay now exec mod file
36 move #$2700,sr
37 lea $7fffe,a7
38 lea file,a0
39 lea $80.w,a1
40 move.l #(ffile-file)/4,d0
41 .rec
42 move.l (a0)+,(a1)+
43 subq.l #1,d0
44 bne.s .rec
45 jsr $80.w
46 move #$700,$ffff8240.w
47 .toi
48 addq #1,$ffff8240.w
49 bra.s .toi
50 file
51 incbin f:\krom_mit.prg\pres.dat
52 ffile

  ViewVC Help
Powered by ViewVC 1.1.26