micro(A)v11

[mnrvovrfc]

@mnrvovrfc you know aurel is talking about SdlBasic epizy site (that was shut down) not his own? (basic4us.epizy.com has been working just fine so far as I can tell. Of course, I don't try all those Browsers and Linux flavors as they LOL)

You weren't here this morning. I edited my post because maybe Aurel got offended at the "drama" that it had. I wanted to post a giant "horror face" emoticon.

[aurel]

maybe Aurel got offended at the "drama

 no ..why should i be offended...heh

[mnrvovrfc]

I have asked my cohort from the other forum to post one of the two programs for QB64 having to do with a "doodle" that we had been working on toward the summer.

At first we post the viewer. Don't panic and don't get confused that it doesn't work. The problem is the response file needs to be created. It could be rather large. At the moment I can't sign up for Mediafire or such other file-sharing service because I have limited Internet. I had thought Zippyshare was convenient until I ran it one day with Palemoon. Never again. :O

I had "roquedrivel" post the viewer in the other forum first. Later on we will reveal the plotting program, which you must run in order to get a response file. Then you use the viewer to look at the response file.

I'm sorry about teasing like this, but this was derrived from a program I was going to keep to myself because it's not very sophisticated. I've always been fascinated by function plotting by messing around with the basic trigonometric functions, by making as many "useful" variations as possible to the functions, by trying to come up with an efficient way to constrain as many points of the function as possible into the display, by increasing or decreasing the number of iterations to plot, by adding "skew" and more.

Erm, I'm going to have to work on that screenshot.

Here is something to think about, although it's not the output of my program!

[aurel]

I don't get it ,is that  style.txt file file exist somewhere else
and why is that big?

[mnrvovrfc]

"roquedrivel" is complaining now your forum requires log-in even to read it.

[bplus]

Hmm... I haven't been able to access Aurel's forum since late last night:
   

Update: no sooner than I post this, I get access back to Aurel's place where he is ranting about my other friend Charlie. I think the expression is: meh

Oh there is an emoji:
   

Ever notice when stuck with coding problem you distract yourself with these dramas at forums. It's so much easier than getting user defined subs and functions into your interpreter ;-))

Another update LOL! Oh I see what he did, you have to sign in before you can access the content in Aurel's forum. That's pretty clever in a sly sort of way! 

[aurel]

It's so much easier than getting user defined subs and functions into your interpreter ;-))

 Yo Mark   

But YOU asked for USR functions and i posted some Java code then
you say ..that you give up...so i give up too  

of course it is not that hard ..but require time and energy

[bplus]

Never said, I gave (or give) up. Never say that! 

I don't do tokenization and I don't do JS let alone Java (who does Java anyway? that's full time job) so, was not much help to me.  I probably can't be helped because of the esoteric path I did take.

So enough about all that junk, what's new with MicroA?

[aurel]

Nothing new ,
but i have in plan to translate one big program to micro(A)

but wait:
I can try modify this Java code for o2 so probably can work
because i translate logical expressions from Java code ..even i never before use Java
in fact all languages have similar things with little bit different syntax.

[aurel]

in fact this function can be easy to translate into any BASIC

Code: (Select All)

set-Up-Arguments

function setupArgs(int nArgs) {
        getLeftParen(); ' get "("
        int i = topOfStack;
        int count = nArgs;
        If (nextToken() <> ")" )
            do {
              getToken();
              If (i>=0)
                  stack.symTabIndex = tokenAddress;
              i = i - 1 ' count from top to botom
              count = count - 1
              getToken();
            } While (token = ",");
            putTokenBack();
        }
        If (count!=0)
          error(nArgs+" argument"+(nArgs==1?"":"s")+" expected");
        getRightParen(); '-> get ")"
    }