+ if(keystate) {
+ if(keystate & BN_LEFT) {
+ angle += TURN_SPEED;
+ }
+ if(keystate & BN_RIGHT) {
+ angle -= TURN_SPEED;
+ }
+
+ fwd[0] = -SIN(angle);
+ fwd[1] = COS(angle);
+ right[0] = fwd[1];
+ right[1] = -fwd[0];
+
+ if(keystate & BN_A) {
+ pos[0] = (pos[0] + fwd[0]) & POS_MASK;
+ pos[1] = (pos[1] + fwd[1]) & POS_MASK;
+ if(pos[0] < 0) pos[0] += VOX_SZ << 16;
+ if(pos[1] < 0) pos[1] += VOX_SZ << 16;
+ }
+
+ if((keystate & BN_B) && (timer_msec - last_shot >= P_RATE)) {
+ last_shot = timer_msec;
+ for(i=0; i<total_enemies; i++) {
+ if(enemies[i].hp && enemies[i].vobj.px >= 0) {
+ int dx = enemies[i].vobj.px - 120;
+ int dy = enemies[i].vobj.py - 80;
+ int rad = enemies[i].vobj.scale >> 5;
+
+ if(rad < 1) rad = 1;
+
+ if(abs(dx) < rad && abs(dy) < (rad << 1)) {
+ enemies[i].shot_frame = -1;
+ if(--enemies[i].hp <= 0) {
+ if(++num_kills >= total_enemies) {
+ victory();
+ }
+ }
+ hit_px = enemies[i].vobj.px;
+ hit_py = enemies[i].vobj.py;
+ hitfrm = nframes;
+ break;
+ }
+ }
+ }
+ }
+ if(keystate & BN_UP) {
+ if(horizon > 40) horizon -= ELEV_SPEED;
+ }
+ if(keystate & BN_DOWN) {
+ if(horizon < 200 - ELEV_SPEED) horizon += ELEV_SPEED;
+ }
+ if(keystate & BN_RT) {
+ pos[0] = (pos[0] + right[0]) & POS_MASK;
+ pos[1] = (pos[1] + right[1]) & POS_MASK;
+ if(pos[0] < 0) pos[0] += VOX_SZ << 16;
+ if(pos[1] < 0) pos[1] += VOX_SZ << 16;
+ did_strafe = 1;
+ }
+ if(keystate & BN_LT) {
+ pos[0] = (pos[0] - right[0]) & POS_MASK;
+ pos[1] = (pos[1] - right[1]) & POS_MASK;
+ if(pos[0] < 0) pos[0] += VOX_SZ << 16;
+ if(pos[1] < 0) pos[1] += VOX_SZ << 16;
+ did_strafe = 1;
+ }
+
+ pheight = vox_view(pos[0], pos[1], -40, angle);
+ }
+
+ /* enemy logic */
+ enemy = enemies;
+ for(i=0; i<total_enemies; i++) {
+ /* only consider enemies which are not dead */
+ if(enemy->hp <= 0) {
+ enemy++;
+ continue;
+ }
+
+ if(enemy->shot_frame >= 0) {
+ /* in the process of charging a shot */
+ if(++enemy->shot_frame >= NUM_SHOT_FRAMES - 1) {
+ /* only get hit if we can see the enemy and we didn't strafe */
+ if(!did_strafe && enemy->vobj.px >= 0) {
+ hit_frame = 1;
+ if(--energy <= 0) {
+ gameover = 1;
+ }
+ }
+ enemy->shot_frame = -1;
+ }
+ } else if(enemy->vobj.px >= 0) {
+ /* check rate of fire and start a shot if necessary */
+ if(enemy->last_shot == -1) {
+ enemy->last_shot = timer_msec;
+ } else if(timer_msec - enemy->last_shot >= E_RATE) {
+ enemy->last_shot = timer_msec;
+ enemy->shot_frame = 0;
+ }
+ }
+ enemy++;
+ }
+
+skip_game_logic:
+
+ snum = 0;
+ /* turrets number */
+ spr_oam(oam, dynspr_base + snum++, numspr[num_kills][0], 200, 144, SPR_VRECT | SPR_256COL);
+ spr_oam(oam, dynspr_base + snum++, numspr[num_kills][1], 208, 144, SPR_VRECT | SPR_256COL);
+ spr_oam(oam, dynspr_base + snum++, numspr[total_enemies][0], 224, 144, SPR_VRECT | SPR_256COL);
+ spr_oam(oam, dynspr_base + snum++, numspr[total_enemies][1], 232, 144, SPR_VRECT | SPR_256COL);
+ /* energy bar */
+ if(energy == MAX_ENERGY) {
+ ledspr = SPRID_LEDBLU;
+ } else {
+ ledspr = energy > 2 ? SPRID_LEDGRN : SPRID_LEDRED;
+ }
+ for(i=0; i<5; i++) {
+ spr_oam(oam, dynspr_base + snum++, i >= energy ? SPRID_LEDOFF : ledspr,
+ 8 + (i << 3), 144, SPR_VRECT | SPR_256COL);
+ }
+ /* blaster sprites */
+ if(timer_msec - last_shot <= SHOT_TIME) {
+ spr_oam(oam, dynspr_base + snum++, SPRID_LAS0, -8, 118, SPR_SZ32 | SPR_256COL);
+ spr_oam(oam, dynspr_base + snum++, SPRID_LAS1, 22, 103, SPR_SZ32 | SPR_256COL);
+ spr_oam(oam, dynspr_base + snum++, SPRID_LAS2, 54, 88, SPR_SZ32 | SPR_256COL);
+ spr_oam(oam, dynspr_base + snum++, SPRID_LAS3, 86, 72, SPR_SZ32 | SPR_256COL);
+
+ spr_oam(oam, dynspr_base + snum++, SPRID_LAS0, 240 + 8 - 32, 118, SPR_SZ32 | SPR_256COL | SPR_HFLIP);
+ spr_oam(oam, dynspr_base + snum++, SPRID_LAS1, 240 - 22 - 32, 103, SPR_SZ32 | SPR_256COL | SPR_HFLIP);
+ spr_oam(oam, dynspr_base + snum++, SPRID_LAS2, 240 - 54 - 32, 88, SPR_SZ32 | SPR_256COL | SPR_HFLIP);
+ spr_oam(oam, dynspr_base + snum++, SPRID_LAS3, 240 - 86 - 32, 72, SPR_SZ32 | SPR_256COL | SPR_HFLIP);
+ }
+ /* hit sparks */
+ if(nframes - hitfrm < 5) {
+ int id = SPRID_SPARK0 + (nframes - hitfrm);
+ spr_oam(oam, dynspr_base + snum++, id, hit_px - 16, hit_py - 16,
+ SPR_DBLSZ | SPR_SZ16 | SPR_256COL | SPR_ROTSCL | SPR_ROTSCL_SEL(0));
+ }
+ /* enemy sprites */
+ /*spr_oam(oam, dynspr_base + snum++, SPRID_ENEMY, 50, 50, SPR_VRECT | SPR_SZ64 | SPR_256COL);*/
+ enemy = enemies;
+ for(i=0; i<total_enemies; i++) {
+ int sid, anm, px, py, yoffs;
+ unsigned int flags;
+ int16_t mat[4];
+ int32_t sa, ca, scale;
+
+ if(enemy->vobj.px >= 0) {
+ flags = SPR_DBLSZ | SPR_256COL | SPR_ROTSCL | SPR_ROTSCL_SEL(0);
+ if(enemy->hp > 0) {
+ anm = (enemy->anm + (vblcount >> 3)) & 0xf;
+ sid = SPRID_ENEMY0 + ((anm & 7) << 2);
+ flags |= SPR_SZ32 | SPR_VRECT;
+ yoffs = 32;
+ } else {
+ anm = 0;
+ sid = SPRID_HUSK;
+ flags |= SPR_SZ16;
+ yoffs = 16;
+ }
+
+ px = enemy->vobj.px - 120;
+ py = enemy->vobj.py - 80;
+ xform_pixel(&px, &py);
+
+
+ if(enemy->shot_frame >= 0) {
+ if(enemy->shot_frame < SFRM_LVL1) {
+ spr_oam(oam, dynspr_base + snum++, SPRID_SHOT0, px - 16, py - 16,
+ SPR_DBLSZ | SPR_SZ16 | SPR_256COL | SPR_ROTSCL | SPR_ROTSCL_SEL(0));
+ } else if(enemy->shot_frame < SFRM_LVL2) {
+ spr_oam(oam, dynspr_base + snum++, SPRID_SHOT1, px - 16, py - 16,
+ SPR_DBLSZ | SPR_SZ16 | SPR_256COL | SPR_ROTSCL | SPR_ROTSCL_SEL(0));
+ } else {
+ spr_oam(oam, dynspr_base + snum++, SPRID_SHOT2, px - 16, py - 16,
+ SPR_DBLSZ | SPR_SZ16 | SPR_256COL | SPR_ROTSCL | SPR_ROTSCL_SEL(0));
+ }
+ }
+
+
+ spr_oam(oam, dynspr_base + snum++, sid, px - 16, py - yoffs, flags);
+
+ scale = enemy->vobj.scale;
+ if(scale > 0x10000) scale = 0x10000;
+ sa = xform_sa / scale;
+ ca = xform_ca / scale;
+ mat[0] = anm >= 8 ? -ca : ca;
+ mat[1] = sa;
+ mat[2] = -sa;
+ mat[3] = ca;
+
+ spr_transform(oam, 0, mat);
+ enemy->vobj.px = -1;
+ }
+ enemy++;
+ }
+ for(i=snum; i<dynspr_count; i++) {
+ spr_oam_clear(oam, dynspr_base + i);
+ }
+
+ mask(INTR_VBLANK);
+ dynspr_count = snum;
+ unmask(INTR_VBLANK);
+
+ return 0;