1 2 3 4 ********************** 5 * * 6 * COMMUTEUR DOS/CMD * 7 * (C)1989 BY DECKARD * 8 * * 9 ********************** 10 * 11 * $300-$3CF DISPO 030C: 60 31 RETOUR_MACRO RTS ; ADR EN PRINC 033A: 01 64 QUART DFB 1 ; NATURE DU LIEU (0=DONJON/1=EXTERIEUR) 033B: 01 65 NMAP DFB 1 ; NO DE LA NOUVELLE CARTE (ICI CARTE 2) 033C: 01 66 OMAP DFB 1 ; OLD MAP (SERT POUR LE &DEL) 033D: 00 67 MONSTRE DFB 0 033E: 00 68 CMD DFB 0 033F: 00 69 LIEU DFB 0 0340: 00 70 COPYLIEU DFB 0 0341: 00 71 PROBA DFB 0 0342: 00 72 PCOMB DFB 0 ; POURCENTAGE DE PRESENCE DU MONSTRE 0343: 00 73 MBUTE DFB 0 ; MONSTRE TUE=1/MONSTRE VIVANT=0 0344: 00 74 DIVERS DFB 0 0345: 00 75 NATURE DFB 0 0346: 05 0F 64 76 POURCENT DFB 5,15,100 82 83 * RETOUR DE MEMOIRE AUXILIAIRE 84 0349: 00 00 00 85 STRING DS 17,0 ; CHAINE DE CARACTERES+00 034C: 00 00 00 00 00 00 00 00 0354: 00 00 00 00 00 00 035A: 00 00 00 86 VALS DS 70,0 ; NOMBRES DIVERS 035D: 00 00 00 00 00 00 00 00 0365: 00 00 00 00 00 00 00 00 036D: 00 00 00 00 00 00 00 00 0375: 00 00 00 00 00 00 00 00 037D: 00 00 00 00 00 00 00 00 0385: 00 00 00 00 00 00 00 00 038D: 00 00 00 00 00 00 00 00 0395: 00 00 00 00 00 00 00 00 039D: 00 00 00 87 88 ******************************** 89 90 * PASSAGE EN AUX 91 * X=CMD/Y=ARGUMENT 92 03A0: A9 00 93 SWAP_AUX LDA #0 Object saved as USER.COMMUT2,A$0300,L$00CD --End assembly, 205 bytes, Errors: 0