Yabasic
Yabasic er en gratis Basic programmeringssprog fortolker designet til Windows og Unix operativsystemer .
Yabasic blev oprindeligt skabt af Mark-Oliver Ihm og er blevet udgivet under MIT -licensen siden version 2.77.3 .
Funktioner
Eksempelkode
# !/ usr / bin / yabasic
REM Programnavn: cbm-mtudemo.yab
REM Forfatter: mtu
REM
REM Formål: demonstration af deres CBM-PET grafikkort 320x200
åbent vindue 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 = 6 XR / Z ZI =- Q TIL Q - l 70 HVIS ZI <- ZP ELLER 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 TIL 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 NÆSTE XI 150 NÆSTE ZI 160 PAUSE 10 SLUT 170 X1 = XX + ZZ + P 180 Y1 = YY - ZZ + Q : Y1 = 199 - Y1 190 LINJE X1 , Y1 , X1 , Y1 -1 200 GO Y1 200IF _ _ 210 RYD LINJE X1 , Y1 + 1 , X1 , 199 220 RETUR
Noter