Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - Jean

Pages: [1] 2 3 ... 85
1
Planetdance General / Re: Transits in Statusbar
« on: Today at 01:06:08 PM »
Yes i was looking into 'not enough timers', it's fixed again.

2
Astrobasic / Re: syzygy()
« on: January 18, 2025, 06:50:30 PM »
I get asc. 21.54 for that chart. And syzygy 25 leo 44.

3
Astrobasic / Re: syzygy()
« on: January 18, 2025, 04:45:50 PM »
will do later.

4
Planetdance General / Re: Time Zone Error
« on: January 18, 2025, 10:48:05 AM »
I tested this and it works for me.  >:(

5
Planetdance General / Re: planetdance and AI
« on: January 18, 2025, 08:07:19 AM »
Thanks! This is great. Claude doesn't even let me pay without a VAT number. Enjoying my first month!

6
Astrobasic / Re: getalmuten()
« on: January 17, 2025, 09:56:23 AM »
Wow that went far better than i had expected! Good job Ed!

7
Planetdance General / Re: Update Error
« on: January 17, 2025, 07:23:52 AM »
You don't need to, i intercept cases where a script begins with a digit and change the name internally.
(this is needed because those names will become menu items and so have to follow certain rules)

8
Astrobasic / Re: getalmuten()
« on: January 17, 2025, 07:21:05 AM »
Excellent Ed, published.

Code: [Select]
if (trip == 2)
  {
  char fireTrip[2][3] = {{ SUN, JUPITER, SATURN }, { JUPITER, SUN, SATURN }},
       earthTrip[2][3] = {{ VENUS, MOON, MARS }, { MOON, VENUS, MARS }},
       airTrip[2][3] = {{ SATURN, MERCURY, JUPITER }, { MERCURY, SATURN, JUPITER }},
       waterTrip[2][3] = {{ VENUS, MARS, MOON },  { MARS, VENUS, MOON }},
       el = ((int)(lon / 30)) % 4;
       for (int i = 0; i < 3; i++)
         switch (el)
           {
           case 0: alm[fireTrip[sect][i]] += 3 - i; break;
           case 1: alm[earthTrip[sect][i]] += 3 - i; break;
           case 2: alm[airTrip[sect][i]] += 3 - i; break;
           case 3: alm[waterTrip[sect][i]] += 3 - i; break;
           }
  }

9
Astrobasic / Re: getalmuten()
« on: January 16, 2025, 06:43:17 PM »
This looks a bit fishy, because the loop starts with i = 0, so the first compare is if (alm[0]==alm[0]), so n will be at least 1.
n is the number of almuten that getalmuten() returns, and puts the index of the sort from those almutens in res.
Why it sorts and why it returns those indexes i can't remember.

Code: [Select]
n = 0;
for (int i = 0; i < 3; i++)
  if (alm[i] == alm[0])
    n++;

10
Astrobasic / Re: getalmuten()
« on: January 16, 2025, 06:26:09 PM »
Oops! This one is in the category, 'i should have documented that'.
I must have gotten this from your code somewhere, no way i wrote all that myself.
Getbound 10, 7, 2, 11 or 3 and bn[bounds] are called.
Can you make something of it?
Else we could make simple test cases and discuss them.

Code: [Select]
int __fastcall Getalmuten(double lon, char bounds, char sect, char trip, int *res)
{
int alm[7] = {0}, ndx[7], bn[] = {0, 1, 4, 6}, n;
n = Getbound(10, lon, 0); // ruler
alm[n] += 5;
n = Getbound(7, lon, 0); // exaltations
if (n > -1)
  alm[n] += 4;
n = Getbound(bn[bounds], lon, sect); // bounds
alm[n] += 2;
if (trip == 2)
  {
  char fireTrip[3] = { SUN, JUPITER, SATURN }, earthTrip[3] = { VENUS, MOON, MARS },
       airTrip[3] = { SATURN, MERCURY, JUPITER }, waterTrip[3] = { VENUS, MARS, MOON },
       el = ((int)(lon / 30)) % 4;
       for (int i = 0; i < 3; i++)
         switch (el)
           {
           case 0: alm[fireTrip[i]] += 3; break;
           case 1: alm[earthTrip[i]] += 3; break;
           case 2: alm[airTrip[i]] += 3; break;
           case 3: alm[waterTrip[i]] += 3; break;
           }
  }
else
  {
  n = Getbound(trip ? 11 : 3, lon, sect);
  alm[n] += 3;
  }
n = Getbound(2, lon, sect); // face
alm[n] += 1;
intsort(alm, 7, 1, ndx);
n = 0;
for (int i = 0; i < 3; i++)
  if (alm[i] == alm[0])
    n++;
for (int i = 0; i < n; i++)
  res[i] = ndx[i];
return n;
}

//---------------------------------------------------------------------------
int __fastcall Getbound(int mode, int lon, bool sect)
{
int r = lon % 30, n = lon / 30; // 25, 1
switch (mode)
  {
  case -1: return sect;
  case 0:
  for (int i = 0; i < 5; i++)
    if (r >= egyptval[n][i] && r < egyptval[n][i + 1])
      return egyptbounds[n][i];
  break;
  case 1:
  for (int i = 0; i < 5; i++)
    if (r >= ptolval[n][i] && r < ptolval[n][i + 1])
      return ptolbounds[n][i];
  break;
  case 2:
  return face[(int)lon / 10];
  case 3:
  return sect ? trip_noct[n] : trip_diur[n];
  case 4:
  for (int i = 0; i < 5; i++)
    if (r >= valChaldeanBounds[i] && r < valChaldeanBounds[i + 1])
      {
      if (sect) return chaldeanNightBounds[n][i];
      else return chaldeanDayBounds[n][i];
      }
  case 5:
  if (sect)
    {
    for (int i = 0; i < 7; i++)
      if (r >= valValensNightBounds[n * 8 + i] && r < valValensNightBounds[n * 8 + i + 1])
        return valensNightBounds[n][i];
    }
  else
    {
    for (int i = 0; i < 7; i++)
      if (r >= valValensDayBounds[n * 8 + i] && r < valValensDayBounds[n * 8 + i + 1])
        return valensDayBounds[n][i];
    }
  break;
  case 6:
  for (int i = 0; i < 5; i++)
    if (r >= valLillyBounds[n][i] && r < valLillyBounds[n][i + 1])
      return lillyBoundsVar[n][i];
  break;
  case 7: return gbexal[n]; //exaltations
  case 8: return gbdetr[n]; //detriment
  case 9: return gbfall[n]; //fall
  case 10: return gbruler[n]; //ruler
  case 11: return sect ? trip_noct[n] : lillyDiur[n]; //lilly
  case 12: break;
  case 13: break;
  }
return 0;
}


11
Planetdance General / Re: Update Error
« on: January 16, 2025, 02:55:57 PM »
ps, component names may not start wit a digit. That's why that error happened.

12
Planetdance General / Re: Update Error
« on: January 16, 2025, 10:04:16 AM »
Ok i put that line back, although the documentation says it's not needed.
Volker we all have frustrating experiences so please don't take it out on me, i have enough shit on my own to deal with.

13
Planetdance General / Re: Update Error
« on: January 16, 2025, 09:22:54 AM »
The fix in the .exe that i did was not needed, i was mistaken, it shouldn't have any effect, numbers in scriptnames are allowed. I have reverted it. If you get errors on the next update get back here.
I tried myself with 45-degree-disc.ab, no errors.

14
Planetdance General / Re: Update Error
« on: January 16, 2025, 08:50:52 AM »
And what does the message mean
Not enough timer available ?

It happens sometimes, dunno why. Have you renamed? Where did you place this script?

15
Planetdance General / Re: Update Error
« on: January 16, 2025, 08:30:03 AM »
You made a script, 15_degree_symbols.ab, give it a name without digits.

Pages: [1] 2 3 ... 85