CreativeBASIC

El precio de la licencia es de 9,95$. La ultima versión es la 1,15, pero desde hace muchos años. Yo lo compre en el año 2010 y todavía sigue la misma versión. Es realmente muy completo. Los programas de ejemplo son muy buenos y te sirven como referencia. 

Existe como complemento el Creative Basic Menú Editor por 5,95$, esto nos permite hacer las clásicas ventanas de Windows con arrastrar y soltar, una vez terminado genera el código de la ventana que podemos integrar en el resto de programa.

También esta el Creative Basic Network Client/Server Library, como su nombre indica son las librerias propias de cliente y servidor para comunicar a través de cualquier red TCP / IP, como Internet o una red privada.

Existe unos foros. La documentación no es muy abundante pero suficiente.

Existe una versión profesional de este lenguaje que es IWBasic y que cuesta 69,95$ que realmente esta mucho más documentada y con mejor soporte.

- Crear programas Windows, juegos en 3D y utilidades.
- Compatible con Windows 95,98, ME, NT, 2000, XP , Vista, 7, 8 y 10.
- Compila ficheros autónomos ejecutables.
- Ejecutar programas directamente desde el IDE.
- Apoyo DirectXT con sprites, pantallas y mapas de desplazamiento.
- Soporte Direct3D con luces, cámaras, formas y escenas.
- Función de editor, depurador y GUI / diseñador de diálogo.
- Compilador de recursos incluido.
- No hay bibliotecas externas o tiempos de ejecución innecesarios.
- Full MDI (interfaz de múltiples documentos) de apoyo.
- Ventana dinámica, de diálogo, y la creación de control.
- Simple sintaxis similar al BASIC.
- Más de 250 comandos y funciones.
- El acceso a los archivos DLL y la API de Windows para la extensibilidad ilimitada.
- Tipos de datos estructurados (UDT) totalmente compatibles.
- El soporte de consola y el compilador de la consola.
- Primitivas gráficas compatibles.
- Soporte de mapa de bits, JPEG, GIF, cursor e icono está integrada.
- Soporte de archivos de onda.
- Soporte de archivos de acceso aleatorio.
- Funciones de asignación y gestión de memoria.
- Soporte de impresoras de bajo y alto nivel.
- Embedded ventanas del navegador para aplicaciones web.
- La creación de componentes e incluir apoyo.
- Controles de edición Rich, Vista de lista, ventana de estado y la barra de herramientas.
- IBasicT estándar compatible.

option "cases"
def i,y,px:int
def Z_re2:DOUBLE
def Z_im2:DOUBLE
def Z_re:DOUBLE
def Z_im:DOUBLE
def c_re:DOUBLE
def c_im:DOUBLE
def MinRe,MaxRe,MinIm,MaxIm,Re_factor,Im_factor:DOUBLE
def w:window
def col:INT
def cacheDC as INT

ImageWidth=640
ImageHeight=480

MinRe = -2.0
MaxRe = 1.0
MinIm = -1.2
MaxIm = MinIm+(MaxRe-MinRe)*ImageHeight/ImageWidth
Re_factor = (MaxRe-MinRe)/(ImageWidth-1)
Im_factor = (MaxIm-MinIm)/(ImageHeight-1)

WINDOW w,0,0,640,480,0,@CAPTION,"Mandlebrot",main

run = 1
x_offset = 0
y_offset = 0
y = 0




cacheDC = GetHDC(w)
for y = 0 to 479
c_im = MaxIm - y*Im_factor
for px=0 to 639
c_re=MinRe+px*Re_factor
Z_re=c_re
Z_im=c_im
for i=1 to 50
Z_re2=Z_re*Z_re
Z_im2=Z_im*Z_im
if Z_re2+Z_im2>4
pset w,px,y,rgb(255-(i+5),i*5,i)
goto break
endif
Z_im=2*Z_re*Z_im+c_im
Z_re=Z_re2-Z_im2+c_re
next i
label break
next px
wait 1
if run = 0
y = ImageHeight
endif
next y
ReleaseHDC(w,cacheDC)

waituntil run=0
closewindow w
end

sub main
     select @class
           case @idclosewindow
                 run = 0
     endselect
return




http://www.ionicwind.com/cbasic.html