Fractal sur To7

Tout ce qui concerne le logiciel original et sa sauvegarde avec entre autre la régénération des disquettes ou autres supports physiques.

Modérateurs : Papy.G, fneck, Carl

Répondre
jester3
Messages : 11
Inscription : 23 sept. 2013 13:03

Fractal sur To7

Message par jester3 »

Bonjour à tous
Je poste très rarement donc au passage j'en profite pour dire que j'apprécie parcourir les différents topics ici, en particulier les développements variés avec astuce, méthode et décontraction. J'en apprend tous les jours.
J'ai ici un souci avec ce fichier k7 apparemment pour To7 que j'ai récupéré ici il y a longtemps sans jamais avoir pu l'ouvrir sur DCM0T0, entre autres.
Le lien: http://www.planetemu.net/rom/thomson-to ... -198x-pd-b
J'ai donc essayé diverses machines MO5, TO7/70, TO9, tenté de renommer en .memo7 ou .rom, rien.
J'ai donc tenté run"" (erreur DS)et loadm"",,r (erreur FM)ainsi que run"cass:" 'erreur SN)et laodm"cass:",,r (FM error). Le système m'indique toutefois FOUND: fractals ASM.
J'ai pensé que le dump a pu être mal fait.J'ai ouvert avec LemAsm (pour les roms à la base j'ai renommé le fichier k7) et trouvé des points d'interrogation à certains octets...voici le copier colé à partir de HxD:

Code : Tout sélectionner

Offset(h) 00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F

00000000  FF FD FF FF FF FF FF FF FF FF FF FF 01 3C 00 14   ²          ☺<.¶
00000010  46 52 41 43 54 41 4C 53 41 53 4D 03 FF FF 00 00  FRACTALSASM♥  ..
00000020  00 00 00 00 46 7F ED FF FF FF FF FF FF FF FF FF  ....F⌂φ         
00000030  FF 01 3C 01 FF 4F F6 4C 44 58 F4 23 54 42 0D F7   ☺<☺ O÷LDX⌠#TB♪≈
00000040  4C 44 59 F4 23 30 0D F7 4A 53 52 F4 41 46 0D F7  LDY⌠#0♪≈JSR⌠AF♪≈
00000050  4C 44 41 F4 23 35 34 0D F7 53 54 41 F4 49 4E 41  LDA⌠#54♪≈STA⌠INA
00000060  2B 31 0D F7 4A 53 52 F4 49 4E 31 0D F7 4C 44 41  +1♪≈JSR⌠IN1♪≈LDA
00000070  F4 23 31 32 38 0D F7 53 55 42 42 F3 23 34 37 0D  ⌠#128♪≈SUBB≤#47♪
00000080  4F 31 F5 4C 53 52 41 0D F7 44 45 43 42 0D F7 42  O1⌡LSRA♪≈DECB♪≈B
00000090  4E 45 F4 4F 31 0D F7 53 54 41 F4 50 41 53 0D F7  NE⌠O1♪≈STA⌠PAS♪≈
000000A0  4A 53 52 F4 41 46 0D F7 4C 44 55 F4 23 48 41 55  JSR⌠AF♪≈LDU⌠#HAU
000000B0  0D F7 4A 53 52 F4 49 4E 32 0D F7 4A 53 52 F4 41  ♪≈JSR⌠IN2♪≈JSR⌠A
000000C0  46 0D F7 4C 44 55 F4 23 44 45 56 0D F7 4A 53 52  F♪≈LDU⌠#DEV♪≈JSR
000000D0  F4 49 4E 32 0D F7 4A 53 52 F4 41 46 0D F7 4C 44  ⌠IN2♪≈JSR⌠AF♪≈LD
000000E0  41 F4 23 35 31 0D F7 53 54 41 F4 49 4E 41 2B 31  A⌠#51♪≈STA⌠INA+1
000000F0  0D F7 4A 53 52 F4 49 4E 31 0D F7 53 55 42 42 F3  ♪≈JSR⌠IN1♪≈SUBB≤
00000100  23 34 37 0D F7 4C 44 41 F4 23 38 0D 4F 32 F5 4C  #47♪≈LDA⌠#8♪O2⌡L
00000110  53 4C 41 0D F7 44 45 43 42 0D F7 42 4E 45 F4 4F  SLA♪≈DECB♪≈BNE⌠O
00000120  32 0D F7 49 4E 43 41 0D F7 53 54 41 F4 54 41 49  2♪≈INCA♪≈STA⌠TAI
00000130  0D F7 4A 53 81 FF FF FF FF FF FF FF FF FF FF FF  ♪≈JSü           
00000140  01 3C 01 FF 52 F4 41 46 0D 4F 33 F5 4A 53 52 F4  ☺<☺ R⌠AF♪O3⌡JSR⌠
00000150  52 4E 44 0D F7 4A 53 52 F4 24 45 38 30 36 0D F7  RND♪≈JSR⌠$E806♪≈
00000160  43 4D 50 42 F3 23 33 32 0D F7 42 4E 45 F4 4F 33  CMPB≤#32♪≈BNE⌠O3
00000170  0D F7 4C 44 41 F4 48 41 55 0D F7 4C 53 52 41 0D  ♪≈LDA⌠HAU♪≈LSRA♪
00000180  F7 4C 53 52 41 0D F7 4C 53 52 41 0D F7 4C 53 52  ≈LSRA♪≈LSRA♪≈LSR
00000190  41 0D F7 53 54 41 F4 4E 0D F7 4A 53 52 F4 41 46  A♪≈STA⌠N♪≈JSR⌠AF
000001A0  0D F7 4C 44 55 F4 23 45 53 50 0D 4F 33 41 F4 43  ♪≈LDU⌠#ESP♪O3A⌠C
000001B0  4C 52 F4 2C 55 2B 0D F7 43 4D 50 55 F3 23 45 53  LR⌠,U+♪≈CMPU≤#ES
000001C0  50 2B 34 30 39 36 0D F7 42 4E 45 F4 4F 33 41 0D  P+4096♪≈BNE⌠O3A♪
000001D0  F7 43 4C 52 41 0D F7 53 54 41 F4 52 31 0D 4F 35  ≈CLRA♪≈STA⌠R1♪O5
000001E0  F5 43 4C 52 41 0D F7 53 54 41 F4 52 32 0D 4F 36  ⌡CLRA♪≈STA⌠R2♪O6
000001F0  F5 4C 44 41 F4 52 31 0D F7 4C 44 42 F4 54 41 49  ⌡LDA⌠R1♪≈LDB⌠TAI
00000200  0D F7 4D 55 4C 0D F7 41 44 44 44 F3 23 45 53 50  ♪≈MUL♪≈ADDD≤#ESP
00000210  0D F7 54 46 52 F4 44 2C 55 0D F7 4C 44 41 F4 52  ♪≈TFR⌠D,U♪≈LDA⌠R
00000220  32 0D F7 4C 45 41 55 F3 41 2C 55 0D 4F 37 F5 4A  2♪≈LEAU≤A,U♪O7⌡J
00000230  53 52 F4 52 4E 44 0D F7 4C 44 42 F4 2C 59 0D F7  SR⌠RND♪≈LDB⌠,Y♪≈
00000240  43 4D 50 68 FF FF FF FF FF FF FF FF FF FF 01 3C  CMPh          ☺<
00000250  01 FF 42 F3 48 41 55 0D F7 42 48 49 F4 4F 37 0D  ☺ B≤HAU♪≈BHI⌠O7♪
00000260  F7 43 4D 50 42 F3 4E 0D F7 42 4C 4F F4 4F 37 0D  ≈CMPB≤N♪≈BLO⌠O7♪
00000270  F7 53 54 42 F4 2C 55 0D F7 4C 44 41 F4 52 32 0D  ≈STB⌠,U♪≈LDA⌠R2♪
00000280  F7 41 44 44 41 F3 50 41 53 0D F7 53 54 41 F4 52  ≈ADDA≤PAS♪≈STA⌠R
00000290  32 0D F7 43 4D 50 41 F3 54 41 49 0D F7 42 4C 4F  2♪≈CMPA≤TAI♪≈BLO
000002A0  F4 4F 36 0D F7 4C 44 41 F4 52 31 0D F7 41 44 44  ⌠O6♪≈LDA⌠R1♪≈ADD
000002B0  41 F3 50 41 53 0D F7 53 54 41 F4 52 31 0D F7 43  A≤PAS♪≈STA⌠R1♪≈C
000002C0  4D 50 41 F3 54 41 49 0D F7 42 4C 4F F4 4F 35 0D  MPA≤TAI♪≈BLO⌠O5♪
000002D0  F7 4C 44 41 F4 23 34 38 0D F7 53 54 41 F4 43 42  ≈LDA⌠#48♪≈STA⌠CB
000002E0  0D 4F 38 F5 4C 44 58 F4 23 54 42 31 0D F7 4A 53  ♪O8⌡LDX⌠#TB1♪≈JS
000002F0  52 F4 41 46 0D F7 49 4E 43 F4 43 42 0D F7 4C 44  R⌠AF♪≈INC⌠CB♪≈LD
00000300  42 F4 43 42 0D F7 4A 53 52 F4 24 45 38 30 33 0D  B⌠CB♪≈JSR⌠$E803♪
00000310  F7 4A 53 52 F4 41 46 0D F7 4C 44 41 F4 50 41 53  ≈JSR⌠AF♪≈LDA⌠PAS
00000320  0D F7 4C 53 52 41 0D F7 53 54 41 F4 51 0D F7 53  ♪≈LSRA♪≈STA⌠Q♪≈S
00000330  54 41 F4 52 31 0D F7 4E 45 47 41 0D F7 53 54 41  TA⌠R1♪≈NEGA♪≈STA
00000340  F4 51 49 0D F7 4E 45 47 41 0D F7 4C 44 42 F4 54  ⌠QI♪≈NEGA♪≈LDB⌠T
00000350  41 58 FF FF FF FF FF FF FF FF FF FF 01 3C 01 FF  AX          ☺<☺ 
00000360  49 0D F7 4D 55 4C 0D F7 53 54 44 F4 51 44 0D F7  I♪≈MUL♪≈STD⌠QD♪≈
00000370  43 4F 4D 41 0D F7 43 4F 4D 42 0D F7 41 44 44 44  COMA♪≈COMB♪≈ADDD
00000380  F3 23 31 0D F7 53 54 44 F4 51 44 49 0D F7 4C 44  ≤#1♪≈STD⌠QDI♪≈LD
00000390  42 F4 44 45 56 0D F7 4C 53 52 42 0D F7 53 54 42  B⌠DEV♪≈LSRB♪≈STB
000003A0  F4 45 0D 4F 39 F5 4C 44 41 F4 51 0D F7 53 54 41  ⌠E♪O9⌡LDA⌠Q♪≈STA
000003B0  F4 52 32 0D 4F 31 30 F4 4C 44 41 F4 23 34 0D F7  ⌠R2♪O10⌠LDA⌠#4♪≈
000003C0  53 54 41 F4 52 41 0D F7 53 54 41 F4 52 35 0D F7  STA⌠RA♪≈STA⌠R5♪≈
000003D0  4C 44 58 F4 23 42 43 31 0D F7 4A 53 52 F4 53 50  LDX⌠#BC1♪≈JSR⌠SP
000003E0  34 0D F7 4C 44 41 F4 52 32 0D F7 41 44 44 41 F3  4♪≈LDA⌠R2♪≈ADDA≤
000003F0  50 41 53 0D F7 53 54 41 F4 52 32 0D F7 43 4D 50  PAS♪≈STA⌠R2♪≈CMP
00000400  41 F3 54 41 49 0D F7 42 4C 4F F4 4F 31 30 0D F7  A≤TAI♪≈BLO⌠O10♪≈
00000410  4C 44 41 F4 52 31 0D F7 41 44 44 41 F3 50 41 53  LDA⌠R1♪≈ADDA≤PAS
00000420  0D F7 53 54 41 F4 52 31 0D F7 43 4D 50 41 F3 54  ♪≈STA⌠R1♪≈CMPA≤T
00000430  41 49 0D F7 42 4D 49 F4 4F 39 0D F7 4C 44 41 F4  AI♪≈BMI⌠O9♪≈LDA⌠
00000440  50 41 53 0D F7 49 4E 43 41 0D F7 43 4D 50 41 F3  PAS♪≈INCA♪≈CMPA≤
00000450  54 41 49 0D F7 42 48 53 F4 4F 31 34 0D F7 4C CB  TAI♪≈BHS⌠O14♪≈L╦
00000460  FF FF FF FF FF FF FF FF FF FF FF 01 3C 01 FF 44             ☺<☺ D
00000470  58 F4 23 54 42 32 2B 31 0D F7 4A 53 52 F4 41 46  X⌠#TB2+1♪≈JSR⌠AF
00000480  0D F7 4C 44 41 F4 50 41 53 0D F7 53 54 41 F4 52  ♪≈LDA⌠PAS♪≈STA⌠R
00000490  31 0D 4F 31 31 F4 4C 44 41 F4 51 0D F7 53 54 41  1♪O11⌠LDA⌠Q♪≈STA
000004A0  F4 52 32 0D 4F 31 32 F4 4C 44 41 F4 23 32 0D F7  ⌠R2♪O12⌠LDA⌠#2♪≈
000004B0  53 54 41 F4 52 33 0D 4F 31 33 F4 4C 44 41 F4 23  STA⌠R3♪O13⌠LDA⌠#
000004C0  34 0D F7 53 54 41 F4 52 41 0D F7 53 54 41 F4 52  4♪≈STA⌠RA♪≈STA⌠R
000004D0  35 0D F7 4C 44 58 F4 23 42 43 32 0D F7 4A 53 52  5♪≈LDX⌠#BC2♪≈JSR
000004E0  F4 53 50 34 0D F7 4C 44 44 F4 52 31 0D F7 45 58  ⌠SP4♪≈LDD⌠R1♪≈EX
000004F0  47 F4 41 2C 42 0D F7 53 54 44 F4 52 31 0D F7 44  G⌠A,B♪≈STD⌠R1♪≈D
00000500  45 43 F4 52 33 0D F7 42 4E 45 F4 4F 31 33 0D F7  EC⌠R3♪≈BNE⌠O13♪≈
00000510  4C 44 41 F4 52 32 0D F7 41 44 44 41 F3 50 41 53  LDA⌠R2♪≈ADDA≤PAS
00000520  0D F7 53 54 41 F4 52 32 0D F7 43 4D 50 41 F3 54  ♪≈STA⌠R2♪≈CMPA≤T
00000530  41 49 0D F7 42 4C 4F F4 4F 31 32 0D F7 4C 44 41  AI♪≈BLO⌠O12♪≈LDA
00000540  F4 52 31 0D F7 41 44 44 41 F3 50 41 53 0D F7 53  ⌠R1♪≈ADDA≤PAS♪≈S
00000550  54 41 F4 52 31 0D F7 49 4E 43 41 0D F7 43 4D 50  TA⌠R1♪≈INCA♪≈CMP
00000560  41 F3 54 41 49 0D F7 42 4C 4F F4 4F 31 31 20 FF  A≤TAI♪≈BLO⌠O11  
00000570  FF FF FF FF FF FF FF FF FF 01 3C 01 FF 0D 4F 31           ☺<☺ ♪O1
00000580  34 F4 4C 44 58 F4 23 54 42 33 2B 31 0D F7 4A 53  4⌠LDX⌠#TB3+1♪≈JS
00000590  52 F4 41 46 0D F7 4C 44 41 F4 51 0D F7 53 54 41  R⌠AF♪≈LDA⌠Q♪≈STA
000005A0  F4 52 33 0D 4F 31 35 F4 43 4C 52 F4 52 31 0D F7  ⌠R3♪O15⌠CLR⌠R1♪≈
000005B0  4C 44 41 F4 52 33 0D F7 53 54 41 F4 52 32 0D F7  LDA⌠R3♪≈STA⌠R2♪≈
000005C0  4C 44 58 F4 23 42 43 33 41 0D F7 4A 53 52 F4 53  LDX⌠#BC3A♪≈JSR⌠S
000005D0  50 33 0D F7 4C 44 41 F4 54 41 49 0D F7 44 45 43  P3♪≈LDA⌠TAI♪≈DEC
000005E0  41 0D F7 53 54 41 F4 52 31 0D F7 4A 53 52 F4 53  A♪≈STA⌠R1♪≈JSR⌠S
000005F0  50 33 0D F7 4C 44 41 F4 52 33 0D F7 53 54 41 F4  P3♪≈LDA⌠R3♪≈STA⌠
00000600  52 31 0D F7 43 4C 52 F4 52 32 0D F7 4A 53 52 F4  R1♪≈CLR⌠R2♪≈JSR⌠
00000610  53 50 33 0D F7 4C 44 41 F4 54 41 49 0D F7 44 45  SP3♪≈LDA⌠TAI♪≈DE
00000620  43 41 0D F7 53 54 41 F4 52 32 0D F7 4A 53 52 F4  CA♪≈STA⌠R2♪≈JSR⌠
00000630  53 50 33 0D F7 4C 44 41 F4 52 33 0D F7 41 44 44  SP3♪≈LDA⌠R3♪≈ADD
00000640  41 F3 50 41 53 0D F7 53 54 41 F4 52 33 0D F7 43  A≤PAS♪≈STA⌠R3♪≈C
00000650  4D 50 41 F3 54 41 49 0D F7 42 4C 4F F4 4F 31 35  MPA≤TAI♪≈BLO⌠O15
00000660  0D F7 4C 53 52 F4 44 45 56 0D F7 4C 53 52 F4 50  ♪≈LSR⌠DEV♪≈LSR⌠P
00000670  41 53 0D F7 4C 44 41 F4 50 41 53 0D 22 FF FF FF  AS♪≈LDA⌠PAS♪"   
00000680  FF FF FF FF FF FF FF 01 3C 01 FF F7 43 4D 50 41         ☺<☺ ≈CMPA
00000690  F3 23 31 0D F7 4C 42 48 49 F3 4F 38 0D 44 45 53  ≤#1♪≈LBHI≤O8♪DES
000006A0  F4 4C 44 58 F4 23 54 41 46 2B 31 0D F7 4A 53 52  ⌠LDX⌠#TAF+1♪≈JSR
000006B0  F4 41 46 0D F7 4C 44 55 F4 23 50 41 53 0D F7 4A  ⌠AF♪≈LDU⌠#PAS♪≈J
000006C0  53 52 F4 49 4E 32 0D F7 4C 44 41 F4 2C 55 0D F7  SR⌠IN2♪≈LDA⌠,U♪≈
000006D0  43 4D 50 41 F3 23 39 39 0D F7 4C 42 45 51 F3 4F  CMPA≤#99♪≈LBEQ≤O
000006E0  0D F7 4C 44 42 F4 23 31 32 0D F7 4A 53 52 F4 24  ♪≈LDB⌠#12♪≈JSR⌠$
000006F0  45 38 30 33 0D F7 4C 44 58 F4 23 33 32 0D F7 53  E803♪≈LDX⌠#32♪≈S
00000700  54 58 F4 58 31 0D F7 4C 44 58 F4 23 31 32 36 0D  TX⌠X1♪≈LDX⌠#126♪
00000710  F7 53 54 58 F4 59 31 0D F7 4C 44 58 F4 23 31 36  ≈STX⌠Y1♪≈LDX⌠#16
00000720  30 0D F7 53 54 58 F4 58 32 0D F7 4C 44 58 F4 23  0♪≈STX⌠X2♪≈LDX⌠#
00000730  31 39 30 0D F7 53 54 58 F4 59 32 0D F7 4A 53 52  190♪≈STX⌠Y2♪≈JSR
00000740  F4 4C 49 4E 45 0D F7 4C 44 58 F4 23 32 38 38 0D  ⌠LINE♪≈LDX⌠#288♪
00000750  F7 53 54 58 F4 58 31 0D F7 4A 53 52 F4 4C 49 4E  ≈STX⌠X1♪≈JSR⌠LIN
00000760  45 0D F7 4C 44 58 F4 23 54 42 4C 0D F7 4C 44 55  E♪≈LDX⌠#TBL♪≈LDU
00000770  F4 23 2D 31 0D F7 4C 44 59 F4 23 33 32 30 0D 45  ⌠#-1♪≈LDY⌠#320♪E
00000780  46 31 F4 53 54 55 F4 2C 58 2B 67 FF FF FF FF FF  F1⌠STU⌠,X+g     
00000790  FF FF FF FF FF FF 01 3C 01 FF 2B 0D F7 53 54 59        ☺<☺ +♪≈STY
000007A0  F4 2C 58 2B 2B 0D F7 43 4D 50 58 F3 23 45 53 50  ⌠,X++♪≈CMPX≤#ESP
000007B0  0D F7 42 4C 4F F4 45 46 31 0D F7 43 4C 52 F4 52  ♪≈BLO⌠EF1♪≈CLR⌠R
000007C0  31 0D 44 45 53 31 F3 43 4C 52 F4 52 32 0D F7 4A  1♪DES1≤CLR⌠R2♪≈J
000007D0  53 52 F4 43 52 44 0D F7 53 54 58 F4 58 31 0D F7  SR⌠CRD♪≈STX⌠X1♪≈
000007E0  53 54 59 F4 59 31 0D F7 4C 44 41 F4 50 41 53 0D  STY⌠Y1♪≈LDA⌠PAS♪
000007F0  F7 53 54 41 F4 52 32 0D 44 45 53 32 F3 4A 53 52  ≈STA⌠R2♪DES2≤JSR
00000800  F4 43 52 44 0D F7 53 54 58 F4 58 32 0D F7 53 54  ⌠CRD♪≈STX⌠X2♪≈ST
00000810  59 F4 59 32 0D F7 50 53 48 53 F3 58 2C 59 0D F7  Y⌠Y2♪≈PSHS≤X,Y♪≈
00000820  4A 53 52 F4 4C 49 4E 45 0D F7 50 55 4C 53 F3 58  JSR⌠LINE♪≈PULS≤X
00000830  2C 59 0D F7 53 54 58 F4 58 31 0D F7 53 54 59 F4  ,Y♪≈STX⌠X1♪≈STY⌠
00000840  59 31 0D F7 4C 44 41 F4 52 32 0D F7 41 44 44 41  Y1♪≈LDA⌠R2♪≈ADDA
00000850  F3 50 41 53 0D F7 53 54 41 F4 52 32 0D F7 43 4D  ≤PAS♪≈STA⌠R2♪≈CM
00000860  50 41 F3 54 41 49 0D F7 42 4C 4F F4 44 45 53 32  PA≤TAI♪≈BLO⌠DES2
00000870  0D F7 4C 44 41 F4 52 31 0D F7 41 44 44 41 F3 50  ♪≈LDA⌠R1♪≈ADDA≤P
00000880  41 53 0D F7 53 54 41 F4 52 31 0D F7 43 4D 50 41  AS♪≈STA⌠R1♪≈CMPA
00000890  F3 54 41 49 0D F7 42 4C 4F 40 7F FF FF FF FF FF  ≤TAI♪≈BLO@⌂     
000008A0  FF FF FF FF FF 01 3C 01 FF F4 44 45 53 33 0D F7       ☺<☺ ⌠DES3♪≈
000008B0  4A 4D 50 F4 44 45 53 0D 44 45 53 33 F3 43 4C 52  JMP⌠DES♪DES3≤CLR
000008C0  F4 52 32 0D 44 45 53 34 F3 4A 53 52 F4 43 52 44  ⌠R2♪DES4≤JSR⌠CRD
000008D0  0D F7 53 54 58 F4 58 31 0D F7 53 54 59 F4 59 31  ♪≈STX⌠X1♪≈STY⌠Y1
000008E0  0D F7 4C 44 41 F4 52 31 0D F7 53 55 42 41 F3 50  ♪≈LDA⌠R1♪≈SUBA≤P
000008F0  41 53 0D F7 53 54 41 F4 52 31 0D F7 4A 53 52 F4  AS♪≈STA⌠R1♪≈JSR⌠
00000900  43 52 44 0D F7 53 54 58 F4 58 32 0D F7 53 54 59  CRD♪≈STX⌠X2♪≈STY
00000910  F4 59 32 0D F7 4A 53 52 F4 4C 49 4E 45 0D F7 4C  ⌠Y2♪≈JSR⌠LINE♪≈L
00000920  44 41 F4 52 31 0D F7 41 44 44 41 F3 50 41 53 0D  DA⌠R1♪≈ADDA≤PAS♪
00000930  F7 53 54 41 F4 52 31 0D F7 4C 44 41 F4 52 32 0D  ≈STA⌠R1♪≈LDA⌠R2♪
00000940  F7 41 44 44 41 F3 50 41 53 0D F7 53 54 41 F4 52  ≈ADDA≤PAS♪≈STA⌠R
00000950  32 0D F7 43 4D 50 41 F3 54 41 49 0D F7 42 4C 4F  2♪≈CMPA≤TAI♪≈BLO
00000960  F4 44 45 53 34 0D F7 4A 4D 50 F4 44 45 53 31 0D  ⌠DES4♪≈JMP⌠DES1♪
00000970  43 52 44 F4 4C 44 44 F4 52 31 0D F7 53 55 42 41  CRD⌠LDD⌠R1♪≈SUBA
00000980  F3 52 32 0D F7 41 44 44 42 F3 52 31 0D F7 53 54  ≤R2♪≈ADDB≤R1♪≈ST
00000990  41 F4 52 41 0D F7 4C 44 41 F4 54 41 49 0D F7 44  A⌠RA♪≈LDA⌠TAI♪≈D
000009A0  45 43 41 0D 43 52 31 F4 AF FF FF FF FF FF FF FF  ECA♪CR1⌠»       
000009B0  FF FF FF 01 3C 01 FF 43 4D 50 41 F3 23 36 34 0D     ☺<☺ CMPA≤#64♪
000009C0  F7 42 45 51 F4 43 52 32 0D F7 4C 53 4C 41 0D F7  ≈BEQ⌠CR2♪≈LSLA♪≈
000009D0  4C 53 4C F4 52 41 0D F7 4C 53 4C 42 0D F7 42 52  LSL⌠RA♪≈LSLB♪≈BR
000009E0  41 F4 43 52 31 0D 43 52 32 F4 4C 44 41 F4 52 41  A⌠CR1♪CR2⌠LDA⌠RA
000009F0  0D F7 4C 44 58 F4 23 31 36 30 0D F7 4C 45 41 58  ♪≈LDX⌠#160♪≈LEAX
00000A00  F3 41 2C 58 0D F7 4C 45 41 58 F3 41 2C 58 0D F7  ≤A,X♪≈LEAX≤A,X♪≈
00000A10  4C 44 59 F4 23 31 39 30 0D F7 4E 45 47 42 0D F7  LDY⌠#190♪≈NEGB♪≈
00000A20  4C 45 41 59 F3 42 2C 59 0D F7 4C 44 41 F4 52 31  LEAY≤B,Y♪≈LDA⌠R1
00000A30  0D F7 4C 44 42 F4 54 41 49 0D F7 4D 55 4C 0D F7  ♪≈LDB⌠TAI♪≈MUL♪≈
00000A40  41 44 44 44 F3 23 45 53 50 0D F7 54 46 52 F4 44  ADDD≤#ESP♪≈TFR⌠D
00000A50  2C 55 0D F7 4C 44 41 F4 52 32 0D F7 4C 45 41 55  ,U♪≈LDA⌠R2♪≈LEAU
00000A60  F3 41 2C 55 0D F7 4C 44 41 F4 2C 55 0D F7 4E 45  ≤A,U♪≈LDA⌠,U♪≈NE
00000A70  47 41 0D F7 4C 45 41 59 F3 41 2C 59 0D F7 52 54  GA♪≈LEAY≤A,Y♪≈RT
00000A80  53 0D 53 50 34 F4 4C 44 41 F4 23 34 0D F7 53 54  S♪SP4⌠LDA⌠#4♪≈ST
00000A90  41 F4 52 41 0D F7 43 4C 52 F4 52 35 0D F7 42 52  A⌠RA♪≈CLR⌠R5♪≈BR
00000AA0  41 F4 53 50 31 0D 53 50 33 F4 4C 44 41 F4 23 33  A⌠SP1♪SP3⌠LDA⌠#3
00000AB0  0D F7 53 54 41 F4 22 FF FF FF FF FF FF FF FF FF  ♪≈STA⌠"         
00000AC0  FF FF 01 3C 01 FF 52 41 0D F7 53 54 41 F4 52 35    ☺<☺ RA♪≈STA⌠R5
00000AD0  0D 53 50 31 F4 4C 44 41 F4 52 31 0D F7 4C 44 42  ♪SP1⌠LDA⌠R1♪≈LDB
00000AE0  F4 54 41 49 0D F7 4D 55 4C 0D F7 41 44 44 44 F3  ⌠TAI♪≈MUL♪≈ADDD≤
00000AF0  23 45 53 50 0D F7 54 46 52 F4 44 2C 55 0D F7 4C  #ESP♪≈TFR⌠D,U♪≈L
00000B00  44 41 F4 52 32 0D F7 4C 45 41 55 F3 41 2C 55 0D  DA⌠R2♪≈LEAU≤A,U♪
00000B10  F7 53 54 55 F4 52 37 0D F7 43 4C 52 F4 53 4D 0D  ≈STU⌠R7♪≈CLR⌠SM♪
00000B20  53 31 41 F4 4C 44 55 F4 52 37 0D F7 4C 44 44 F4  S1A⌠LDU⌠R7♪≈LDD⌠
00000B30  5B 2C 58 2B 2B 5D 0D F7 4C 45 41 55 F3 44 2C 55  [,X++]♪≈LEAU≤D,U
00000B40  0D F7 4C 44 41 F4 5B 2C 58 2B 2B 5D 0D F7 4C 45  ♪≈LDA⌠[,X++]♪≈LE
00000B50  41 55 F3 41 2C 55 0D F7 4C 44 41 F4 2C 55 0D F7  AU≤A,U♪≈LDA⌠,U♪≈
00000B60  41 44 44 41 F3 53 4D 0D F7 53 54 41 F4 53 4D 0D  ADDA≤SM♪≈STA⌠SM♪
00000B70  F7 44 45 43 F4 52 41 0D F7 42 4E 45 F4 53 31 41  ≈DEC⌠RA♪≈BNE⌠S1A
00000B80  0D F7 54 53 54 F4 52 35 0D F7 42 45 51 F4 53 31  ♪≈TST⌠R5♪≈BEQ⌠S1
00000B90  44 0D F7 43 4C 52 42 0D F7 45 58 47 F4 41 2C 42  D♪≈CLRB♪≈EXG⌠A,B
00000BA0  0D 53 31 46 F4 43 4D 50 42 F3 23 33 0D F7 42 4C  ♪S1F⌠CMPB≤#3♪≈BL
00000BB0  4F F4 53 31 45 0D F7 53 55 42 42 F3 23 33 0D F7  O⌠S1E♪≈SUBB≤#3♪≈
00000BC0  49 4E 43 41 0D C1 FF BF FF FF FF FF FF FF FF FF  INCA♪┴ ┐        
00000BD0  FF FF FF 01 3C 01 FF F7 42 52 41 F4 53 31 46 0D     ☺<☺ ≈BRA⌠S1F♪
00000BE0  53 31 44 F4 4C 53 52 41 0D F7 4C 53 52 41 0D 53  S1D⌠LSRA♪≈LSRA♪S
00000BF0  31 45 F4 4C 44 55 F4 52 37 0D F7 53 54 41 F4 2C  1E⌠LDU⌠R7♪≈STA⌠,
00000C00  55 0D 53 31 42 F4 4A 53 52 F4 52 4E 44 0D F7 4C  U♪S1B⌠JSR⌠RND♪≈L
00000C10  44 41 F4 2C 59 0D F7 43 4D 50 41 F3 44 45 56 0D  DA⌠,Y♪≈CMPA≤DEV♪
00000C20  F7 42 48 49 F4 53 31 42 0D F7 41 44 44 41 F3 2C  ≈BHI⌠S1B♪≈ADDA≤,
00000C30  55 0D F7 53 54 41 F4 2C 55 0D F7 4C 44 41 F4 2C  U♪≈STA⌠,U♪≈LDA⌠,
00000C40  55 0D F7 53 55 42 41 F3 45 0D F7 53 54 41 F4 2C  U♪≈SUBA≤E♪≈STA⌠,
00000C50  55 0D F7 43 4D 50 41 F3 4E 0D F7 42 50 4C F4 53  U♪≈CMPA≤N♪≈BPL⌠S
00000C60  31 43 0D F7 4C 44 41 F4 4E 0D F7 53 54 41 F4 2C  1C♪≈LDA⌠N♪≈STA⌠,
00000C70  55 0D 53 31 43 F4 52 54 53 0D 42 43 31 F4 46 44  U♪S1C⌠RTS♪BC1⌠FD
00000C80  42 F4 51 44 49 2C 51 49 2C 51 44 49 2C 51 2C 51  B⌠QDI,QI,QDI,Q,Q
00000C90  44 2C 51 49 2C 51 44 2C 51 0D 42 43 32 F4 46 44  D,QI,QD,Q♪BC2⌠FD
00000CA0  42 F4 51 44 49 2C 5A 45 2C 51 44 2C 5A 45 2C 5A  B⌠QDI,ZE,QD,ZE,Z
00000CB0  45 2C 51 49 2C 5A 45 2C 51 0D 42 43 33 41 F3 46  E,QI,ZE,Q♪BC3A≤F
00000CC0  44 42 F4 5A 45 2C 51 49 2C 5A 45 2C 51 2C 51 44  DB⌠ZE,QI,ZE,Q,QD
00000CD0  2C 5A 45 0D 42 43 4E FF 9F FF FF FF FF FF FF FF  ,ZE♪BCN ƒ       
00000CE0  FF FF FF 01 3C 01 FF 33 42 F3 46 44 42 F4 5A 45     ☺<☺ 3B≤FDB⌠ZE
00000CF0  2C 51 49 2C 5A 45 2C 51 2C 51 44 49 2C 5A 45 0D  ,QI,ZE,Q,QDI,ZE♪
00000D00  42 43 33 43 F3 46 44 42 F4 51 44 49 2C 5A 45 2C  BC3C≤FDB⌠QDI,ZE,
00000D10  51 44 2C 5A 45 2C 5A 45 2C 51 0D 42 43 33 44 F3  QD,ZE,ZE,Q♪BC3D≤
00000D20  46 44 42 F4 51 44 49 2C 5A 45 2C 51 44 2C 5A 45  FDB⌠QDI,ZE,QD,ZE
00000D30  2C 5A 45 2C 51 49 0D 52 4E 44 F4 4C 45 41 59 F3  ,ZE,QI♪RND⌠LEAY≤
00000D40  31 2C 59 0D F7 43 4D 50 59 F3 23 24 33 36 37 38  1,Y♪≈CMPY≤#$3678
00000D50  0D F7 42 4D 49 F4 52 4E 44 31 0D F7 4C 44 59 F4  ♪≈BMI⌠RND1♪≈LDY⌠
00000D60  23 30 0D 52 4E 44 31 F3 52 54 53 0D 41 46 F5 4C  #0♪RND1≤RTS♪AF⌡L
00000D70  44 42 F4 2C 58 2B 0D F7 42 45 51 F4 41 46 46 0D  DB⌠,X+♪≈BEQ⌠AFF♪
00000D80  F7 4A 53 52 F4 24 45 38 30 33 0D F7 42 52 41 F4  ≈JSR⌠$E803♪≈BRA⌠
00000D90  41 46 0D 41 46 46 F4 52 54 53 0D 49 4E 31 F4 4A  AF♪AFF⌠RTS♪IN1⌠J
00000DA0  53 52 F4 24 45 38 30 36 0D F7 43 4D 50 42 F3 23  SR⌠$E806♪≈CMPB≤#
00000DB0  34 38 0D F7 42 4D 49 F4 49 4E 31 0D 49 4E 41 F4  48♪≈BMI⌠IN1♪INA⌠
00000DC0  43 4D 50 42 F3 23 35 31 0D F7 42 50 4C F4 49 4E  CMPB≤#51♪≈BPL⌠IN
00000DD0  31 0D F7 4A 53 52 F4 24 45 38 30 33 0D F7 52 54  1♪≈JSR⌠$E803♪≈RT
00000DE0  53 0D 49 4E 32 F4 EE FF FF FF FF FF FF FF FF FF  S♪IN2⌠ε         
00000DF0  FF 01 3C 01 FF 4C 44 41 F4 23 35 38 0D F7 53 54   ☺<☺ LDA⌠#58♪≈ST
00000E00  41 F4 49 4E 41 2B 31 0D F7 42 53 52 F4 49 4E 31  A⌠INA+1♪≈BSR⌠IN1
00000E10  0D F7 53 55 42 42 F3 23 34 38 0D F7 4C 44 41 F4  ♪≈SUBB≤#48♪≈LDA⌠
00000E20  23 31 30 0D F7 4D 55 4C 0D F7 53 54 42 F4 2C 55  #10♪≈MUL♪≈STB⌠,U
00000E30  0D F7 42 53 52 F4 49 4E 31 0D F7 53 55 42 42 F3  ♪≈BSR⌠IN1♪≈SUBB≤
00000E40  23 34 38 0D F7 41 44 44 42 F3 2C 55 0D F7 53 54  #48♪≈ADDB≤,U♪≈ST
00000E50  42 F4 2C 55 0D F7 52 54 53 0D 54 41 42 F4 46 43  B⌠,U♪≈RTS♪TAB⌠FC
00000E60  42 F4 31 32 38 2C 36 34 2C 33 32 2C 31 36 2C 38  B⌠128,64,32,16,8
00000E70  2C 34 2C 32 2C 31 0D 50 43 53 F4 54 46 52 F4 59  ,4,2,1♪PCS⌠TFR⌠Y
00000E80  2C 44 0D F7 4C 44 41 F4 23 34 30 0D F7 4D 55 4C  ,D♪≈LDA⌠#40♪≈MUL
00000E90  0D F7 53 54 44 F4 53 43 0D F7 54 46 52 F4 59 2C  ♪≈STD⌠SC♪≈TFR⌠Y,
00000EA0  44 0D F7 4C 44 42 F4 23 34 30 0D F7 4D 55 4C 0D  D♪≈LDB⌠#40♪≈MUL♪
00000EB0  F7 41 44 44 42 F3 53 43 0D F7 53 54 42 F4 53 43  ≈ADDB≤SC♪≈STB⌠SC
00000EC0  0D F7 4C 44 44 F4 53 43 0D F7 41 44 44 44 F3 23  ♪≈LDD⌠SC♪≈ADDD≤#
00000ED0  24 34 30 30 30 0D F7 53 54 44 F4 53 43 0D F7 54  $4000♪≈STD⌠SC♪≈T
00000EE0  46 52 F4 58 2C 44 0D F7 41 53 52 41 0D F7 52 4F  FR⌠X,D♪≈ASRA♪≈RO
00000EF0  52 42 0D F7 51 FF FF FF FF FF FF FF FF FF FF FF  RB♪≈Q           
00000F00  01 3C 01 FF 41 53 52 41 0D F7 52 4F 52 42 0D F7  ☺<☺ ASRA♪≈RORB♪≈
00000F10  41 53 52 41 0D F7 52 4F 52 42 0D F7 41 44 44 44  ASRA♪≈RORB♪≈ADDD
00000F20  F3 53 43 0D F7 53 54 44 F4 53 43 0D F7 4C 44 55  ≤SC♪≈STD⌠SC♪≈LDU
00000F30  F4 23 54 41 42 0D F7 54 46 52 F4 58 2C 44 0D F7  ⌠#TAB♪≈TFR⌠X,D♪≈
00000F40  41 4E 44 42 F3 23 37 0D F7 4C 44 41 F4 42 2C 55  ANDB≤#7♪≈LDA⌠B,U
00000F50  0D F7 53 54 41 F4 42 54 0D F7 4C 44 55 F4 53 43  ♪≈STA⌠BT♪≈LDU⌠SC
00000F60  0D F7 52 54 53 0D 4C 49 4E 45 F3 4C 44 41 F4 23  ♪≈RTS♪LINE≤LDA⌠#
00000F70  31 0D F7 4F 52 41 F4 24 45 37 43 33 0D F7 53 54  1♪≈ORA⌠$E7C3♪≈ST
00000F80  41 F4 24 45 37 43 33 0D F7 4C 44 58 F4 58 31 0D  A⌠$E7C3♪≈LDX⌠X1♪
00000F90  F7 4C 44 59 F4 59 31 0D F7 4C 44 44 F4 23 24 31  ≈LDY⌠Y1♪≈LDD⌠#$1
00000FA0  32 38 0D F7 53 54 41 F4 44 58 0D F7 53 54 44 F4  28♪≈STA⌠DX♪≈STD⌠
00000FB0  44 59 0D F7 42 53 52 F4 50 43 53 0D F7 4A 53 52  DY♪≈BSR⌠PCS♪≈JSR
00000FC0  F4 52 43 52 44 0D F7 4C 44 44 F4 59 32 0D F7 53  ⌠RCRD♪≈LDD⌠Y2♪≈S
00000FD0  55 42 44 F3 59 31 0D F7 42 50 4C F4 4C 31 0D F7  UBD≤Y1♪≈BPL⌠L1♪≈
00000FE0  43 4F 4D 41 0D F7 43 4F 4D 42 0D F7 41 44 44 44  COMA♪≈COMB♪≈ADDD
00000FF0  F3 23 31 0D F7 4E 45 47 F4 44 59 0D F7 4E 45 47  ≤#1♪≈NEG⌠DY♪≈NEG
00001000  F4 44 53 80 FF FF FF FF FF FF FF FF FF FF FF 01  ⌠DSÇ           ☺
00001010  3C 01 FF 0D 4C 31 F5 53 54 44 F4 41 32 0D F7 4C  <☺ ♪L1⌡STD⌠A2♪≈L
00001020  44 44 F4 58 32 0D F7 53 55 42 44 F3 58 31 0D F7  DD⌠X2♪≈SUBD≤X1♪≈
00001030  42 50 4C F4 4C 32 0D F7 43 4F 4D 41 0D F7 43 4F  BPL⌠L2♪≈COMA♪≈CO
00001040  4D 42 0D F7 41 44 44 44 F3 23 31 0D F7 4E 45 47  MB♪≈ADDD≤#1♪≈NEG
00001050  F4 44 58 0D 4C 32 F5 53 54 44 F4 41 31 0D F7 43  ⌠DX♪L2⌡STD⌠A1♪≈C
00001060  4D 50 44 F3 41 32 0D F7 4C 42 4C 4F F3 4C 36 0D  MPD≤A2♪≈LBLO≤L6♪
00001070  F7 4C 53 52 41 0D F7 52 4F 52 42 0D F7 53 54 44  ≈LSRA♪≈RORB♪≈STD
00001080  F4 4B 0D 4C 33 F5 42 53 52 F4 50 4C 54 0D F7 42  ⌠K♪L3⌡BSR⌠PLT♪≈B
00001090  53 52 F4 4F 58 0D F7 4C 44 44 F4 4B 0D F7 41 44  SR⌠OX♪≈LDD⌠K♪≈AD
000010A0  44 44 F3 41 32 0D F7 53 54 44 F4 4B 0D F7 43 4D  DD≤A2♪≈STD⌠K♪≈CM
000010B0  50 44 F3 41 31 0D F7 42 4C 4F F4 4C 34 0D F7 53  PD≤A1♪≈BLO⌠L4♪≈S
000010C0  55 42 44 F3 41 31 0D F7 53 54 44 F4 4B 0D F7 4C  UBD≤A1♪≈STD⌠K♪≈L
000010D0  44 44 F4 44 59 0D F7 4C 45 41 59 F3 41 2C 59 0D  DD⌠DY♪≈LEAY≤A,Y♪
000010E0  F7 4C 45 41 55 F3 42 2C 55 0D 4C 34 F5 43 4D 50  ≈LEAU≤B,U♪L4⌡CMP
000010F0  58 F3 58 32 0D F7 42 4E 45 F4 4C 33 0D 4C 35 F5  X≤X2♪≈BNE⌠L3♪L5⌡
00001100  42 53 52 F4 50 4C 54 0D F7 52 54 53 0D 50 4C 54  BSR⌠PLT♪≈RTS♪PLT
00001110  F4 43 3F EF FF FF FF FF FF FF FF FF FF FF 01 3C  ⌠C?∩          ☺<
00001120  01 FF 4D 50 59 F3 42 53 0D F7 42 4C 54 F4 50 4C  ☺ MPY≤BS♪≈BLT⌠PL
00001130  31 0D F7 43 4D 50 59 F3 48 54 0D F7 42 47 54 F4  1♪≈CMPY≤HT♪≈BGT⌠
00001140  50 4C 31 0D 50 46 F5 52 54 53 0D 50 4C 31 F4 43  PL1♪PF⌡RTS♪PL1⌠C
00001150  4D 50 59 F3 42 50 0D F7 42 47 54 F4 50 4C 32 0D  MPY≤BP♪≈BGT⌠PL2♪
00001160  F7 53 54 59 F4 42 50 0D 50 4C 32 F4 43 4D 50 59  ≈STY⌠BP♪PL2⌠CMPY
00001170  F3 48 50 0D F7 42 4C 54 F4 50 4C 33 0D F7 53 54  ≤HP♪≈BLT⌠PL3♪≈ST
00001180  59 F4 48 50 0D 50 4C 33 F4 43 4D 50 58 F3 58 4D  Y⌠HP♪PL3⌠CMPX≤XM
00001190  4E 0D F7 42 4C 54 F4 50 46 0D F7 43 4D 50 58 F3  N♪≈BLT⌠PF♪≈CMPX≤
000011A0  58 4D 58 0D F7 42 47 54 F4 50 46 0D F7 43 4D 50  XMX♪≈BGT⌠PF♪≈CMP
000011B0  59 F3 59 4D 4E 0D F7 42 4C 54 F4 50 46 0D F7 43  Y≤YMN♪≈BLT⌠PF♪≈C
000011C0  4D 50 59 F3 59 4D 58 0D F7 42 47 54 F4 50 46 0D  MPY≤YMX♪≈BGT⌠PF♪
000011D0  F7 4C 44 41 F4 42 54 0D F7 4F 52 41 F4 2C 55 0D  ≈LDA⌠BT♪≈ORA⌠,U♪
000011E0  F7 53 54 41 F4 2C 55 0D F7 52 54 53 0D 4F 58 F5  ≈STA⌠,U♪≈RTS♪OX⌡
000011F0  4C 44 42 F4 44 58 0D F7 4C 45 41 58 F3 42 2C 58  LDB⌠DX♪≈LEAX≤B,X
00001200  0D F7 54 53 54 42 0D F7 42 4D 49 F4 4F 58 32 0D  ♪≈TSTB♪≈BMI⌠OX2♪
00001210  F7 4C 53 52 F4 42 54 0D F7 42 4E 45 F4 4F 58 33  ≈LSR⌠BT♪≈BNE⌠OX3
00001220  0D F2 FF FF FF FF FF FF FF FF FF FF 01 3C 01 FF  ♪≥          ☺<☺ 
00001230  F7 52 4F 52 F4 42 54 0D F7 4C 45 41 55 F3 42 2C  ≈ROR⌠BT♪≈LEAU≤B,
00001240  55 0D F7 42 52 41 F4 4F 58 33 0D 4F 58 32 F4 4C  U♪≈BRA⌠OX3♪OX2⌠L
00001250  53 4C F4 42 54 0D F7 42 4E 45 F4 4F 58 33 0D F7  SL⌠BT♪≈BNE⌠OX3♪≈
00001260  52 4F 4C F4 42 54 0D F7 4C 45 41 55 F3 42 2C 55  ROL⌠BT♪≈LEAU≤B,U
00001270  0D 4F 58 33 F4 50 53 48 53 F3 55 0D F7 4C 44 55  ♪OX3⌠PSHS≤U♪≈LDU
00001280  F4 50 4E 0D F7 4C 44 44 F4 48 50 0D F7 53 54 44  ⌠PN♪≈LDD⌠HP♪≈STD
00001290  F4 2C 55 0D F7 4C 44 44 F4 42 50 0D F7 53 54 44  ⌠,U♪≈LDD⌠BP♪≈STD
000012A0  F4 32 2C 55 0D F7 4C 44 42 F4 44 58 0D F7 4C 53  ⌠2,U♪≈LDB⌠DX♪≈LS
000012B0  4C 42 0D F7 4C 53 4C 42 0D F7 4C 45 41 55 F3 42  LB♪≈LSLB♪≈LEAU≤B
000012C0  2C 55 0D F7 53 54 55 F4 50 4E 0D F7 4A 4D 50 F4  ,U♪≈STU⌠PN♪≈JMP⌠
000012D0  52 43 31 0D 4C 36 F5 4C 44 44 F4 41 32 0D F7 4C  RC1♪L6⌡LDD⌠A2♪≈L
000012E0  53 52 41 0D F7 52 4F 52 42 0D F7 53 54 44 F4 4B  SRA♪≈RORB♪≈STD⌠K
000012F0  0D 4C 37 F5 4A 53 52 F4 50 4C 54 0D F7 4C 44 44  ♪L7⌡JSR⌠PLT♪≈LDD
00001300  F4 44 59 0D F7 4C 45 41 59 F3 41 2C 59 0D F7 4C  ⌠DY♪≈LEAY≤A,Y♪≈L
00001310  45 41 55 F3 42 2C 55 0D F7 4C 44 44 F4 4B 0D F7  EAU≤B,U♪≈LDD⌠K♪≈
00001320  41 44 44 44 F3 41 31 0D F7 53 54 44 F4 4B 0D 74  ADDD≤A1♪≈STD⌠K♪t
00001330  FF FF FF FF FF FF FF FF FF FF 01 3C 01 FF F7 43            ☺<☺ ≈C
00001340  4D 50 44 F3 41 32 0D F7 42 4C 4F F4 4C 38 0D F7  MPD≤A2♪≈BLO⌠L8♪≈
00001350  53 55 42 44 F3 41 32 0D F7 53 54 44 F4 4B 0D F7  SUBD≤A2♪≈STD⌠K♪≈
00001360  42 53 52 F4 4F 58 0D 4C 38 F5 43 4D 50 59 F3 59  BSR⌠OX♪L8⌡CMPY≤Y
00001370  32 0D F7 42 4E 45 F4 4C 37 0D F7 4A 4D 50 F4 4C  2♪≈BNE⌠L7♪≈JMP⌠L
00001380  35 0D 52 43 52 44 F3 50 53 48 53 F3 55 0D F7 4C  5♪RCRD≤PSHS≤U♪≈L
00001390  44 55 F4 23 54 42 4C 0D F7 54 46 52 F4 58 2C 44  DU⌠#TBL♪≈TFR⌠X,D
000013A0  0D F7 4C 45 41 55 F3 44 2C 55 0D F7 4C 45 41 55  ♪≈LEAU≤D,U♪≈LEAU
000013B0  F3 44 2C 55 0D F7 4C 45 41 55 F3 44 2C 55 0D F7  ≤D,U♪≈LEAU≤D,U♪≈
000013C0  4C 45 41 55 F3 44 2C 55 0D F7 53 54 55 F4 50 4E  LEAU≤D,U♪≈STU⌠PN
000013D0  0D 52 43 31 F4 4C 44 44 F4 2C 55 0D F7 53 54 44  ♪RC1⌠LDD⌠,U♪≈STD
000013E0  F4 48 54 0D F7 53 54 44 F4 48 50 0D F7 4C 44 44  ⌠HT♪≈STD⌠HP♪≈LDD
000013F0  F4 32 2C 55 0D F7 53 54 44 F4 42 53 0D F7 53 54  ⌠2,U♪≈STD⌠BS♪≈ST
00001400  44 F4 42 50 0D F7 50 55 4C 53 F3 55 2C 50 43 0D  D⌠BP♪≈PULS≤U,PC♪
00001410  4B F6 46 44 42 F4 30 0D 58 31 F5 46 44 42 F4 30  K÷FDB⌠0♪X1⌡FDB⌠0
00001420  0D 59 31 F5 46 44 42 F4 30 0D 58 32 F5 46 44 42  ♪Y1⌡FDB⌠0♪X2⌡FDB
00001430  F4 30 0D 59 32 F5 46 44 42 F4 30 0D 50 C0 FF FF  ⌠0♪Y2⌡FDB⌠0♪P└  
00001440  FF FF FF FF FF FF FF FF 01 3C 01 FF 4E F5 46 44          ☺<☺ N⌡FD
00001450  42 F4 30 0D 48 54 F5 46 44 42 F4 30 0D 48 50 F5  B⌠0♪HT⌡FDB⌠0♪HP⌡
00001460  46 44 42 F4 30 0D 42 53 F5 46 44 42 F4 30 0D 42  FDB⌠0♪BS⌡FDB⌠0♪B
00001470  50 F5 46 44 42 F4 30 0D 53 43 F5 46 44 42 F4 30  P⌡FDB⌠0♪SC⌡FDB⌠0
00001480  0D 42 54 F5 46 43 42 F4 30 0D 42 54 32 F4 46 43  ♪BT⌡FCB⌠0♪BT2⌠FC
00001490  42 F4 30 0D 44 58 F5 46 43 42 F4 30 0D 44 59 F5  B⌠0♪DX⌡FCB⌠0♪DY⌡
000014A0  46 43 42 F4 30 0D 44 53 F5 46 43 42 F4 30 0D 41  FCB⌠0♪DS⌡FCB⌠0♪A
000014B0  31 F5 46 44 42 F4 30 0D 41 32 F5 46 44 42 F4 30  1⌡FDB⌠0♪A2⌡FDB⌠0
000014C0  0D 58 4D 4E F4 46 44 42 F4 30 0D 58 4D 58 F4 46  ♪XMN⌠FDB⌠0♪XMX⌠F
000014D0  44 42 F4 33 31 39 0D 59 4D 4E F4 46 44 42 F4 30  DB⌠319♪YMN⌠FDB⌠0
000014E0  0D 59 4D 58 F4 46 44 42 F4 31 39 39 0D 51 F6 46  ♪YMX⌠FDB⌠199♪Q÷F
000014F0  43 42 F4 30 0D 51 49 F5 46 43 42 F4 30 0D 51 44  CB⌠0♪QI⌡FCB⌠0♪QD
00001500  F5 46 44 42 F4 30 0D 51 44 49 F4 46 44 42 F4 30  ⌡FDB⌠0♪QDI⌠FDB⌠0
00001510  0D 5A 45 F5 46 44 42 F4 30 0D 45 F6 46 43 42 F4  ♪ZE⌡FDB⌠0♪E÷FCB⌠
00001520  30 0D 52 31 F5 46 43 42 F4 30 0D 52 32 F5 46 43  0♪R1⌡FCB⌠0♪R2⌡FC
00001530  42 F4 30 0D 52 33 F5 46 43 42 F4 30 0D 52 34 F5  B⌠0♪R3⌡FCB⌠0♪R4⌡
00001540  46 44 42 F4 30 0D 52 35 F5 46 43 E4 FF FF FF FF  FDB⌠0♪R5⌡FCΣ    
00001550  FF FF FF FF FF FF 01 3C 01 FF 42 F4 30 0D 52 37        ☺<☺ B⌠0♪R7
00001560  F5 46 44 42 F4 30 0D 53 4D F5 46 43 42 F4 30 0D  ⌡FDB⌠0♪SM⌡FCB⌠0♪
00001570  52 41 F5 46 43 42 F4 30 0D 43 42 F5 46 43 42 F4  RA⌡FCB⌠0♪CB⌡FCB⌠
00001580  30 0D 4E F6 46 43 42 F4 30 0D 50 41 53 F4 46 43  0♪N÷FCB⌠0♪PAS⌠FC
00001590  42 F4 30 0D 44 45 56 F4 46 43 42 F4 30 0D 48 41  B⌠0♪DEV⌠FCB⌠0♪HA
000015A0  55 F4 46 43 42 F4 30 0D 54 41 49 F4 46 43 42 F4  U⌠FCB⌠0♪TAI⌠FCB⌠
000015B0  30 0D 54 42 F5 46 43 42 F4 24 31 42 2C 24 36 30  0♪TB⌡FCB⌠$1B,$60
000015C0  2C 24 31 42 2C 24 35 30 2C 24 31 42 2C 24 34 36  ,$1B,$50,$1B,$46
000015D0  0D F7 46 43 42 F4 24 31 46 2C 24 32 30 2C 24 32  ♪≈FCB⌠$1F,$20,$2
000015E0  30 2C 24 31 46 2C 24 31 32 2C 24 31 34 0D F7 46  0,$1F,$12,$14♪≈F
000015F0  43 42 F4 31 32 0D F7 46 43 43 F4 24 4D 41 49 4C  CB⌠12♪≈FCC⌠$MAIL
00001600  4C 45 F4 28 30 2D 32 29 F3 3E 24 0D F7 46 43 42  LE⌠(0-2)≤>$♪≈FCB
00001610  F4 30 2C 31 33 2C 31 30 0D F7 46 43 43 F4 24 48  ⌠0,13,10♪≈FCC⌠$H
00001620  41 55 54 45 55 52 F3 28 31 30 2D 36 30 29 F1 3E  AUTEUR≤(10-60)±>
00001630  24 0D F7 46 43 42 F4 30 2C 31 33 2C 31 30 0D F7  $♪≈FCB⌠0,13,10♪≈
00001640  46 43 43 F4 24 44 45 56 49 41 54 49 4F 4E F1 28  FCC⌠$DEVIATION±(
00001650  30 2D 31 36 29 F2 3E 24 0D 03 FF FF FF FF FF FF  0-16)≥>$♪♥      
00001660  FF FF FF FF 01 3C 01 FF F7 46 43 42 F4 30 2C 31      ☺<☺ ≈FCB⌠0,1
00001670  33 2C 31 30 0D F7 46 43 43 F4 24 54 41 49 4C 4C  3,10♪≈FCC⌠$TAILL
00001680  45 F1 28 30 2D 31 36 2C 31 2D 33 32 2C 32 2D 36  E±(0-16,1-32,2-6
00001690  34 29 3E 24 0D F7 46 43 42 F4 30 2C 31 33 2C 31  4)>$♪≈FCB⌠0,13,1
000016A0  30 0D F7 46 43 43 F4 24 41 50 50 55 59 45 52 F1  0♪≈FCC⌠$APPUYER±
000016B0  53 55 52 F1 45 53 50 41 43 45 24 0D F7 46 43 42  SUR±ESPACE$♪≈FCB
000016C0  F4 30 2C 31 33 2C 31 30 0D F7 46 43 43 F4 24 53  ⌠0,13,10♪≈FCC⌠$S
000016D0  55 52 46 41 43 45 F1 44 45 F1 42 41 53 45 24 0D  URFACE±DE±BASE$♪
000016E0  F7 46 43 42 F4 30 0D 54 42 31 F4 46 43 42 F4 31  ≈FCB⌠0♪TB1⌠FCB⌠1
000016F0  33 2C 31 30 2C 30 2C 31 33 2C 31 30 0D F7 46 43  3,10,0,13,10♪≈FC
00001700  43 F4 24 42 4F 55 43 4C 45 F1 31 24 0D 54 42 32  C⌠$BOUCLE±1$♪TB2
00001710  F4 46 43 42 F4 30 2C 31 33 2C 31 30 0D F7 46 43  ⌠FCB⌠0,13,10♪≈FC
00001720  43 F4 24 42 4F 55 43 4C 45 F1 32 24 0D 54 42 33  C⌠$BOUCLE±2$♪TB3
00001730  F4 46 43 42 F4 30 2C 31 33 2C 31 30 0D F7 46 43  ⌠FCB⌠0,13,10♪≈FC
00001740  43 F4 24 42 4F 55 43 4C 45 F1 33 24 0D 54 41 46  C⌠$BOUCLE±3$♪TAF
00001750  F4 46 43 42 F4 30 2C 31 33 2C 31 30 0D F7 46 43  ⌠FCB⌠0,13,10♪≈FC
00001760  43 F4 24 50 41 53 F1 5B FF FF FF FF FF FF FF FF  C⌠$PAS±[        
00001770  FF FF 01 3C 01 35 44 27 41 46 46 49 43 48 41 47    ☺<☺5D'AFFICHAG
00001780  45 F2 3E 24 0D F7 46 43 42 F4 30 0D 54 42 4C F4  E≥>$♪≈FCB⌠0♪TBL⌠
00001790  52 4D 42 F4 31 32 38 30 0D 45 53 50 F4 52 4D 42  RMB⌠1280♪ESP⌠RMB
000017A0  F4 34 32 32 35 0D F7 45 4E 44 0D 4C FF FF FF FF  ⌠4225♪≈END♪L    
000017B0  FF FF FF FF FF FF 01 3C FF 00 FF BD FF FF FE FB        ☺< . ╜  ■√
S'agit-il d'assembleur cohérent et faut-il donc réécrire les octets qui manquent?
Daniel
Messages : 17319
Inscription : 01 mai 2007 18:30
Localisation : Vaucluse
Contact :

Re: Fractal sur To7

Message par Daniel »

Cette cassette pour ordinateur TO contient un programme source en assembleur : FRACTALS.ASM.
Avant de pouvoir l'exécuter, il faut d'abord le compiler. On peut utiliser la cartouche MEMO7 Assembleur 6809, de préférence la dernière version améliorée par Préhisto : Assembleur 6809 version 3. Voir http://dcmoto.free.fr

PS1: vous comprenez pourquoi je râle sans cesse contre les référenceurs de ROMs, du genre TOSEC et compagnie ? Ils diffusent des fichiers sans savoir ce qu'ils contiennent et sans documentation ni explications. Non seulement ils se trompent de machines, du genre mettre une cassette TO7 dans les ROMs MO5, mais aussi des programmes buggés ou complètement inutiles. Et puis, vous allez me traiter de vieux grincheux, mais pour moi une cassette, une disquette, un quick-disk ou autre support magnétique, ce n'est pas une ROM. Il faut appeler les choses par leur nom.

PS2: si je ne me trompe pas, fractals est un développement récent, pas un soft d'époque. Ne serait-ce pas un petit programme de __sam__, dont il a parlé il y a quelque temps dans le forum logicielsmoto ?

PS3: si TOSEC veut référencer toutes les oeuvres des programmeurs Thomson encore actifs : Prehisto, __sam__, moi-même et quelques autres, ils ont du travail en perspective : nous écrivons chacun deux ou trois programmes de ce type par jour depuis trente ans. Ca fait pas mal de ROMs :wink:
Daniel
L'obstacle augmente mon ardeur.
jester3
Messages : 11
Inscription : 23 sept. 2013 13:03

Re: Fractal sur To7

Message par jester3 »

Merci de votre réponse.
Il me semble avoir aussi vu exactement le même fichier dans un autre site de rom, qui il est vrai font du nombre au détriment de la qualité.Je ne l'ai trouvé nulle part ailleurs.
Je vais donc tenter de l'assembler, et aussi de retrouver mon mot de passe de logicielmoto, si le fichier y est hébergé par son auteur, il sera surement en bon état!
__sam__
Messages : 7924
Inscription : 18 sept. 2010 12:08
Localisation : Brest et parfois les Flandres

Re: Fractal sur To7

Message par __sam__ »

non ce n'est pas un programme à moi, et à vrai dire il est difficile de comprendre ce qu'il réalise.

L'analyse du code montre qu'il y a une routine pour tracer rapidement des points et des lignes. La compilation se passe sans problème. L'execution est plus ennuyeuses car on ne sait pas trop quoi rentrer. Moi j'ai mis:

Code : Tout sélectionner

MAILLE (0-2) > 2
HAUTEUR (10-60)>50
DEVIATION (0-16)>08
TAILLE (0-16, 1-32, 2-64) > 1
ca affiche ensuite des infos de calcul puis un mystérieux

Code : Tout sélectionner

PAS D'AFFICHAGE >
que je prenais pour une faute dans la saisies résultant en l'absence d'affichage! Et bien pas du tout, il faut comprendre "pas" comme "step", c'est à dire l'incrément d'affichage. Un peu au pif j'ai saisi 02 et obtenu:
Image

Et là tout s'éclaire: c'est un générateur de montagnes.. mais bien moins évolué que le miens évoqué ici: http://www.logicielsmoto.com/phpBB/view ... 3709#p3709
Image
Samuel.
A500 Vampire V2+ ^8^, A1200 (030@50mhz/fpu/64mb/cf 8go),
A500 GVP530(MMU/FPU) h.s., R-Pi, TO9, TO8D, TO8.Démos
jester3
Messages : 11
Inscription : 23 sept. 2013 13:03

Re: Fractal sur To7

Message par jester3 »

D'accord, merci à vous je sais maintenant que le programme fonctionne. Malheureusement j'ai bien tenté de charger le fichier asm dans l'assembleur v.3 sans problèmes, assembleé sans erreurs et sauvé sur k7 comme sur disquette, je ne peux par contre pas le charger et l'executer sur basic, bien que le fichier bin soit sur les supports utilisés.
Sinon la capture d'image de __sam__ ne ressemble pas vraiment au titre annoncé des fractales (ce qui m'avait intéressé à la base:tracer des fractales) et du coup son modélisateur de montagne, si il est basé sur des isobarres d'altitudes réélles et donc proche de la réalité est plus interessant...
__sam__
Messages : 7924
Inscription : 18 sept. 2010 12:08
Localisation : Brest et parfois les Flandres

Re: Fractal sur To7

Message par __sam__ »

Pour pouvoir le lancer en basic il faut faire quelques modifications:
1) Ajouter ORG $A000 en début de fichier pour indiquer que l'on assemble à partir de l'adresse $A000
2) modifier le END final en ajoutant O (la lettre O, pas le zéro): "END O" cela signifie que l'adresse de lancement sera celle de l'étiquette "O" définie en début de source.

Ensuite sous basic, il te faudra réserver la zone mémoire $A000 pour y loger le binaire: CLEAR,,&H9FFF (oui il faut 1 octet de moins). A partir de là tu peux faire LOADM "FRACTALS",,R pour charger et lancer le prog en question (en supposant que tu l'as assemblé sous le nom FRACTALS.BIN).

Sinon les fractales il y en a de toutes sortes:

Dans mon jeune temps je laissais le TO9 tourner des jours complets pour faire des animations des ensembles de Julia et Mandelbrot. Plus récemment encore j'ai des trucs spectaculaires sur le feu (indice: CPM) dont je n'ai pas encore trouvé le temps de les convertir du basic en ASM. Ces fractales sont basées sur des équations mathématiques qui les rendent identique d'une exécution à l'autre. C'est joli mais ca ne ressemble en rien à quelque chose de naturel.

La génération de montages n'est pas basée sur une définition mathématique mais sur un algorithme récursif saupoudré d'aléatoire pour faire des reliefs "auto-similaires" donc fractales mais ressemblant plus à la réalité. Dans le même style, pour ressembler à la réalité, il existait un programme qui affichait des disques noir sur un fond blanc, disques ayant la même distribution que les cratères d'impacts sur la lune. On obtenait alors un bout de lune réaliste à l'écran.

Quant aux progs, il y a eu un article dans SVM-Micro vers 1988 qui a lancé la mode de ce genres de programmes de génération de montage. Fondamentalement entre la version ASM et la mienne, les algos de générations doivent être sensiblement identiques. Par contre pour le rendu, le code ASM que tu as trouvé réalise un affichage en simple fil de fer alors que dans ma version je tiens compte d'un modèle d'illumination (soleil) et d'un modèle de sol tenant compte de la hauteur et de l'angle des facettes. J'ai mis pas mal de temps à aboutir à cette version qui bien que beaucoup plus rapide que mes première version en basic (il y a 25ans à la louche), est quand même trop lente avoir été utilisée dans la moindre démo. Il faut attendre de longues secondes/minutes que la scène se dessine. Il faut être très patient et surtout ne pas bufferiser trop de touches clavier sous peine de voir disparaitre la montagne a peine dessinée pour être remplacée par une autre. Seul les émulateurs en mode "super-super-boost" rendent son utilisation joyeuse: on peut tourner, zoomer, autour de la montage en temps réel avec un maillage assez détaillé ! Ah si seulement nous avions eu des thomson à 20Mhz... :roll:
Pièces jointes
mt.zip
(22.4 Kio) Téléchargé 186 fois
Samuel.
A500 Vampire V2+ ^8^, A1200 (030@50mhz/fpu/64mb/cf 8go),
A500 GVP530(MMU/FPU) h.s., R-Pi, TO9, TO8D, TO8.Démos
Daniel
Messages : 17319
Inscription : 01 mai 2007 18:30
Localisation : Vaucluse
Contact :

Re: Fractal sur To7

Message par Daniel »

Un très gros bug sur la première ligne de l'écran : il manque le n de montagnes :roll:
Après c'est spectaculaire, au moins dans dcmoto avec la fréquence du processeur réglée à 9999 kHz.
01.png
01.png (1.7 Kio) Consulté 5947 fois
02.png
02.png (3.4 Kio) Consulté 5947 fois
Daniel
L'obstacle augmente mon ardeur.
__sam__
Messages : 7924
Inscription : 18 sept. 2010 12:08
Localisation : Brest et parfois les Flandres

Re: Fractal sur To7

Message par __sam__ »

Oui la typo c'est pour voir s'il y en a qui suivent. Bravo Daniel! (c'est dans la partie basic du truc. Facilement réparable).
[EDIT] je parle de LA typo, mais il y en a au moins deux....

As tu appuyé sur 'n' pour avoir d'autres reliefs ? Tu peux aussi changer pour un mode fil de fer sans la couleur et avec des facettes transparentes. Là on atteint du temps réel avec la vitesse native et un maillage pas trop serré.
Dernière modification par __sam__ le 09 avr. 2014 20:53, modifié 2 fois.
Samuel.
A500 Vampire V2+ ^8^, A1200 (030@50mhz/fpu/64mb/cf 8go),
A500 GVP530(MMU/FPU) h.s., R-Pi, TO9, TO8D, TO8.Démos
Avatar de l’utilisateur
6502man
Messages : 12286
Inscription : 12 avr. 2007 22:46
Localisation : VAR
Contact :

Re: Fractal sur To7

Message par 6502man »

Ca me rappelle les programmes DOS de génération de fractals, a celui qui en affiché le plus en moins de temps :lol:

En tout cas c'est un challenge intéressant sur 8 bits la génération de paysage :D
Phil.

www.6502man.com

To bit or not to bit.
1 or 0.
jester3
Messages : 11
Inscription : 23 sept. 2013 13:03

Re: Fractal sur To7

Message par jester3 »

De mon coté j'ai enfin réussi à lancer Fractals.L'assembleur étant nouveau pour moi et n'ayant lu que les parties charger/sauver k7 disquette du mémo de la cartouche, j'étais passé à coté de la manip ORG(au début), qui est la base...c'en est genant pour moi....
J'ai donc modifié dans l'assembleur le fichier ASM, assemblé et sauvé sur disquette et , plus habitué au Basic, chargé un loader :
10 CLEAR,&h9FFF:LOADM"FRACTALS.BIN",,R (oui ça ne marche qu'avec une seule virgule après clear),ce qui évitera d'oublier l'adresse dans 6 mois 1 an...
ensuite je fais run"" sur le Basic 1.0 du TO7/70 et ça marche...rien d'exceptionnel (je pensais plus y trouver des fractales récursives) cependant ça reste bien de pouvoir essayer diverses configurations(pas d'affichage de 0 à 99)
Merci à __sam__ aussi d'avoir partagé mt.sap , logiciel utilisant un peu le même principe mais avec une application concrete comme modeliser le relief.
Il me semble, mais c'est purement spéculatif, qu'a partir des isobarres des reliefs représentés par differentes couleurs( la nomenclature conventionnelle va du vert, marron, au blanc) les montagnes sont générées et modélisées via le flocon de Koch.N'étant pas spécialiste je me trompe peut-être.
Répondre