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 ... 31 32 [33] 34 35 ... 40
481
Thanks, found and fixed.

October 2
- Fixed issue with Horoscope - List  calculating not all declination aspects.

482
Classic, Medieval, Vedic / Re: Medieval Traditional Chart
« on: September 28, 2020, 06:39:35 PM »
Thanks. Published.

483
Classic, Medieval, Vedic / Re: Medieval Traditional Chart
« on: September 28, 2020, 05:58:11 PM »
Ed those texts in the left bottom corner are inside a loop. They are bold and a bit diffuse because of that.

Good luck with the positions.

484
Planetdance for windows / Re: shortcuts
« on: September 22, 2020, 07:26:34 AM »
Next version will make the shortcut in the database window for Open, the same as the one in the main window for Open.

485
Planetdance for windows / Re: shortcuts
« on: September 21, 2020, 08:42:59 PM »
Now i understand.

Sorry no, those shortcuts can't be changed at the moment.

486
Planetdance for windows / Re: shortcuts
« on: September 21, 2020, 08:20:34 PM »
Sorry Jeremy, you are very hard to understand, it's like reading a unknown language.

487
Planetdance for windows / Re: shortcuts
« on: September 21, 2020, 07:42:56 PM »
options keyboard?

488
Planetdance for windows / Re: shortcuts
« on: September 21, 2020, 06:23:47 PM »
yeah sure.

489
Planetdance for windows / Re: shortcuts
« on: September 21, 2020, 04:16:12 PM »
it's accessible from File Open, and if it's already open you can also do ctrl-o there. There's also duplicate in that menu.

490
Planetdance for windows / Re: Filemanager and editors as tabbed windows
« on: September 20, 2020, 09:17:47 AM »
There is a new strcmd() mode.

17: puts the current databasename into str.

example:
strcmd(17, 0, filename);

This is preferable to using the 'defaultdatabase' variable because it is updated dynamically whenever the user changes a database in a filemanager.

491
Planetdance for windows / Filemanager and editors as tabbed windows
« on: September 19, 2020, 07:41:57 PM »
After some days work most seems to work. I will probably publish tomorrow.
Things to know, that need to go into the help:
- switching with alt-digit to another window does not work when an editor has focus because it uses alt-digit to set a bookmark. Use ctrl-alt digit to switch.
- A right mouseclick in the filemanager now shows a popup with the complete menu in stead of selecting a record. Use ctrl-click to (un)select a record.

[Edit] Gonna have a go at multiple window filemanager again before i publish.

492
Astrobasic / Re: create a temporary file
« on: September 12, 2020, 01:34:56 PM »
Made a memsearch command, help:

memsearch

Syntax: memsearch(int blockno, int stringoffset, char searchstring[$]);
Action: searches blockno at stringoffset for searchstring, returns number in block or -1 if not found.

Example:

Code: [Select]
window(660,660);
int i, n = readopen("jean.db", 0);
real planet[PLANETS];

` this is the structure for memget/read/write, 69 bytes total
real sun;
char name[61];

memget(0, n, 69);     ` make a memblock with each record's sun and name

for (i < n)
  {
  readrecord(0, i);
  getplanets(0, planet);
  sun = planet[0];
  getname(0, name);
  memwrite(0, i, &sun);
  }
i = memsearch(0, 8, "Jean Cremers"); ` search for this name,  'name' comes after real 'sun' so it starts at 8 bytes from the start.
if (i < 0)
  say("", "Not found");
else
  say("", "found");
run;



493
Astrobasic / Re: create a temporary file
« on: September 12, 2020, 12:59:59 PM »
memread/write is more powerfull because you can make structures.
I had a look at your code, you have

Code: [Select]
memget(0, 9999, 60); ` this will make a block with 9999 times 60 bytes
char s[99];
...
memwrite(0, i, &s);

The size of the parts in the block is 60 bytes but you are using a string of 99 bytes. So i hope you know what you are doing. Those functions are meant for things like this:

int a[10], b;
real c[6];
char s[100];

In total this 'structure' is 10 * 4 + 4 + 6 * 8 + 100 = 500 bytes, so you do memget(0, 9999, 500) and now you can do
memread(0, i, &a);
because the structure starts with int a.

Take a good look at this, i'\m not sure you understand these functions correct.
If you do maybe you can do something else in stead of just using one string with  strset(s, "%20s,%d,%d,%d,%d,%.2f,%.2f,0",jdx,aa,aaa,a,graf,p1,p2);

This is also why i can only help to a certain point, it is your work :).

I will make a memsearch()


494
Astrobasic / Re: create a temporary file
« on: September 11, 2020, 09:18:12 PM »
if you prefer the memget/memread etc. functions because they are more powerful, i could make a function to search for data in a memory block fast. But i'm not gonna write your script for you, you have to design it yourself, i can only help with the functions. And please do communication about it here on the forum, i will not help via email, i have too much other work and things to do.

495
Astrobasic / Re: create a temporary file
« on: September 11, 2020, 06:55:55 PM »
no it does nothing, sorry, i always use 'i=i' for debugging.

But at that place a duplicate is found and you can see which. What do you want to do with duplicates?

Code: [Select]
window(555, 555);
real planet[PLANETS];
char s[999];

int i, n = readopen("jean.db", 0);
strlist(0, s, 0);
for (i < n)
  {
  readrecord(0, i);
  getplanets(0, planet);
  strset(s, "%d", planet[0]); ` etc
  int m = strlist(12, s, 0);
  if (m = -1)
    strlist(3, s, 0);` not found, add it
  else
    {
    ` here a duplicate is found, it is number m in the stringlist
    }
  }
run;

Pages: 1 ... 31 32 [33] 34 35 ... 40