msx included

loderunner/source/LR.CODE.S

@@ -4230,7 +4230,7 @@ tblEDITADD	DA	editPLAY-1	; Play level
 	DA	editINIT-1	; Initialize
 	DA	editCLEARSCORE-1 ; Clear Score file
 	da	editOPEN-1	; Open levels
-	da	editRESTART-1 ; Restart gale
+	da	editRESTART-1 ; Restart game
 	da	editBYE-1	; Quit game
 
 *-------------------------------

loderunner/source/LR.EQUATES.S

@@ -3,7 +3,7 @@
 * (c) 1983, Broderbund Software
 * (s) 2014, Brutal Deluxe Software
 *
-
+* A2 MSX
 * 0 vide
 * 1 mur
 * 2 mur dur
@@ -15,6 +15,18 @@
 * 8 ennemi
 * 9 hŽros
 
+* MSX
+* 0 vide
+* 1 trappe
+* 2 mur
+* 3 mur dur
+* 4 liane
+* 5 echelle
+* 6 echelle invisible
+* 7 tresor
+* 8 ennemi
+* 9 heros
+
 * Sprite quand      heros ennemi tombe dans un trou :
 * - venant de gauche : 20 53 (35h)
 * - venant de droite : 19 54 (36h)

loderunner/source/LR.SPRITES2.S

@@ -9,16 +9,16 @@
 *--- Table of NEW sprites
 
 tblSPRITES2
-	da	spr200
+	da	spr200	; 0
-	da	spr201
+	da	spr201	; 1
-	da	spr202
+	da	spr202	; 2
-	da	spr203
+	da	spr203	; 3
-	da	spr204
+	da	spr204	; 4
-	da	spr205
+	da	spr205	; 5
-	da	spr206
+	da	spr206	; 6
-	da	spr207
+	da	spr207	; 7
-	da	spr208
+	da	spr208	; 8
-	da	spr209
+	da	spr209	; 9
 	da	spr20A
 	da	spr20B
 	da	spr20C

loderunner/source/_FileInformation.txt

@@ -1,2 +0,0 @@
-acs=Type(00),AuxType(0000),VersionCreate(70),MinVersion(BE),Access(E3),FolderInfo1(000000000000000000000000000000000000),FolderInfo2(000000000000000000000000000000000000)
-LodeRunner=Type(B3),AuxType(DB00),VersionCreate(70),MinVersion(BE),Access(E3),FolderInfo1(000000000000000000000000000000000000),FolderInfo2(000000000000000000000000000000000000)

loderunner/source/msx2apple.s

@@ -0,0 +1,105 @@
+*
+* Lode Runner
+* from MSX to A2
+*
+
+	mx	%11
+	org	$800
+	lst	off
+
+*---
+
+source	=	$1000
+destination	=	$4800
+nbLEVELS	=	50
+
+theLEVEL	=	$fd
+theLINE	=	$fe
+nibble	=	$ff
+
+*---
+
+	clc
+	xce
+	rep	#$30
+	
+	lda	#source
+	sta	readFROM+1
+	lda	#destination
+	sta	writeTO+1
+
+	sep	#$30
+	
+*---
+
+	stz	theLEVEL
+	
+outerLOOP	stz	theLINE
+	
+innerLOOP	ldx	#0
+]lp	jsr	readFROM
+	pha
+	and	#$0f
+	tay
+	lda	msx2apple,y
+	sta	nibble
+	pla
+	and	#$f0
+	lsr
+	lsr
+	lsr
+	lsr
+	tay
+	lda	msx2apple,y
+	asl
+	asl
+	asl
+	asl
+	ora	nibble
+	jsr	writeTO
+	inx
+	cpx	#14	; et non pas 28		
+	bcc	]lp
+
+	lda	readFROM+1	; next line
+	and	#$f0
+	clc
+	adc	#$10
+	sta	readFROM+1
+	
+	inc	theLINE
+	lda	theLINE
+	cmp	#16
+	bcc	innerLOOP
+
+	stz	readFROM+1
+	inc	readFROM+2	; next top line
+	
+	stz	writeTO+1
+	inc	writeTO+2
+
+	inc	theLEVEL
+	lda	theLEVEL
+	cmp	#nbLEVELS
+	bcc	outerLOOP
+	rts
+
+*---
+
+readFROM	lda	$bdbd
+	inc	readFROM+1
+	bne	readFROM1
+	inc	readFROM+2
+readFROM1	rts
+
+*---
+
+writeTO	sta	$bdbd
+	inc	writeTO+1
+	bne	writeTO1
+	inc	writeTO+2
+writeTO1	rts
+
+*--- Data
+
+msx2apple	hex	00,05,01,02,04,03,06,07,08,09