// File: /workspace/github_c_makefile_star2_O1/jonof[P]jftekwar/src/tekstat.c
// Function: forceexplosion
void
forceexplosion(int i)
{
	int      j,k;

    #ifdef PLRSPRDEBUG
     if( isaplayersprite(i) ) {
          crashgame("messing w plrsprite at 34");
     }
    #endif

     j=jsinsertsprite(sprite[i].sectnum, 5);
     if( j != -1 ) {
	     fillsprite(j,sprite[i].x,sprite[i].y,sprite[i].z,0,-4,0,
		           32,34,34,0,0,FORCEBALLPIC,sprite[i].ang,
              	      0,0,0,sprite[i].owner,sprite[i].sectnum,5,31,0,-1);
     }

	for(k=0;k<6;k++)
	{
          j=jsinsertsprite(sprite[i].sectnum, 7);
          if( j != -1 ) {
		     fillsprite(j,sprite[i].x,sprite[i].y,sprite[i].z+(8<<10),2,-4,0,
			           32,24,24,0,0,FORCEBALLPIC,sprite[i].ang,
                       (krand_intercept("STAT4497")&511)-256,(krand_intercept("STAT4497")&511)-256,(krand_intercept("STAT4497")&16384)-8192,
			           sprite[i].owner,sprite[i].sectnum,7,96,0,-1);
          }
	}

     playsound(S_FORCEFIELD2, sprptr[i]->x,sprptr[i]->y,0, ST_UPDATE);
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movl %edi, %ebx
callq 0x1ea05
testl %eax, %eax
je 0x273bd
leaq 0x66567(%rip), %rdi     # 0x8d91d
xorl %eax, %eax
callq 0x2d800
movslq %ebx, %rcx
movq %rcx, (%rsp)
imulq $0x2c, %rcx, %rax
leaq 0x403741(%rip), %r12    # 0x42ab10
leaq (%r12,%rax), %r13
movswl 0x18(%r12,%rax), %edi
movl $0x5, %esi
callq 0x1e94c
cmpw $-0x1, %ax
je 0x27484
movswq %ax, %rax
imulq $0x2c, %rax, %rcx
leaq (%r12,%rcx), %rdi
movl (%r13), %edx
movl %edx, (%r12,%rcx)
movl 0x4(%r13), %edx
movl %edx, 0x4(%r12,%rcx)
movl 0x8(%r13), %edx
movl %edx, 0x8(%r12,%rcx)
movl $0x5340000, 0xc(%r12,%rcx) # imm = 0x5340000
movw $0xfc, 0x10(%r12,%rcx)
movb $0x20, 0x12(%r12,%rcx)
movl $0x2222, 0x14(%r12,%rcx) # imm = 0x2222
movzwl 0x1c(%r13), %edx
movw %dx, 0x1c(%r12,%rcx)
movl $0x0, 0x20(%r12,%rcx)
movw $0x0, 0x24(%r12,%rcx)
movzwl 0x1e(%r13), %edx
movw %dx, 0x1e(%r12,%rcx)
movl $0x1f, 0x26(%r12,%rcx)
movw $0xffff, 0x2a(%r12,%rcx) # imm = 0xFFFF
leaq (%rax,%rax,2), %rsi
shlq $0x2, %rsi
addq 0xa6b3e(%rip), %rsi     # 0xcdfb8
movl $0x3, %edx
callq 0x5da55
movl $0x6, %ebp
movl $0x1ff, %r15d           # imm = 0x1FF
movswl 0x18(%r13), %edi
movl $0x7, %esi
callq 0x1e94c
cmpw $-0x1, %ax
je 0x27598
movswq %ax, %rax
movq %rax, 0x8(%rsp)
imulq $0x2c, %rax, %rbx
leaq (%r12,%rbx), %rax
movq %rax, 0x10(%rsp)
movl (%r13), %eax
movl %eax, (%r12,%rbx)
movl 0x4(%r13), %eax
movl %eax, 0x4(%r12,%rbx)
movl 0x8(%r13), %eax
movl $0x2000, %ecx           # imm = 0x2000
addl %ecx, %eax
movl %eax, 0x8(%r12,%rbx)
movl $0x5340002, 0xc(%r12,%rbx) # imm = 0x5340002
movw $0xfc, 0x10(%r12,%rbx)
movb $0x20, 0x12(%r12,%rbx)
movl $0x1818, 0x14(%r12,%rbx) # imm = 0x1818
movzwl 0x1c(%r13), %eax
movw %ax, 0x1c(%r12,%rbx)
leaq 0x66426(%rip), %r14     # 0x8d937
movq %r14, %rdi
callq 0x2be4a
andl %r15d, %eax
movl $0xffffff00, %ecx       # imm = 0xFFFFFF00
addl %ecx, %eax
movw %ax, 0x20(%r12,%rbx)
movq %r14, %rdi
callq 0x2be4a
andl %r15d, %eax
movl $0xffffff00, %ecx       # imm = 0xFFFFFF00
addl %ecx, %eax
movw %ax, 0x22(%r12,%rbx)
movq %r14, %rdi
callq 0x2be4a
andl $0x4000, %eax           # imm = 0x4000
addl $0xffffe000, %eax       # imm = 0xFFFFE000
movw %ax, 0x24(%r12,%rbx)
movzwl 0x1e(%r13), %eax
movw %ax, 0x1e(%r12,%rbx)
movl $0x60, 0x26(%r12,%rbx)
movw $0xffff, 0x2a(%r12,%rbx) # imm = 0xFFFF
movq 0x8(%rsp), %rax
leaq (%rax,%rax,2), %rsi
shlq $0x2, %rsi
addq 0xa6a2f(%rip), %rsi     # 0xcdfb8
movq 0x10(%rsp), %rdi
movl $0x3, %edx
callq 0x5da55
decl %ebp
jne 0x2748f
leaq 0x106c69(%rip), %rax    # 0x12e210
movq (%rsp), %rcx
movq (%rax,%rcx,8), %rax
movl (%rax), %esi
movl 0x4(%rax), %edx
movl $0x68, %edi
xorl %ecx, %ecx
movl $0x2, %r8d
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
jmp 0x1c1f1