AllegroBASIC

[ScriptBasic]

IF MyBASIC is doing the calling to your Allegro library, maybe you should release those resources before dropping MyBASIC.

Code: [Select]

static void _on_exit(void) {

  remove_sound();
  allegro_exit();
  mb_close(&bas);
  mb_dispose();
}


[wang renxin]

@Aurel, Yes it does.

@Markus, Need to know in which step it triggers a segementation fault.

@John, It's proper to drop MY-BASIC before releasing resource stuff, especially when using referenced usertype to hold resources. It disposes all referenced data in mb_close, thus the reference could be a wild reference if it has already released resources before closing MY-BASIC. Your way might work ok in AllegroBASIC, since it's using non-referenced usertype; but it's a hidden trouble.

[Cybermonkey]

A new version will be uploaded soon with some major changes.
1. I got rid of that console window - since Windows user don't get on with that. I implemented via the nice tinyfiledialogs an inputbox (see attached screenshots). All errors are now reported by a messagebox.
2. You can now close the Window with the 'X' button - but the BASIC programmer have to take care of it. A function which returns ture or false if the window was closed was implemented. (So there are no segmentation faults anymore ...)
Sample code:

Code: [Select]

screen (800,600,"CircleTrap")
KEY_ESC          = 59   
setfps (200)
h = screenheight/2
w = screenwidth/2
paper (0,0,0)
do

cls (x)

t = tickcount/1000
for i=1 to 360
    ink (255,255-i,255-i)
    circle (w+sin(i*90+t)*200,h+cos(i*90+t)*200,20+i)
next
sync

until (keystate (KEY_ESC) = true) or (windowclosed=true)
end

[Cybermonkey]

Good news ... I just compiled AllegroBASIC on Windows 10 and it works now without setting the compatiblity mode. Just a few days for upload ...

[Cybermonkey]

I also added a time function, stay tuned, download will be next weekend.

[Cybermonkey]

Allright guys, version 0.6 of AllegroBASIC is available on the homepage: http://allegrobasic.pulsar2d.org/
What's new?

• included the tinyfiledialogs libarary for error output
• added messagebox and inputbox (to replace PRINT and INPUT since there's no console window anymore)
• added a TIME function which returns the time in format HH:MM:SS as a string
• added drawspritepart and drawimagepart which let you draw part of a bitmap
• added fileexists function
• new about dialog in TinyIDE

[Galileo]

Hello, Cybermonkey. I'm sorry you do not feel continue programming (I hope it is temporary). In any case, I tried AllegroBASIC and I find very interesting. I would better know the dialect, but for that I need documentation on it. Could you wrote if only a cursory relationship command with a description of its functionality and a small example of use?

[Cybermonkey]

Well, the best documentation is what you'll find on the Github page for MY-BASIC: https://github.com/paladin-t/my_basic
Apart from that I added some input, graphics and sound functions. For any of them there's an example. (Most interesting/comprehensive example is probably keyandsprite.bas.)