// File: /workspace/github_c_makefile_star2_O2/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 0x1cfc4
testl %eax, %eax
je 0x250f0
leaq 0x5d8bc(%rip), %rdi     # 0x829a5
xorl %eax, %eax
callq 0x2acb8
movslq %ebx, %rcx
movq %rcx, (%rsp)
imulq $0x2c, %rcx, %rax
leaq 0x3fea2e(%rip), %r13    # 0x423b30
leaq (%rax,%r13), %rbx
movswl 0x18(%r13,%rax), %edi
pushq $0x5
popq %rsi
callq 0x1cf0c
cmpw $-0x1, %ax
je 0x25189
movswq %ax, %rax
imulq $0x2c, %rax, %rcx
leaq (%rcx,%r13), %rdi
movq (%rbx), %rdx
movq %rdx, (%r13,%rcx)
movl 0x8(%rbx), %edx
movl %edx, 0x8(%r13,%rcx)
movl $0x5340000, 0xc(%r13,%rcx) # imm = 0x5340000
movw $0xfc, 0x10(%r13,%rcx)
movb $0x20, 0x12(%r13,%rcx)
movl $0x2222, 0x14(%r13,%rcx) # imm = 0x2222
movl 0x1c(%rbx), %edx
movl %edx, 0x1c(%r13,%rcx)
movabsq $0x1f000000000000, %rdx # imm = 0x1F000000000000
movq %rdx, 0x20(%r13,%rcx)
movl $0xffff0000, 0x28(%r13,%rcx) # imm = 0xFFFF0000
imulq $0xc, %rax, %rsi
addq 0xa1e37(%rip), %rsi     # 0xc6fb8
pushq $0x3
popq %rdx
callq 0x56a36
pushq $0x6
popq %rbp
movl $0x1ff, %r12d           # imm = 0x1FF
subl $0x1, %ebp
jb 0x2528c
movswl 0x18(%rbx), %edi
pushq $0x7
popq %rsi
callq 0x1cf0c
cmpw $-0x1, %ax
je 0x25192
movswq %ax, %rax
movq %rax, 0x8(%rsp)
imulq $0x2c, %rax, %r14
leaq (%r14,%r13), %rax
movq %rax, 0x10(%rsp)
movq (%rbx), %rax
movq %rax, (%r13,%r14)
movl 0x8(%rbx), %eax
movl $0x2000, %ecx           # imm = 0x2000
addl %ecx, %eax
movl %eax, 0x8(%r13,%r14)
movl $0x5340002, 0xc(%r13,%r14) # imm = 0x5340002
movw $0xfc, 0x10(%r13,%r14)
movb $0x20, 0x12(%r13,%r14)
movl $0x1818, 0x14(%r13,%r14) # imm = 0x1818
movzwl 0x1c(%rbx), %eax
movw %ax, 0x1c(%r13,%r14)
leaq 0x5d7b4(%rip), %r15     # 0x829bf
movq %r15, %rdi
callq 0x2945b
andl %r12d, %eax
movl $0xffffff00, %ecx       # imm = 0xFFFFFF00
addl %ecx, %eax
movw %ax, 0x20(%r13,%r14)
movq %r15, %rdi
callq 0x2945b
andl %r12d, %eax
movl $0xffffff00, %ecx       # imm = 0xFFFFFF00
addl %ecx, %eax
movw %ax, 0x22(%r13,%r14)
movq %r15, %rdi
callq 0x2945b
andl $0x4000, %eax           # imm = 0x4000
addl $0xffffe000, %eax       # imm = 0xFFFFE000
movw %ax, 0x24(%r13,%r14)
movzwl 0x1e(%rbx), %eax
movw %ax, 0x1e(%r13,%r14)
movl $0x60, 0x26(%r13,%r14)
orw $-0x1, 0x2a(%r13,%r14)
imulq $0xc, 0x8(%rsp), %rsi
addq 0xa1d3e(%rip), %rsi     # 0xc6fb8
movq 0x10(%rsp), %rdi
pushq $0x3
popq %rdx
callq 0x56a36
jmp 0x25192
leaq 0x101f9d(%rip), %rax    # 0x127230
movq (%rsp), %rcx
movq (%rax,%rcx,8), %rax
movl (%rax), %esi
movl 0x4(%rax), %edx
pushq $0x68
popq %rdi
pushq $0x2
popq %r8
xorl %ecx, %ecx
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
jmp 0x1ab2a