int __cdecl sub_B663D0(int a1)
{
  int result; // eax@1
  int v2; // eax@2
  int v3; // esi@2
  int *v4; // eax@3
  int v5; // ebx@3
  int v6; // esi@3
  int v7; // [sp+4h] [bp-88h]@2
  int v8; // [sp+8h] [bp-84h]@2
  char v9; // [sp+Ch] [bp-80h]@10
  char v10; // [sp+6Ch] [bp-20h]@3
  int v11; // [sp+70h] [bp-1Ch]@3
  int v12; // [sp+74h] [bp-18h]@2
  int v13; // [sp+78h] [bp-14h]@2
  int v14; // [sp+7Ch] [bp-10h]@3
  int v15; // [sp+88h] [bp-4h]@2

  result = sub_851E80(a1, -1);
  if ( result )
  {
    v12 = 2;
    v13 = a1;
    v15 = 0;
    sub_8515F0(a1, -1); //GETFENV
    v2 = sub_851CE0(a1); // GETTOP
    sub_853060(a1, v2, "script");
    v7 = sub_605AA0();
    v8 = 0;
    LOBYTE(v15) = 1;
    sub_75C4A0(a1, -1, &v7, 0, 0);
    v3 = v7;
    if ( v3 == sub_60B410() )
    {
      v4 = (int *)sub_67AFD0(&v10);
      v5 = *v4;
      v14 = *v4;
      v6 = v11;
      LOBYTE(v15) = 2;
      if ( v11 )
      {
        if ( !_InterlockedExchangeAdd((volatile signed __int32 *)(v11 + 4), 0xFFFFFFFF) )
        {
          (*(void (__thiscall **)(int))(*(_DWORD *)v6 + 4))(v6);
          if ( !_InterlockedDecrement((volatile signed __int32 *)(v6 + 8)) )
            (*(void (__thiscall **)(int))(*(_DWORD *)v6 + 8))(v6);
        }
        v5 = v14;
      }
    }
    else
    {
      v5 = 0;
    }
    LOBYTE(v15) = 4;
    if ( v8 )
      (*(void (__cdecl **)(char *))(v8 + 8))(&v9);
    v15 = 5;
    sub_853E60(a1, -3);
    result = v5;
  }
  return result;
}