// license:GPL-2.0+ // copyright-holders:Jarek Burczynski /*************************************************************************** video.c Functions to emulate the video hardware of the machine. ***************************************************************************/ #include "emu.h" #include "includes/tubep.h" #include "video/resnet.h" /*************************************************************************** Convert the color PROMs into a more useable format. Tube Panic has two 32 bytes palette control PROMs. First one is connected to the RGB output this way: bit 7 -- 220 ohm resistor -- \ -- 470 ohm resistor -- | -- 470 ohm pulldown resistor -- BLUE -- 220 ohm resistor -- \ -- 470 ohm resistor -- | -- 470 ohm pulldown resistor -- GREEN -- 1 kohm resistor -- / -- 220 ohm resistor -- \ -- 470 ohm resistor -- | -- 470 ohm pulldown resistor -- RED bit 0 -- 1 kohm resistor -- / The second PROM is used to control eight 74LS368s in following way: (see the schematics for more comprehensible picture) BLUE CONTROL: PROM bit 7 -- /enable on LS368 @E16 PROM bit 6 -- /enable on LS368 @E15 6 outputs (Q1 to Q6) from E16 go to BLUE output (the same line as the first PROM) via 6 resistors: Q1 -- 8200 -- BLUE Q2 -- 4700 -- BLUE Q3 -- 2200 -- BLUE Q4 -- 1000 -- BLUE Q5 -- 470 -- BLUE Q6 -- 220 -- BLUE 6 outputs (Q1 to Q6) from E15 go to BLUE output (the same line as the first PROM) via 6 resistors: Q1 --15000 -- BLUE Q2 -- 8200 -- BLUE Q3 -- 4700 -- BLUE Q4 -- 2200 -- BLUE Q5 -- 1000 -- BLUE Q6 -- 470 -- BLUE GREEN CONTROL: PROM bit 5 -- /enable on LS368 @E14 PROM bit 4 -- /enable on LS368 @E13 PROM bit 3 -- /enable on LS368 @E12 6 outputs (Q1 to Q6) from E14 go to GREEN output (the same line as the first PROM) via 6 resistors: Q1 -- 8200 -- GREEN Q2 -- 4700 -- GREEN Q3 -- 2200 -- GREEN Q4 -- 1000 -- GREEN Q5 -- 470 -- GREEN Q6 -- 220 -- GREEN 6 outputs (Q1 to Q6) from E13 go to GREEN output (the same line as the first PROM) via 6 resistors: Q1 --15000 -- GREEN Q2 -- 8200 -- GREEN Q3 -- 4700 -- GREEN Q4 -- 2200 -- GREEN Q5 -- 1000 -- GREEN Q6 -- 470 -- GREEN 6 outputs (Q1 to Q6) from E12 go to GREEN output (the same line as the first PROM) via 6 resistors: Q1 --33000 -- GREEN Q2 --15000 -- GREEN Q3 -- 8200 -- GREEN Q4 -- 4700 -- GREEN Q5 -- 2200 -- GREEN Q6 -- 1000 -- GREEN RED CONTROL: PROM bit 2 -- /enable on LS368 @E11 PROM bit 1 -- /enable on LS368 @E10 PROM bit 0 -- /enable on LS368 @E9 6 outputs (Q1 to Q6) from E11 go to RED output (the same line as the first PROM) via 6 resistors: Q1 -- 8200 -- RED Q2 -- 4700 -- RED Q3 -- 2200 -- RED Q4 -- 1000 -- RED Q5 -- 470 -- RED Q6 -- 220 -- RED 6 outputs (Q1 to Q6) from E10 go to RED output (the same line as the first PROM) via 6 resistors: Q1 --15000 -- RED Q2 -- 8200 -- RED Q3 -- 4700 -- RED Q4 -- 2200 -- RED Q5 -- 1000 -- RED Q6 -- 470 -- RED 6 outputs (Q1 to Q6) from E9 go to RED output (the same line as the first PROM) via 6 resistors: Q1 --33000 -- RED Q2 --15000 -- RED Q3 -- 8200 -- RED Q4 -- 4700 -- RED Q5 -- 2200 -- RED Q6 -- 1000 -- RED ***************************************************************************/ void tubep_state::tubep_palette(palette_device &palette) { const uint8_t *color_prom = memregion("proms")->base(); { // text palette variables static constexpr int resistors_txt_rg[3] = { 1000, 470, 220 }; static constexpr int resistors_txt_b [2] = { 470, 220 }; double weights_txt_rg[3]; double weights_txt_b[2]; compute_resistor_weights(0, 255, -1.0, 3, resistors_txt_rg, weights_txt_rg, 470, 0, 2, resistors_txt_b, weights_txt_b, 470, 0, 0, nullptr, nullptr, 0, 0 ); // create text palette for (int i = 0; i < 32; i++) { int bit0, bit1, bit2; // red component bit0 = BIT(*color_prom, 0); bit1 = BIT(*color_prom, 1); bit2 = BIT(*color_prom, 2); int const r = combine_weights(weights_txt_rg, bit0, bit1, bit2); // green component bit0 = BIT(*color_prom, 3); bit1 = BIT(*color_prom, 4); bit2 = BIT(*color_prom, 5); int const g = combine_weights(weights_txt_rg, bit0, bit1, bit2); // blue component bit0 = BIT(*color_prom, 6); bit1 = BIT(*color_prom, 7); int const b = combine_weights(weights_txt_b, bit0, bit1); palette.set_pen_color(i, rgb_t(r, g, b)); color_prom++; } } // sprites use the second PROM to control 8 x LS368. We copy content of this PROM over here for (int i = 0; i < 32; i++) m_prom2[i] = *color_prom++; // background/sprites palette variables static constexpr int resistors_0[6] = { 33000, 15000, 8200, 4700, 2200, 1000 }; static constexpr int resistors_1[6] = { 15000, 8200, 4700, 2200, 1000, 470 }; static constexpr int resistors_2[6] = { 8200, 4700, 2200, 1000, 470, 220 }; // create background/sprites palette /* find the output scaler in order to do this we need to calculate the output with everything enabled. */ int active_resistors_r[3 * 6]; int active_resistors_g[3 * 6]; int active_resistors_b[2 * 6]; for (int i = 0; i < 6; i++) { // red component active_resistors_r[ 0+i] = resistors_0[i]; active_resistors_r[ 6+i] = resistors_1[i]; active_resistors_r[12+i] = resistors_2[i]; // green component active_resistors_g[ 0+i] = resistors_0[i]; active_resistors_g[ 6+i] = resistors_1[i]; active_resistors_g[12+i] = resistors_2[i]; // blue component active_resistors_b[ 0+i] = resistors_1[i]; active_resistors_b[ 6+i] = resistors_2[i]; } // calculate and store the scaler double weights_r[3 * 6]; double weights_g[3 * 6]; double weights_b[2 * 6]; /*double const output_scaler = */compute_resistor_weights(0, 255, -1.0, 3*6, active_resistors_r, weights_r, 470, 0, 3*6, active_resistors_g, weights_g, 470, 0, 2*6, active_resistors_b, weights_b, 470, 0); /* compute_resistor_weights(0, 255, output_scaler, 3*6, active_resistors_r, weights_r, 470, 0, 3*6, active_resistors_g, weights_g, 470, 0, 2*6, active_resistors_b, weights_b, 470, 0); */ /* now calculate all possible outputs from the circuit */ for (int i = 0; i < 256; i++) { for (int sh = 0; sh < 0x40; sh++) { int j = i; /* active low */ int shade = sh^0x3f; /* negated outputs */ //int active_r = 3*6; //int active_g = 3*6; //int active_b = 2*6; int bits_r[3 * 6]; int bits_g[3 * 6]; int bits_b[2 * 6]; for (int c = 0; c < 6; c++) { bits_r[0 + c] = (shade>>c) & 1; bits_r[6 + c] = (shade>>c) & 1; bits_r[12+ c] = (shade>>c) & 1; bits_g[0 + c] = (shade>>c) & 1; bits_g[6 + c] = (shade>>c) & 1; bits_g[12+ c] = (shade>>c) & 1; bits_b[0 + c] = (shade>>c) & 1; bits_b[6 + c] = (shade>>c) & 1; } //j &= 0x7; /* only red; debug */ /* red component */ if (BIT(j, 0)) /* if LS368 @E9 is disabled */ { for (int c=0; c<6; c++) bits_r[0 +c] = 0; //active_r-=6; } if (BIT(j, 1)) /* if LS368 @E10 is disabled */ { for (int c=0; c<6; c++) bits_r[6 +c] = 0; //active_r-=6; } if (BIT(j, 2)) /* if LS368 @E11 is disabled */ { for (int c=0; c<6; c++) bits_r[12 +c] = 0; //active_r-=6; } /* green component */ if (BIT(j, 3)) /* if LS368 @E12 is disabled */ { for (int c=0; c<6; c++) bits_g[0 +c] = 0; //active_g-=6; } if (BIT(j, 4)) /* if LS368 @E13 is disabled */ { for (int c=0; c<6; c++) bits_g[6 +c] = 0; //active_g-=6; } if (BIT(j, 5)) /* if LS368 @E14 is disabled */ { for (int c=0; c<6; c++) bits_g[12+c] = 0; //active_g-=6; } /* blue component */ if (BIT(j, 6)) /* if LS368 @E15 is disabled */ { for (int c=0; c<6; c++) bits_b[0 +c] = 0; //active_b-=6; } if (BIT(j, 7)) /* if LS368 @E16 is disabled */ { for (int c=0; c<6; c++) bits_b[6 +c] = 0; //active_b-=6; } double out; out = 0.0; for (int c = 0; c < 3*6; c++) out += weights_r[c] * bits_r[c]; int const r = int(out + 0.5); out = 0.0; for (int c = 0; c < 3*6; c++) out += weights_g[c] * bits_g[c]; int const g = int(out + 0.5); out = 0.0; for (int c = 0; c < 2*6; c++) out += weights_b[c] * bits_b[c]; int const b = int(out + 0.5); //logerror("Calculate [%x:%x] (active resistors:r=%i g=%i b=%i) = ", i, shade, active_r, active_g, active_b); //logerror("r:%3i g:%3i b:%3i\n",r,g,b); palette.set_pen_color(32+ i*0x40 + sh, rgb_t(r, g, b)); } } } void tubep_state::video_start() { m_spritemap = std::make_unique(256*256*2); m_sprite_timer = timer_alloc(TIMER_SPRITE); /* Set up save state */ save_item(NAME(m_romD_addr)); save_item(NAME(m_romEF_addr)); save_item(NAME(m_E16_add_b)); save_item(NAME(m_HINV)); save_item(NAME(m_VINV)); save_item(NAME(m_XSize)); save_item(NAME(m_YSize)); save_item(NAME(m_mark_1)); save_item(NAME(m_mark_2)); save_item(NAME(m_colorram_addr_hi)); save_item(NAME(m_ls273_g6)); save_item(NAME(m_ls273_j6)); save_item(NAME(m_romHI_addr_mid)); save_item(NAME(m_romHI_addr_msb)); save_item(NAME(m_DISP)); save_item(NAME(m_background_romsel)); save_item(NAME(m_color_A4)); save_item(NAME(m_ls175_b7)); save_item(NAME(m_ls175_e8)); save_item(NAME(m_ls377_data)); save_item(NAME(m_page)); } void tubep_state::video_reset() { memset(m_spritemap.get(),0,256*256*2); m_romD_addr = 0; m_romEF_addr = 0; m_E16_add_b = 0; m_HINV = 0; m_VINV = 0; m_XSize = 0; m_YSize = 0; m_mark_1 = 0; m_mark_2 = 0; m_colorram_addr_hi = 0; m_ls273_g6 = 0; m_ls273_j6 = 0; m_romHI_addr_mid = 0; m_romHI_addr_msb = 0; m_DISP = 0; m_background_romsel = 0; m_color_A4 = 0; m_ls175_b7 = 0x0f | 0xf0; m_ls175_e8 = 0x0f; m_ls377_data = 0; m_page = 0; } WRITE8_MEMBER(tubep_state::tubep_textram_w) { m_textram[offset] = data; } WRITE_LINE_MEMBER(tubep_state::screen_flip_w) { // screen flip, active high } WRITE_LINE_MEMBER(tubep_state::background_romselect_w) { // 0->select roms: B1,B3,B5; 1->select roms: B2,B4,B6 m_background_romsel = state; } WRITE_LINE_MEMBER(tubep_state::colorproms_A4_line_w) { // line A4 (color proms address) state m_color_A4 = state << 4; } WRITE8_MEMBER(tubep_state::tubep_background_a000_w) { m_ls175_b7 = ((data & 0x0f) ^ 0x0f) | 0xf0; } WRITE8_MEMBER(tubep_state::tubep_background_c000_w) { m_ls175_e8 = ((data & 0x0f) ^ 0x0f); } void tubep_state::draw_sprite() { uint32_t XDOT; uint32_t YDOT; uint8_t * romCxx = memregion("user2")->base()+0x00000; uint8_t * romD10 = romCxx+0x10000; uint8_t * romEF13 = romCxx+0x12000; uint8_t * romHI2 = romCxx+0x14000; for (YDOT=0; (YDOT^m_YSize) != 0x00; YDOT++) { /* upper part of the schematic */ uint32_t ls273_e12 = romD10[ m_romD_addr | YDOT ] & 0x7f; uint32_t romEF_addr_now = m_romEF_addr | ls273_e12; uint32_t E16_add_a = romEF13[ romEF_addr_now ] | ((romEF13[0x1000 + romEF_addr_now ]&0x0f)<<8); uint32_t F16_add_b = E16_add_a + m_E16_add_b; /* lower part of the schematic */ uint32_t romHI_addr = (YDOT) | (m_romHI_addr_mid) | (((m_romHI_addr_msb + 0x800) )&0x1800); uint32_t ls273_g4 = romHI2[ romHI_addr ]; uint32_t ls273_j4 = romHI2[0x2000+ romHI_addr ]; uint32_t ls86_gh5 = ls273_g4 ^ m_VINV; uint32_t ls86_ij5 = ls273_j4 ^ m_VINV; uint32_t ls157_gh7= m_ls273_g6 | (m_mark_2); uint32_t ls157_ij7= m_ls273_j6 | (m_mark_1); uint32_t ls283_gh8= (m_VINV & 1) + ls86_gh5 + ((ls86_gh5 & 0x80)<<1) + ls157_gh7; uint32_t ls283_ij8= (m_VINV & 1) + ls86_ij5 + ((ls86_ij5 & 0x80)<<1) + ls157_ij7; uint32_t ls273_g9 = ls283_gh8; uint32_t ls273_j9 = ls283_ij8; for (XDOT=0; (XDOT^m_XSize) != 0x00; XDOT++) { /* upper part of the schematic */ uint32_t romD10_out = romD10[ m_romD_addr | XDOT ]; uint32_t F16_add_a = (romD10_out & 0x7e) >>1; uint32_t romCxx_addr = (F16_add_a + F16_add_b ) & 0xffff; uint32_t romCxx_out = romCxx[ romCxx_addr ]; uint32_t colorram_addr_lo = (romD10_out&1) ? (romCxx_out>>4)&0x0f: (romCxx_out>>0)&0x0f; uint8_t sp_data = m_sprite_colorsharedram[ m_colorram_addr_hi | colorram_addr_lo ] & 0x0f; /* 2114 4-bit RAM */ /* lower part of the schematic */ romHI_addr = (XDOT) | (m_romHI_addr_mid) | (m_romHI_addr_msb); ls273_g4 = romHI2[ romHI_addr ]; ls273_j4 = romHI2[0x2000+ romHI_addr ]; ls86_gh5 = ls273_g4 ^ m_HINV; ls86_ij5 = ls273_j4 ^ m_HINV; ls157_gh7= ls273_g9; ls157_ij7= ls273_j9; ls283_gh8= (m_HINV & 1) + ls86_gh5 + ((ls86_gh5 & 0x80)<<1) + ls157_gh7; ls283_ij8= (m_HINV & 1) + ls86_ij5 + ((ls86_ij5 & 0x80)<<1) + ls157_ij7; if ( !((ls283_gh8&256) | (ls283_ij8&256)) ) /* skip wrapped sprite area - PAL12L6 (PLA019 in Roller Jammer schematics)*/ { if ( m_spritemap[ (ls283_gh8&255) + (ls283_ij8&255)*256 + m_DISP*256*256 ] == 0x0f ) m_spritemap[ (ls283_gh8&255) + (ls283_ij8&255)*256 + m_DISP*256*256 ] = sp_data; } } } } WRITE8_MEMBER(tubep_state::tubep_sprite_control_w) { if (offset < 10) { /*graph_ctrl[offset] = data;*/ switch(offset) { case 0: /*a*/ m_romEF_addr = (0x010 | (data & 0x0f))<<7; /*roms @F13, @E13 have A11 lines connected to +5V directly */ m_HINV = (data & 0x10) ? 0xff: 0x00; m_VINV = (data & 0x20) ? 0xff: 0x00; break; case 1: /*b: XSize-1 */ m_XSize = data & 0x7f; m_mark_2 = (data&0x80)<<1; break; case 2: /*c: YSize-1 */ m_YSize = data & 0x7f; m_mark_1 = (data&0x80)<<1; break; case 3: /*d*/ m_ls273_g6 = (data & 0xff); break; case 4: /*e*/ m_ls273_j6 = (data & 0xff); break; case 5: /*f*/ m_romHI_addr_mid = (data & 0x0f)<<7; m_romHI_addr_msb = (data & 0x30)<<7; break; case 6: /*g*/ m_romD_addr = (data & 0x3f)<<7; break; case 7: /*h: adder input LSB*/ m_E16_add_b = ((data & 0xff) << 0) | (m_E16_add_b & 0xff00); break; case 8: /*J: adder input MSB*/ m_E16_add_b = ((data & 0xff) << 8) | (m_E16_add_b & 0x00ff); break; case 9: /*K*/ /*write to: LS174 @J3 to set color bank (hi address lines to 2114 colorram @J1 ) */ m_colorram_addr_hi = (data & 0x3f) << 4; /*write to: LS74 @D13 to clear the interrupt line /SINT /SINT line will be reasserted in m_XSize * m_YSize cycles (RH0 signal cycles) */ /* 1.clear the /SINT interrupt line */ m_mcu->set_input_line(0, CLEAR_LINE); /* 2.assert /SINT again after this time */ m_sprite_timer->adjust(attotime::from_hz(19968000/8) * ((m_XSize+1)*(m_YSize+1))); /* 3.clear of /SINT starts sprite drawing circuit */ draw_sprite(); break; } } } void tubep_state::tubep_vblank_end() { m_DISP = m_DISP ^ 1; /* logerror("EOF: DISP after this is=%i, and clearing it now.\n", m_DISP); */ /* clear the new frame (the one that was (just) displayed)*/ memset(m_spritemap.get()+m_DISP*256*256, 0x0f, 256*256); } uint32_t tubep_state::screen_update_tubep(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) { int DISP_ = m_DISP^1; pen_t pen_base = 32; //change it later uint32_t v; uint8_t *text_gfx_base = memregion("gfx1")->base(); uint8_t *romBxx = memregion("user1")->base() + 0x2000*m_background_romsel; /* logerror(" update: from DISP=%i y_min=%3i y_max=%3i\n", DISP_, cliprect.min_y, cliprect.max_y+1); */ for (v = cliprect.min_y; v <= cliprect.max_y; v++) /* only for current scanline */ { uint32_t h; uint32_t sp_data0=0,sp_data1=0,sp_data2=0; for (h = 0*8; h < 32*8; h++) { offs_t text_offs; uint8_t text_code; uint8_t text_gfx_data; sp_data2 = sp_data1; sp_data1 = sp_data0; sp_data0 = m_spritemap[ h + v*256 +(DISP_*256*256) ]; text_offs = ((v >> 3) << 6) | ((h >> 3) << 1); text_code = m_textram[text_offs]; text_gfx_data = text_gfx_base[(text_code << 3) | (v & 0x07)]; if (text_gfx_data & (0x80 >> (h & 0x07))) bitmap.pix16(v, h) = (m_textram[text_offs + 1] & 0x0f) | m_color_A4; else { uint32_t bg_data; uint32_t sp_data; uint32_t romB_addr = (((h>>1)&0x3f)^((h&0x80)?0x00:0x3f)) | (((v&0x7f)^((v&0x80)?0x00:0x7f))<<6); uint8_t rom_select = (h&0x01) ^ (((h&0x80)>>7)^1); /* read from ROMs: B3/4 or B5/6 */ uint8_t romB_data_h = romBxx[ 0x4000 + 0x4000*rom_select + romB_addr ]; /* romB_data_h = output of LS374 @B3 or @B4 */ uint32_t VR_addr = ((romB_data_h + m_ls175_b7) & 0xfe) << 2; /* VR_addr = output of LS157s @B1 and @B6 */ uint8_t xor_logic = (((h^v)&0x80)>>7) ^ (m_background_romsel & (((v&0x80)>>7)^1)); /* read from ROMs: B1/2 */ uint8_t romB_data_l = romBxx[ romB_addr ] ^ (xor_logic?0xff:0x00); /* romB_data_l = output of LS273 @B10 */ uint8_t ls157_b11 = (romB_data_l >> ((rom_select==0)?4:0))&0x0f; uint8_t ls283_b12 = (ls157_b11 + m_ls175_e8) & 0x0f; VR_addr |= (ls283_b12>>1); bg_data = m_backgroundram[ VR_addr ]; romB_data_h>>=2; if ((sp_data0 != 0x0f) && (sp_data1 == 0x0f) && (sp_data2 != 0x0f)) sp_data = sp_data2; else sp_data = sp_data1; if (sp_data != 0x0f) bg_data = m_prom2[sp_data | m_color_A4]; bitmap.pix16(v, h) = pen_base + bg_data*64 + romB_data_h; } } } return 0; } /*************************************************************************** Convert the color PROMs into a more useable format. Roller Jammer has two 32 bytes palette PROMs, connected to the RGB output this way: bit 7 -- 220 ohm resistor -- \ -- 470 ohm resistor -- | -- 470 ohm pulldown resistor -- BLUE -- 220 ohm resistor -- \ -- 470 ohm resistor -- | -- 470 ohm pulldown resistor -- GREEN -- 1 kohm resistor -- / -- 220 ohm resistor -- \ -- 470 ohm resistor -- | -- 470 ohm pulldown resistor -- RED bit 0 -- 1 kohm resistor -- / ***************************************************************************/ void tubep_state::rjammer_palette(palette_device &palette) const { uint8_t const *color_prom = memregion("proms")->base(); static constexpr int resistors_rg[3] = { 1000, 470, 220 }; static constexpr int resistors_b [2] = { 470, 220 }; double weights_rg[3]; double weights_b[2]; compute_resistor_weights(0, 255, -1.0, 3, resistors_rg, weights_rg, 470, 0, 2, resistors_b, weights_b, 470, 0, 0, nullptr, nullptr, 0, 0); for (int i = 0; i < palette.entries(); i++) { int bit0, bit1, bit2; // red component bit0 = BIT(*color_prom, 0); bit1 = BIT(*color_prom, 1); bit2 = BIT(*color_prom, 2); int const r = combine_weights(weights_rg, bit0, bit1, bit2); // green component bit0 = BIT(*color_prom, 3); bit1 = BIT(*color_prom, 4); bit2 = BIT(*color_prom, 5); int const g = combine_weights(weights_rg, bit0, bit1, bit2); // blue component bit0 = BIT(*color_prom, 6); bit1 = BIT(*color_prom, 7); int const b = combine_weights(weights_b, bit0, bit1); palette.set_pen_color(i, rgb_t(r,g,b)); color_prom++; } } WRITE8_MEMBER(tubep_state::rjammer_background_LS377_w) { m_ls377_data = data & 0xff; } WRITE8_MEMBER(tubep_state::rjammer_background_page_w) { m_page = (data & 1) * 0x200; } uint32_t tubep_state::screen_update_rjammer(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) { int DISP_ = m_DISP^1; uint32_t v; uint8_t *text_gfx_base = memregion("gfx1")->base(); uint8_t *rom13D = memregion("user1")->base(); uint8_t *rom11BD = rom13D+0x1000; uint8_t *rom19C = rom13D+0x5000; /* this can be optimized further by extracting constants out of the loop */ /* especially read from ROM19C can be done once per 8 pixels*/ /* and the data could be bitswapped beforehand */ for (v = cliprect.min_y; v <= cliprect.max_y; v++) /* only for current scanline */ { uint32_t h; uint32_t sp_data0=0,sp_data1=0,sp_data2=0; uint8_t pal14h4_pin19; uint8_t pal14h4_pin18; uint8_t pal14h4_pin13; uint32_t addr = (v*2) | m_page; uint32_t ram_data = m_rjammer_backgroundram[ addr ] + 256*(m_rjammer_backgroundram[ addr+1 ]&0x2f); addr = (v>>3) | ((m_ls377_data&0x1f)<<5); pal14h4_pin13 = (rom19C[addr] >> ((v&7)^7) ) &1; pal14h4_pin19 = (ram_data>>13) & 1; for (h = 0*8; h < 32*8; h++) { offs_t text_offs; uint8_t text_code; uint8_t text_gfx_data; sp_data2 = sp_data1; sp_data1 = sp_data0; sp_data0 = m_spritemap[ h + v*256 +(DISP_*256*256) ]; text_offs = ((v >> 3) << 6) | ((h >> 3) << 1); text_code = m_textram[text_offs]; text_gfx_data = text_gfx_base[(text_code << 3) | (v & 0x07)]; if (text_gfx_data & (0x80 >> (h & 0x07))) bitmap.pix16(v, h) = 0x10 | (m_textram[text_offs + 1] & 0x0f); else { uint32_t sp_data; if ((sp_data0 != 0x0f) && (sp_data1 == 0x0f) && (sp_data2 != 0x0f)) sp_data = sp_data2; else sp_data = sp_data1; if (sp_data != 0x0f) bitmap.pix16(v, h) = 0x00 + sp_data; else { uint32_t bg_data; uint8_t color_bank; uint32_t ls283 = (ram_data & 0xfff) + h; uint32_t rom13D_addr = ((ls283>>4)&0x00f) | (v&0x0f0) | (ls283&0xf00); /* note: there is a jumper between bit 7 and bit 6 lines (bit 7 line is unused by default) */ /* default: bit 6 is rom select signal 0=rom @11B, 1=rom @11D */ uint32_t rom13D_data = rom13D[ rom13D_addr ] & 0x7f; /* rom13d_data is actually a content of LS377 @14C */ uint32_t rom11BD_addr = (rom13D_data<<7) | ((v&0x0f)<<3) | ((ls283>>1)&0x07); uint32_t rom11_data = rom11BD[ rom11BD_addr]; if ((ls283&1)==0) bg_data = rom11_data & 0x0f; else bg_data = (rom11_data>>4) & 0x0f; addr = (h>>3) | (m_ls377_data<<5); pal14h4_pin18 = (rom19C[addr] >> ((h&7)^7) ) &1; /* PAL14H4 @15A funct PIN6 = disable color on offscreen area PIN19,PIN18,PIN13 = arguments for PIN17 function PIN17 = background color bank (goes to A4 line on PROM @16A) formula for PIN17 is: PIN17 = ( PIN13 & PIN8 & PIN9 & !PIN11 & PIN12 ) | ( PIN18 & PIN8 & PIN9 & PIN11 & !PIN12 ) | ( PIN19 ) where: PIN 8 = bit 3 of bg_data PIN 9 = bit 2 of bg_data PIN 11= bit 1 of bg_data PIN 12= bit 0 of bg_data not used by now, but for the record: PIN15 = select prom @16B (active low) PIN16 = select prom @16A (active low) PINs: 1,2,3,4,5 and 7,14 are used for priority system */ color_bank = (pal14h4_pin13 & ((bg_data&0x08)>>3) & ((bg_data&0x04)>>2) & (((bg_data&0x02)>>1)^1) & (bg_data&0x01) ) | (pal14h4_pin18 & ((bg_data&0x08)>>3) & ((bg_data&0x04)>>2) & ((bg_data&0x02)>>1) & ((bg_data&0x01)^1) ) | (pal14h4_pin19); bitmap.pix16(v, h) = 0x20 + color_bank*0x10 + bg_data; } } } } return 0; }