| Yabasic | |
| Developer: | Marc-Oliver Ihm |
| Latest Release Version: | 2.90.4[1] |
| Repo: | https://github.com/marcIhm/yabasic |
| Operating System: | Microsoft Windows, Unix |
| Genre: | Programming |
| License: | MIT License |
Yabasic (Yet Another BASIC) is a free, open-source BASIC interpreter for Microsoft Windows and Unix platforms.[2] Yabasic was originally developed by Marc-Oliver Ihm, who released the last stable version 2.77.3 in 2016. From version 2.77.1, the project has adopted the MIT License as well as the source code being moved to GitHub to encourage others to participate in its development.
A version optimized for BeOS, ZETA and Haiku.[3]
A port of Yabasic to the Fltk toolkit called "Flyab" was under development. It would have been source-compatible with programs written in yab, a variant of Yabasic that enables graphical programs to be written using the BeOS API. After BeOS and its successor ZETA finally were gone, the team members around yab for BeOS decided to move to Linux and therefore chose FLTK to implement the UI parts. Ports for Microsoft Windows, Mac OS X, and Linux would have been possible. Flyab added the ability to Yabasic to create native graphical user interfaces on all supported platforms. Main difficulty was to fully implement the layout commands to FLTK, as used from the BeOS version. As of November 2008, the project appears to be halted.
Sony also packaged a version of Yabasic for the PlayStation 2 on the demo disc[4] shipped with PS2 consoles in PAL territories so it could be considered a home computer, not just a games machine, thus bypassing European import taxes.[5]
As a continuation of the project prior to new changes by the original author, version 3 was being developed by a team centered on Pedro Sá and Thomas Larsen, but development has halted and the project now appears to be abandoned.
REM Program Name: cbm-mtudemo.yabREM Author: mtuREM REM Purpose: demonstration for their CBM-PET graphics card 320x200
open window 320, 200
20 P=160: Q=10030 XP=144: XR=1.5*3.141592740 YP=56: YR=1: ZP=6450 XF=XR/XP: YF=YP/YR: ZF=XR/ZP60 FOR ZI=-Q TO Q-l70 IF ZI<-ZP OR ZI>ZP GOTO 15080 ZT=ZI*XP/ZP: ZZ=ZI90 XL=INT(0.5+SQRT(XP*XP-ZT*ZT))100 FOR XI=-XL TO XL110 XT=SQRT(XI*XI+ZT*ZT)*XF: XX=XI120 YY=(SIN(XT)+0.4*SIN(3.0*XT))*YF130 GOSUB 170140 NEXT XI150 NEXT ZI160 PAUSE 10END170 X1=XX+ZZ+P180 Y1=YY-ZZ+Q:Y1=199-Y1190 LINE X1,Y1,X1,Y1-1200 IF Y1=0 GOTO 220210 CLEAR LINE X1,Y1+1,X1,199220 RETURN