- {
- b++;
- switch (*(b++))
- {
- case 'A': // absolute address
- // stock:
- //sprintf(temp, "%04lx",
- // (addr&0xf800)|
- // (((code>>5)&0x07)*256 +
- // get_mem(MEM_ROM, addr+1)));
-
- sprintf(temp, "%06lx",
- (addr&0xf80000)|
- (((code>>5)&0x07)*(256*256) +
- (get_mem(MEM_ROM, addr+1) * 256) +
- get_mem(MEM_ROM, addr+2)));
- break;
- case 'l': // long address
- sprintf(temp, "%06lx",
- get_mem(MEM_ROM, addr+1)*(256*256) + get_mem(MEM_ROM, addr+1)*256
- + get_mem(MEM_ROM, addr+2));
- //get_mem(MEM_ROM, addr+1)*256 + get_mem(MEM_ROM, addr+2));
- break;
- case 'a': // addr8 (direct address) at 2nd byte
- if (!get_name(get_mem(MEM_ROM, addr+1), sfr_tbl(), temp))
- sprintf(temp, "%02lx", get_mem(MEM_ROM, addr+1));
- break;
- case '8': // addr8 (direct address) at 3rd byte
- if (!get_name(get_mem(MEM_ROM, addr+2), sfr_tbl(), temp))
- sprintf(temp, "%02lx", get_mem(MEM_ROM, addr+1));
- sprintf(temp, "%02lx", get_mem(MEM_ROM, addr+2));
- break;
- case 'b': // bitaddr at 2nd byte
- if (get_name(get_mem(MEM_ROM, addr+1), bit_tbl(), temp))
- break;
- if (get_name(get_bitidx(get_mem(MEM_ROM, addr+1)),
- sfr_tbl(), temp))
- {
- strcat(temp, ".");
- sprintf(c, "%1ld", get_mem(MEM_ROM, addr+1)&0x07);
- strcat(temp, c);
- break;
- }
- sprintf(temp, "%02x.%ld",
- get_bitidx(get_mem(MEM_ROM, addr+1)),
- get_mem(MEM_ROM, addr+1)&0x07);
- break;
- case 'r': // rel8 address at 2nd byte
- sprintf(temp, "%04lx",
- addr+2+(signed char)(get_mem(MEM_ROM, addr+1)));
- break;
- case 'R': // rel8 address at 3rd byte
- sprintf(temp, "%04lx",
- addr+3+(signed char)(get_mem(MEM_ROM, addr+2)));
- break;
- case 'd': // data8 at 2nd byte
- sprintf(temp, "%02lx", get_mem(MEM_ROM, addr+1));
- break;
- case 'D': // data8 at 3rd byte
- sprintf(temp, "%02lx", get_mem(MEM_ROM, addr+2));
- break;
- case '6': // data24 at 2nd(HH)-3rd(H)-4th(L) byte
- sprintf(temp, "%06lx",
- get_mem(MEM_ROM, addr+1)*256*256 + get_mem(MEM_ROM, addr+2)*256 +
- get_mem(MEM_ROM, addr+3));
- default:
- strcpy(temp, "?");
- break;
- }
- t= temp;
- while (*t)
- *(p++)= *(t++);
- }
+ {
+ b++;
+ switch (*(b++))
+ {
+ case 'A': // absolute address
+ // stock:
+ // sprintf (temp, "%04lx",
+ // (addr & 0xf800)|
+ // (((code >> 5) & 0x07) * 256 +
+ // get_mem (MEM_ROM, addr + 1)));
+
+ sprintf (temp, "%06lx",
+ (addr & 0xf80000) |
+ (((code >> 5) & 0x07) * (256 * 256) +
+ (get_mem (MEM_ROM, addr + 1) * 256) +
+ get_mem (MEM_ROM, addr + 2)));
+ break;
+ case 'l': // long address
+ sprintf (temp, "%06lx",
+ get_mem (MEM_ROM, addr + 1) * (256*256) +
+ get_mem (MEM_ROM, addr + 2) * 256 +
+ get_mem (MEM_ROM, addr + 3));
+ // get_mem (MEM_ROM, addr + 1) * 256 + get_mem (MEM_ROM, addr + 2));
+ break;
+ case 'a': // addr8 (direct address) at 2nd byte
+ if (!get_name (get_mem (MEM_ROM, addr + 1), sfr_tbl (), temp))
+ sprintf (temp, "%02lx", get_mem (MEM_ROM, addr + 1));
+ break;
+ case '8': // addr8 (direct address) at 3rd byte
+ if (!get_name (get_mem (MEM_ROM, addr + 2), sfr_tbl (), temp))
+ sprintf (temp, "%02lx", get_mem (MEM_ROM, addr + 1));
+ sprintf (temp, "%02lx", get_mem (MEM_ROM, addr + 2));
+ break;
+ case 'b': // bitaddr at 2nd byte
+ if (get_name (get_mem (MEM_ROM, addr + 1), bit_tbl (), temp))
+ break;
+ if (get_name (get_bitidx (get_mem (MEM_ROM, addr + 1)),
+ sfr_tbl (), temp))
+ {
+ strcat (temp, ".");
+ sprintf (c, "%1ld", get_mem (MEM_ROM, addr + 1) & 0x07);
+ strcat (temp, c);
+ break;
+ }
+ sprintf (temp, "%02x.%ld",
+ get_bitidx (get_mem (MEM_ROM, addr + 1)),
+ get_mem (MEM_ROM, addr + 1) & 0x07);
+ break;
+ case 'r': // rel8 address at 2nd byte
+ sprintf (temp, "%04lx",
+ addr + 2 + (signed char) (get_mem (MEM_ROM, addr + 1)));
+ break;
+ case 'R': // rel8 address at 3rd byte
+ sprintf (temp, "%04lx",
+ addr + 3 + (signed char) (get_mem (MEM_ROM, addr + 2)));
+ break;
+ case 'd': // data8 at 2nd byte
+ sprintf (temp, "%02lx", get_mem (MEM_ROM, addr + 1));
+ break;
+ case 'D': // data8 at 3rd byte
+ sprintf (temp, "%02lx", get_mem (MEM_ROM, addr + 2));
+ break;
+ default:
+ strcpy (temp, "?");
+ break;
+ }
+ t = temp;
+ while (*t)
+ *p++ = *t++;
+ }