Yabásico
Yabasic es un intérprete gratuito del lenguaje de programación básico diseñado para los sistemas operativos Windows y Unix .
Yabasic fue creado originalmente por Mark-Oliver Ihm y se ha lanzado bajo la licencia MIT desde la versión 2.77.3 .
Características
Código de ejemplo
# !/ usr / bin / yabasic
REM Nombre del programa: cbm-mtudemo.yab
REM Autor: mtu
REM
REM Propósito: demostración de su tarjeta gráfica CBM-PET 320x200
ventana abierta 320 , 200
20 P = 160 : Q = 100 30 XP = 144 : XR = 1.5 * 3.1415927 40 YP = 56 : YR = 1 : ZP = 64 50 XF = XR / XP: YF = YP / YR: ZF = XR / ZP 60 PARA ZI =- Q TO Q - l 70 SI ZI <- ZP O ZI > ZP GOTO 150 80 ZT = ZI * XP / ZP: ZZ = ZI 90 XL = INT ( 0.5 + SQRT ( XP * XP - ZT * ZT )) 100 FOR XI =- XL TO XL 110 XT = SQRT ( XI * XI + ZT * ZT ) * XF: XX = XI 120 YY = ( SIN ( XT ) + 0.4 * SIN ( 3.0 * XT )) * YF 130 GOSUB 170 140 SIGUIENTE XI 150 SIGUIENTE ZI 160 PAUSA 10 FIN 170 X1 = XX + ZZ + P 180 Y1 = YY - ZZ + Q: Y1 = 199 - Y1 190 LÍNEA X1 , Y1 , X1 , Y1 -1 200 SI Y1 = 0 IR A 220 210 BORRAR LÍNEA X1 , Y1 + 1 , X1 , 199 220 VOLVER
Notas