Use devpac 2.20 for this and newer sources. Use 2.00 for older sources.

Yes, this is incompatible! To work around that a global substitution
was done which garbled the source. Oh well does not assemble...
Also added new sound.
master
Georges Kesseler 2012-02-21 22:29:58 +01:00
parent c1f5c1ba42
commit 9230ac6ded
10 changed files with 596 additions and 516 deletions

Binary file not shown.

Binary file not shown.

Binary file not shown.

1060
PARADIST.S

File diff suppressed because it is too large Load Diff

52
diskwrit.s Executable file
View File

@ -0,0 +1,52 @@
**************************************
* *
* Write to disk by The Fate of ULM *
* *
**************************************
offset equ 28
sec_per_track equ 10
x:
move.w #0,-(sp)
move.w #7,-(sp)
trap #13
addq.l #4,sp
lea desttab(pc),a0
move.w #0,-(sp)
move.w (a0)+,d0
mulu #sec_per_track,d0
add.w (a0)+,d0
subq.w #1,d0
move.w d0,-(sp)
move.w (a0)+,-(sp)
pea buffer(pc)
move.w #3,-(sp)
move.w #4,-(sp)
trap #13
lea $0e(sp),sp
clr.w -(sp)
trap #1
********************************************************************************
; 1 word = destination track
; 2 word = destination sector
; 3 word = sector count
desttab:
dc.w 1,1,250
section data
buffer equ *+offset
incbin 'e:\paradist\p.bin'
section bss
ds.l 512
end

BIN
genst2.app Executable file

Binary file not shown.

BIN
genst2.inf Executable file

Binary file not shown.

BIN
includes/you1.dmn Executable file

Binary file not shown.

BIN
includes/you2.dmn Executable file

Binary file not shown.

BIN
monst2.prg Executable file

Binary file not shown.