Fórum Root.cz

Hlavní témata => Vývoj => Téma založeno: jiko99 13. 11. 2019, 18:45:57

Název: Je to Basic?
Přispěvatel: jiko99 13. 11. 2019, 18:45:57
Prosím podívejte se na část kodu níže. Potřeboval bych vědět: 1)je to Basic? 2) Který interpret/compiler stáhnout abych to rozchodil. Je to opis z vědeckého článku z roku 1993. Řádky nejsou číslované. Autor o k samotnému programu nic neuvedl. Nejsem profi programátor, takže prosím o shovívavost. Díky

Kód: [Vybrat]
DEFDBL A-Z
DEFINT I-N
DEFSTR U
DECLARE SUB Reads (U, Uoku, okun, Ls)
...
COMMON SHARED x(), y()
...
KEY 15, CHR$(&H0) + CHR$(&H1)    'ESC key
ON KEY(10) GOSUB Ciz
ON KEY(15) GOSUB Son
...
Název: Re:Je to Basic?
Přispěvatel: alex6bbc 13. 11. 2019, 18:51:54
basic to je. tenhle kus kodu vypada dost obecne, ze se neda rict, zda to je nejaky specialni dialekt.
zacal bych s kterymkoliv basic kompilerem/interpretrem.

muzete te ten cely basic zdrojak uverejnit? kdyby to neslo spustit s basicem, tak by slo aspon zjistit
co ten program delat, pripadne prepsat.

Název: Re:Je to Basic?
Přispěvatel: Kit 13. 11. 2019, 19:01:41
To bude asi tento článek
https://www.sciencedirect.com/science/article/abs/pii/004579499390069P
Název: Re:Je to Basic?
Přispěvatel: alex6bbc 13. 11. 2019, 19:06:39
prepsani nejakeho vypoctu z jednoho programovaciho jazyka je jednodussi nez treba GUI, sitovy kod.
Název: Re:Je to Basic?
Přispěvatel: a234 13. 11. 2019, 19:07:16
Podle výpisu toho programu bych tipnul Quick Basic (QBasic) - https://www.qbasic.net/ (https://www.qbasic.net/)
Název: Re:Je to Basic?
Přispěvatel: alex6bbc 13. 11. 2019, 19:10:32
https://www.researchgate.net/profile/Cengiz_Dundar/publication/250695978_Arbitrarily_shaped_reinforced_concrete_members_subject_to_biaxial_bending_and_axial_load/links/5aa8fcf50f7e9b0ea308437b/Arbitrarily-shaped-reinforced-concrete-members-subject-to-biaxial-bending-and-axial-load.pdf

ten basic listing ma 20 stranek a je to obrazek v pdf, pouzit OCR.
Název: Re:Je to Basic?
Přispěvatel: Kit 13. 11. 2019, 19:14:40
Podle výpisu toho programu bych tipnul Quick Basic (QBasic) - https://www.qbasic.net/ (https://www.qbasic.net/)

Mohl by to být třeba PowerBASIC. Těch bejziků je prostě víc druhů a každý funguje trochu jinak.
Název: Re:Je to Basic?
Přispěvatel: e3k 13. 11. 2019, 19:14:56
google(DEFDBL)=1. https://qb64.org/wiki/DEFDBL
QB64 is a modern extended BASIC programming language that retains QBasic/QuickBASIC 4.5 compatibility and compiles native binaries for Windows, Linux, and macOS.
Název: Re:Je to Basic?
Přispěvatel: alex6bbc 13. 11. 2019, 19:15:58
primo v tom pdf v clanku je na konci napsano, ze to je v QuickBASIC, stacilo poradne cist :-)
Název: Re:Je to Basic?
Přispěvatel: Kit 13. 11. 2019, 19:36:25
Tak jsme si zavzpomínali na špagety...

Pokud to má být jednorázovka, zkusil bych ten QuickBASIC. Pokud by se v tom měly dělat úpravy a používat ten program systematicky, je to zralé na přepis do něčeho novějšího, např. do Pythonu. Zajímavou alternativou by však mohl být Javascript v prohlížeči, který by mohl umožnit úpravy jednotlivých parametrů, ze kterých by ihned podával výsledky, případně by to mohl i vykreslit.
Název: Re:Je to Basic?
Přispěvatel: Radovan . 13. 11. 2019, 21:38:59
Jestli je to z roku 1993, tak bych rovnou stáhnul QBasic (https://www.qbasic.net/en/qbasic-downloads/compiler/qbasic-interpreter.htm), spustil ho v DOSBoxu a ten program zkusil v něm.
Název: Re:Je to Basic?
Přispěvatel: Marek Staněk 14. 11. 2019, 11:21:24
Jestli je to z roku 1993, tak bych rovnou stáhnul QBasic (https://www.qbasic.net/en/qbasic-downloads/compiler/qbasic-interpreter.htm), spustil ho v DOSBoxu a ten program zkusil v něm.

Jen drobnej detail:
QBasic byl interpreter a byl součástí MSDOSu. QuickBASIC naproti tomu byl kompilátor, kupoval se zvlášť, a měl by jít stáhnout bezplatně.
Zmíněný QB64 je jeho nástupce, a alternativně by měl jít použít i FreeBASIC (např jako součást projektu FreeDOS).