freebasic 订阅
FreeBasic 展开全文
FreeBasic
信息
操作系统
未知
开发语言
Basic
开源协议
未知
FreeBasic
FreeBasic 是一个免费开源的Basic语言编译器。
收起全文
精华内容
下载资源
问答
  • FreeBASIC

    2005-10-20 19:20:00
    最近有个国外的客户来信问我们的产品是否支持FreeBASIC。上去看了一下,是个QuickBASIC仿制品,支持DOS、Windows、Linux。运行了一下,感觉挺简单的,可以最大限度地兼容QB,在兼容性上比其他用过的BASIC要好。其实...

    最近有个国外的客户来信问我们的产品是否支持FreeBASIC。上去看了一下,是个QuickBASIC仿制品,支持DOS、Windows、Linux。运行了一下,感觉挺简单的,可以最大限度地兼容QB,在兼容性上比其他用过的BASIC要好。其实类似的BASIC产品很多,象PowerBASIC(原来的TurboBASIC)、RealBASIC、IBasic、Liberty BASIC等等。除了Real BASIC的目标是替代Visual Basic,其他的产品的主要目的都是为了保持BASIC易用的特性,同时又有强大的能力,而且都炫耀自己编写游戏的能力。到底有多少人用他们呢?它们的生命力怎么样呢?
    经常有人咨询我该学什么语言,我通常是推荐Visual Basic。而对于那些业余搞些编程的人,我是不是应该让他们考虑这些BASIC的变种呢,没有OOP,简单。对于那些不是专业的程序员,OOP、COM、.NET可能太复杂了。我的老板多年前是个QB高手,我们现在产品的雏形就是他用QB写的。后来嫌VB太难学,放弃了在Windows上编程的想法,现在已经光动口不动手了,我们现在的产品是我指导师妹用Visual C++写的。
    也许应该认真考虑一下如果让非专业人士搞好的驾驭计算机的问题了。

    转载于:https://www.cnblogs.com/zealsoft/archive/2005/10/20/258644.html

    展开全文
  • 使用libvlc的简单FreeBASIC视频播放器。
  • FreeBasic帮助文件

    2018-09-18 20:05:18
    FreeBasic中文帮助软件,适用于学习和使用FreeBasic语言,欢迎大家加入自由好用的basic语言大家庭。
  • freebasic GUI-开源

    2021-04-26 00:00:28
    该项目的目的是为freeBASIC开发和维护一个开源的,社区开发的GUI库。
  • FreeBASIC0.23

    2012-08-13 23:27:51
    FreeBASIC - A multi-platform 32-bit BASIC Compiler Copyright (C) 2004-2011 The FreeBASIC development team. License: This program is free software; you can redistribute it and/or modify it under ...
  • FreeBasic Windows GUI工具包
  • FreeBasic转NiceBasicV101

    2020-08-20 04:52:57
    FreeBasic转NiceBasicV101系统结构:FB2NB,子程序1,创建,取文本,替换,搜索全部,取匹配数量,取匹配文本,取子匹配文本,API_透明窗口,API_设置窗口信息,API_发送消息,======窗口程序集1||||------__启动窗
  • cahin.bas freebasic

    2015-08-11 16:10:54
    chain。bas freebasic sorcefile
  • FreeBasic 1.0 win32

    2014-10-22 11:39:09
    FreeBasic 1.0 for win32
  • FreeBASIC标准C ++库端口(fbstd)将C ++中可用的容器,迭代器,算法和流带给FreeBASIC程序员。
  • freebasic 教程 笔记

    千次阅读 2017-04-01 10:57:16
    最近有机会使用freebasic,目前除了vb很少见到相关basic语言的继承者,但是某些特殊场合又需要,所以把最近使用中的问题略作介绍 0)资源站 www.freebasic.net 1)编译器 FreeBASIC-1.05.0-win32 2)IDE FBIde...

    最近有机会使用freebasic,目前除了vb很少见到相关basic语言的继承者,但是某些特殊场合又需要,所以把最近使用中的问题略作介绍

    0)资源站 www.freebasic.net

    1)编译器 FreeBASIC-1.05.0-win32

    2)IDE FBIde0.4.6r4

    3)语法 接近或者替代Qbasic语法,DocToc: FBWiki   http://www.freebasic.net/wiki/DocToc

    先说编译器,毫无疑问以官方为准,主要是官方网站所载,ide有几个,后来选择了FBIde。语法比较困难,后来还是参考FBIde帮助文件较好。

    遇到几个问题

    1)正整数输出前导符号位,用ltrim$(str$(sum))形式输出,其中sum只能是变量或者整数,奇怪,表达式会出错(如果有发现,请留言)

    2)ide无暂停框,shell "pause"解决的

    3)变量的定义,dim多个会出错

    4)实数的输出困难,计算中可以,保留若干位数,如2为,请用*100+0.5然后int取整,再/100,输出中print using "#.##";sum但是会多出%前导符号


    20170418

    补充

    如果需要输出是去掉fb(freebasic)的整数的符号位置(正数时会多个空格),可以用ltrim$(str$(变量或者表达式))来控制

    展开全文
  • fbbindings:基于fbfrog的FreeBASIC绑定的脚本
  • 易语言源码易语言把FreeBasic的代码转换成NiceBasic代码.rar 易语言源码易语言把FreeBasic的代码转换成NiceBasic代码.rar 易语言源码易语言把FreeBasic的代码转换成NiceBasic代码.rar 易语言源码易语言把...
  • 易语言把FreeBasic的代码转换成NiceBasic代码源码,把FreeBasic的代码转换成NiceBasic代码,FB2NB,子程序1,创建,取文本,替换,搜索全部,取匹配数量,取匹配文本,取子匹配文本,API_透明窗口,API_设置窗口信息,API_发送...
  • FreeBASIC调用qsort排序

    2020-04-10 10:43:48
    FreeBASIC可以很方便的调用C函数库,试着调用了快速排序qsort函数,还是有些需要注意的地方,记录一下。 一、qsort介绍(参考百度和CSDN博客) qsort是在C函数库(stdlib.bi)里实现的快速排序函数,是根据二分法...

        FreeBASIC可以很方便的调用C函数库,试着调用了快速排序qsort函数,还是有些需要注意的地方,记录一下。

    一、qsort介绍(参考百度和CSDN博客)

        qsort是在C函数库(stdlib.bi)里实现的快速排序函数,是根据二分法写的,其时间复杂度为n*log(n)。其函数原型为:

    sub qsort (byval base as any ptr, byval num as size_t, byval nWidth as size_t, byval pCompare as function(byval as any ptr, byval as any ptr) as long)

        base是待排序的数组基址,num是数组元素个数,nwidth是数组元素的大小(以字节为单位),pCompare为函数指针,指向一个自定义的比较函数,需要根据自己的需求编写。

        自定义比较函数原型如下:

    function 函数名 cdecl(byval a as any ptr, byval b as any ptr) as long

        函数名可以随意定义,但函数中的cdecl关键字必须声明,因为是调用的C库,所以必须声明cdecl调用方式,否则出错。a和b为两个待比较的数,可以是整数、小数、字符串、结构体等,根据自己的需要进行排序,比较规则如下:

        1、如果a排在b前面,则函数返回值为负整数(-1)

        2、如果a和b哪个排在前面都行,则函数返回值为0

        3、如果a排在b后面,则函数返回值为正整数(1)
    二、示例

        VFB窗体界面:

    因为要使用C函数库,所以我们要引用头文件,一般在工程选项卡的特殊函数目录的FF_AppStart文件里添加。位置如图:

    添加头文件:

    #Include Once "crt\stdlib.bi"
    #Include Once "crt\string.bi"  '需要用到strcmp函数

    代码如下:

    #define BUFFER_SIZE 20   '定义排序数组大小
    
    '整型数排序
    function cmpInt cdecl(byval a as any ptr, byval b as any ptr) as long
        Return *Cast(long ptr,a) - *Cast(long Ptr,b)
    End Function
    
    Sub Form1_Command1_BN_Clicked(hWndForm As hWnd, hWndControl As hWnd)  '单击
        Dim a(BUFFER_SIZE - 1) As long
        Print "生成"
        For i As Long = 0 To BUFFER_SIZE - 1
            Randomize                 '随机数种子
            a(i) = int(Rnd * 100000)  '随机数
            Print a(i),
        Next
        print
        Print "排序"
        qsort(@a(0),BUFFER_SIZE, SizeOf(long),@cmpInt) 
        Print "排序完成"
        For i As Long = 0 To BUFFER_SIZE - 1
            Print a(i),
        Next
        print
    End Sub
    
    '浮点型排序
    function cmpDbl cdecl(byval a as any ptr, byval b as any ptr) as long
        Dim c As Double Ptr = Cast(Double Ptr, a)   '需要先转换类型保存
        Dim d As Double Ptr = Cast(Double Ptr, b)
        
        return IIf(*c > *d,1,-1)                    '比较
    End Function
    
    Sub Form1_Command2_BN_Clicked(hWndForm As hWnd, hWndControl As hWnd)  '单击
        Dim a(BUFFER_SIZE - 1) As Double
        Print "生成"
        For i As Long = 0 To BUFFER_SIZE - 1
            Randomize                 '随机数种子
            a(i) = Rnd * 100000  '随机数
            Print a(i),
        Next
        print
        Print "排序"
        qsort(@a(0),BUFFER_SIZE, SizeOf(Double),@cmpDbl) 
        Print "排序完成"
        For i As Long = 0 To BUFFER_SIZE - 1
            Print a(i),
        Next
        print
    End Sub
    
    '字符串排序
    function cmpStr cdecl(byval a as any ptr, byval b as any ptr) as long
        Dim c As ZString Ptr = Cast(ZString Ptr, a)
        Dim d As ZString Ptr = Cast(ZString Ptr, b)
        return strcmp(c,d)
    End Function
    
    Sub Form1_Command3_BN_Clicked(hWndForm As hWnd, hWndControl As hWnd)  '单击
        Dim s As String = "0123456789"
        Dim a(BUFFER_SIZE - 1) As ZString * 10    '字符串使用ZString比较方便用于C函数库的排序
        Print "生成"
        For i As Long = 0 To BUFFER_SIZE - 1
            For j As Long = 0 To 5
                Randomize                 '随机数种子
                a(i) &= Mid(s,int(Rnd * 10) + 1,1)   '随机数
            Next j
            Print a(i), 
        Next
        print
        Print "排序"
        qsort(@a(0),BUFFER_SIZE, SizeOf(ZString * 10),@cmpStr) 
        Print "排序完成"
        For i As Long = 0 To BUFFER_SIZE - 1
            Print a(i),
        Next
        print    
    End Sub
    
    '结构体排序
    Type Student          '学生结构
        ID As Long        '学号
        Name As String    '名字
        Score As Long     '分数 
    End Type
    
    function cmpType cdecl(byval a as any ptr, byval b as any ptr) as long
        Dim c As Student Ptr = Cast(Student Ptr, a)
        Dim d As Student Ptr = Cast(Student Ptr, b)
        
        Return c->Score - d->Score  '用分数排名 从小到大
    End Function
    
    Sub Form1_Command4_BN_Clicked(hWndForm As hWnd, hWndControl As hWnd)  '单击
        Dim a(BUFFER_SIZE - 1) As Student
        Print "生成"
        For i As Long = 0 To BUFFER_SIZE - 1
            Randomize                 '随机数种子
            a(i).ID = int(Rnd * 10000)  '随机数
            a(i).Name = "张三" & i & "号" 
            Randomize                 '随机数种子
            a(i).Score = Int(Rnd * 120 + 1)
            Print a(i).ID,a(i).Name,a(i).Score
        Next
        print
        Print "排序"
        qsort(@a(0),BUFFER_SIZE, SizeOf(Student),@cmpType) 
        Print "排序完成"
        For i As Long = 0 To BUFFER_SIZE - 1
            Print a(i).ID,a(i).Name,a(i).Score
        Next
        print
    End Sub

    运行效果:

    整型数:

    浮点型:

    字符串:(为了方便看出来,使用的是数字字符串)

    结构体:

    完整代码:

    https://github.com/rainheart311/VisualFreeBASIC/tree/master/qsort

    展开全文
  • 该操作系统是用FreeBASIC编写的命令行工具。 我们已经花了很多时间来使天窗外壳成为一个很好的程序。 如有任何疑问,请转到讨论页面。 还请报告您发现的所有错误。
  • FreeBasic IDE+Compile

    2009-07-08 19:49:13
    FreeBasic 的IDE环境+编译器
  • 资源介绍:易语言把FreeBasic的代码转换成NiceBasic代码资源作者:易语言源码下载资源界面:资源下载:
  • 樱桃计划(Project Cherry)是FreeBASIC中的Chip-8 / SCHIP仿真器。 撰写人: Blyss萨拉尼亚( ) Nobbs66( ) 学分: FMOD音频库版权所有:copyright:Firelight Technologies Pty,Ltd.,1994-2014。 ( ) ...
  • FreeBASIC语言实现的IDE是VisualFreeBASIC。 屏幕放大的核心函数就是BitBlt和StretchBlt。 实现效果如图: 源码地址:https://github.com/rainheart311/VisualFreeBASIC/tree/master/ZoomWindow

        FreeBASIC语言实现的IDE是VisualFreeBASIC。

        屏幕放大的核心函数就是BitBlt和StretchBlt。

        实现效果如图:

        

    源码地址:https://github.com/rainheart311/VisualFreeBASIC/tree/master/ZoomWindow

    展开全文
  • FreeBasic是一款非常好用且功能强大的basic语言编程软件,basic语言全名“ Beginner's All-Purpose Symbolic Instruction Code”。basic语言是小编在学习计算机语言是的入门语言,对它的感情挺深厚的。basic语言是一...
  • FreeBASIC的 Assembly和C中BASIC操作系统的现代实现。 建造 运行./make.sh (或/make.bat中的/make.bat )。 组装并产生/os/boot.bin , /os/main.bin和/os/root.bin中间二进制文件。 然后连接到/bootloader.flp原始...
  • 记录一下自己使用freebasic来制作标准的dll导出函数来给vb6调用。当然了在vba里也是可以使用的。今天就用fb写一个调用管道的导出函数。我用的ide是 VisualFreebasic.使勇芳大佬在老外的基础上进行打造的。体验效果还...
  • FreeBASIC学习笔记——6.1 过程

    千次阅读 2017-12-16 16:11:24
    过程还可以让用户扩展FreeBASIC语言以提供自定义命令。FreeBASIC内置的许多功能只是默认链接到的“运行库”的子程序。  Sub关键字标记过程的开始,其结尾必须使用标有End Sub。Identifier表示过程名。过程的代码与...
  • 由于开源的缘故,FreeBASIC目前有多种编译器:FBedit、WinFBE、poseidonFB、FireFly for FreeBASIC等等。其中WinFBE是一个用FreeBASIC语言写的、完全开源的编译器,用于编写控制台或者SDK编程非常好用,而FireFly ...
  •  整数型数据顾名思义就是不带小数的数据,我们通常用十进制数表示这些数据,但FreeBASIC也允许二进制、八进制和十六进制的数据表示方式。 1、不同进制的表示方式 二进制:  二进制只有0和1,在FreeBASIC中,二进制...
  • FBIde_0.4.6_FreeBASIC

    2010-11-22 15:39:33
    FBIde 是一个采用 FreeBASIC 编译器的开源 Basic 集成开发环境,使用 C++ 开发,基于 wxWidgets 库
  • 变量名必须是由字母、数字和字符“_”(下划线)组成,不能包含其他字符或者空格,且这些变量名不能与FreeBASIC的关键字相同,因为关键字属于FreeBASIC语言的一部分。FreeBASIC的变量名称是不区分大小写的,即TEXT和...

空空如也

空空如也

1 2 3 4 5 ... 9
收藏数 175
精华内容 70
热门标签
关键字:

freebasic