micro(A) Interpreter

[Aurel]

That Softpedia statistic is not relevant or real at all
if is true then i will receive one email in a one year at least
but i don't receive any email about AurelBasic in past 3 years...
so that is how is it...

yes PureBasic is most popular dialect ..even is not BASIC in real sense
Freebasic forum is let say active ...
QB64 is the most active forum /dialect right now ..i am not sure 

[round157]

That Softpedia statistic is not relevant or real at all
if is true then i will receive one email in a one year at least
but i don't receive any email about AurelBasic in past 3 years...

If the address of the official website(http://aurelbasicsoft.ucoz.com/) doesn't work and the latest version of AurelBasic was released in 2014, no email from them last three years is normal and reasonable. Those people simply thought that AurelBasic had been abandoned by its author. Those people simply used other free alternatives(QB64, FreeBasic, etc.)

The 44 votes might be given to AurelBasic from 2014-2015?

yes PureBasic is most popular dialect ..even is not BASIC in real sense
Freebasic forum is let say active ...
QB64 is the most active forum /dialect right now ..i am not sure

In conculsion, several BASIC dialects are successful.

[Aurel]

It is nice to have interest but this is not conclusion because this topic is about
microA not AurelBasic,and in general talking about past is useless.

[round157]

It is nice to have interest but this is not conclusion because this topic is about
microA not AurelBasic,and in general talking about past is useless.

Ha...okay. But our discussion about BASIC is still
interesting. The discussion may inspire you to make
micro(A) perfect since the experiences of other successful
BASIC dialects may be helpful to micro(A)!

Actually, rapid development of some language freewares always amazes me. An example:
https://www.syntaxbomb.com/index.php/topic,8171.0.html

[Aurel]

Ahh Cerberus
by my old friend Mike ..all 5
but that one or similar is not type of languages i like or i use

Just to let you know ...
I doing some mumbo-jumbo with primitive graphics to see is there a way for making
really simple games in micro(A)..so i will let you know .
all best..

[round157]

Ahh Cerberus
by my old friend Mike ..all 5

Cerberus is actively developed. He is a hardworking language developer. SmallBASIC's chrisws is also hardworking.

I doing some mumbo-jumbo with primitive graphics to see is there a way for making
really simple games in micro(A)..

You are a hardworking language developer, too!

[Aurel]

No i am not at all
That i am hardworking developer some people maybe will do games,programs already in microA
I am just a hobby developer and i am not in hurry in any way 

[round157]

I am just a hobby developer and i am not in hurry in any way 

Okay. Good luck to the first formal version of your interpreter.

[Aurel]

Christmas revision and small update on github:
github.com/aurelVZ/microA-programming-language
I don't have nothing better at moment ..so i just convert my old ruben progie
with Christmass tree...

Code: [Select]

'chTree
var rise, rad, frad, xshorten
var left, top, width, height, bpx, bpy, tpx, tpy
var x1, y1, x2, y2
var ht,xs,aa,msto
var tpxx,tpyy,bpxx,bpyy,minus4

wcolor 0,0,0
msto = -100
minus4 = -4
bpx=220 : bpy=410 : tpx=bpx
 
'brown ..............................
fcolor 130, 100, 0
aa = minus4
while aa < 4
   bpxx=bpx+aa : bpyy=bpy-390
  line bpxx, bpy, bpx, bpyy
aa = aa + 1
swap
wend

'green...............................
fcolor 30,120,40
rad=160 : tpy=bpy-40
ht=1
while ht < 40
xs= -100
  while xs < 100 
    xshorten=xs/100 
    rise= rnd(0.93) : tpxx = tpx+(xshorten*rad) : tpyy = tpy-rise*rad
    line tpx, tpy, tpxx, tpyy
 
    aa=1
     while aa < 30
       frad=rnd(0.9)*rad
       x1=tpx+(xshorten*frad)
       y1=tpy-rise*frad
       x2=tpx+xshorten*(frad+rad/5)
       y2=tpy-rise*frad+(-rise + (rnd(0.9)-0.456))*(rad/5)
       line x1, y1, x2, y2
       aa=aa+1   
    wend
 
   xs = xs + 40
  wend

rad=rad-4 : tpy=tpy-9
ht = ht + 1 : swap
wend 

bcolor 80,0,100 :fcolor 200,220,200
print 300,40," * * * Merry Christmas ! * * * "
bcolor 60,0,120 :fcolor 200,220,200
print 350,80," micro(A) by Aurel "




[Aurel]

Here is how look

[round157]

Here is how look

Your tree is beautiful. It looks like a real pine tree.

[Aurel]

Thanks round it is real 
by the way Happy New Year !! 

[Aurel]

Little bit better xmass card in micro(A)

Code: [Select]

'chTree
var rise, rad, frad, xshorten
var left, top, width, height, bpx, bpy, tpx, tpy
var x1, y1, x2, y2
var ht,xs,aa,msto
var tpxx,tpyy,bpxx,bpyy,minus4
var x,y,px,py
wcolor 0,0,0
drawStars()
msto = -100
minus4 = -4
bpx=220 : bpy=410 : tpx=bpx
 
'brown ..............................
fcolor 130, 100, 0
aa = minus4
while aa < 4
   bpxx=bpx+aa : bpyy=bpy-390
  line bpxx, bpy, bpx, bpyy
aa = aa + 1
swap
wend

'green...............................
fcolor 30,120,40
rad=160 : tpy=bpy-40
ht=1
while ht < 40
xs= -100
  while xs < 100 
    xshorten=xs/100 
    rise= rnd(0.93) : tpxx = tpx+(xshorten*rad) : tpyy = tpy-rise*rad
    line tpx, tpy, tpxx, tpyy
 
    aa=1
     while aa < 30
       frad=rnd(0.9)*rad
       x1=tpx+(xshorten*frad)
       y1=tpy-rise*frad
       x2=tpx+xshorten*(frad+rad/5)
       y2=tpy-rise*frad+(-rise + (rnd(0.9)-0.456))*(rad/5)
       line x1, y1, x2, y2
       aa=aa+1   
    wend
 
   xs = xs + 40
  wend

rad=rad-4 : tpy=tpy-9
ht = ht + 1 : swap
wend 

bcolor 80,0,100 :fcolor 200,220,200
print 300,40," * * * Merry Christmas ! * * * "
print 300,80," * * * Happy New Year  ! * * * "
bcolor 60,0,120 :fcolor 200,220,200
print 350,120," micro(A) by Aurel "

fcolor 220,200,100 : circle 190,100,6 : circle 190,100,4: circle 190,100,2
fcolor 250,100,100 : circle 250,180,6 : circle 250,180,4: circle 250,180,2
fcolor 150,100,250 : circle 175,165,6 : circle 175,165,4: circle 175,165,2
fcolor 80,150,255  : circle 140,225,6 : circle 140,225,4: circle 140,225,2
fcolor 80,250,255  : circle 270,245,6 : circle 270,245,4: circle 270,245,2
fcolor 200,150,255 : circle 90,302,6  : circle 90,302,4 : circle 90,302,2
fcolor 250,180,255 : circle 295,302,6 : circle 295,302,4: circle 295,302,2

func drawStars()
wcolor 0,0,80
x=10 : y=0
   while x < 400
      px= rand(600) : py= rand(480)
      bcolor 0,0,80 : fcolor 220,220,110 : print px,py,"."
      fcolor 120,220,210
      x=x+4
   wend
endfn


[round157]

by the way Happy New Year !! 

Have a Wonderful New Year! Have an Awesome New Year!

[Aurel]

..and you too...

micro(A) published on sourceforge
https://sourceforge.net/projects/micro-a-interpreter/