Apple-2-SW/antoine-source
1
0
Fork 0
mirror of https://github.com/antoinevignau/source.git synced 2025-02-01 02:33:39 +00:00
Code Issues Projects Releases Wiki Activity

optimisation MIDI

Browse Source
This commit is contained in:
Antoine Vignau 2024-01-09 08:15:00 +01:00
parent 6543222ccc
commit 57b84496d9
6 changed files with 21895 additions and 21887 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
leretour/apple2/fr/engine.s
View File

@ -160,8 +160,8 @@ RDKEY jsr CURSOR ; shows the cursor
jsr checkREPLAY
jsr printTEMPS
* jsr testENERGIE
* bcs RDKEY99
jsr testENERGIE
bcs RDKEY99
pha
PushWord #%00000000_00001000

BIN
leretour/apple2/fr/iigs
View File

Binary file not shown.

5
leretour/apple2/fr/iigs.s
View File

@ -238,7 +238,8 @@ okTOOL _HideMenuBar
sta ptrSCREEN+2
okSHADOW
jsr initMIDI
*-----------------------------------
* C'EST L'HEURE DE L'INTRODUCTION
*-----------------------------------
@ -249,6 +250,8 @@ okSHADOW
* IL FAUT JOUER MAINTENANT
*-----------------------------------
jsr doSOUNDON
sei
PushLong #intTIME
_SetHeartBeat

43770
leretour/apple2/fr/iigs_S01_iigs_Output.txt
View File

File diff suppressed because it is too large Load Diff

3
leretour/apple2/fr/midi.s
View File

@ -296,6 +296,7 @@ playMUSIC66 adc #$bdbd ; patched
_Locate
PullLong seqPlayRec
stz fgMIDI ; we are good!!!
cli ; end of the long init!
rts
@ -471,7 +472,7 @@ ptrBNK ds 4
*--- Flags
fgMIDI ds 2 ; can play MIDI if 0
fgMIDI dw 1 ; can play MIDI if 0
*--- Instruments

BIN
leretour/leretour.2mg
View File

Binary file not shown.