Друг мой приказал кучу кода для меня, чтобы создать программное обеспечение. Однако я не признаю язык, а мой друг не кодер. Одно я уверен, хотя. Код - это что-то вроде 20-40 лет.Какой старый язык?
Код первоначально использовался в электромонтажных работах.
Предел символов в строке составляет 20 символов.
Может ли кто-нибудь признать этот язык? Я также ищу руководство для этого языка, если это возможно.
10:"K": PAUSE "IK":
CLEAR
15:P=1: INPUT "ETR=PRIN
T, 0=NO? ";P
20:DIM L(20),R(20),X(20
),B(1),G(1),Q(1),O$(
1)*24
22:IF P=1 INPUT "K. /DA
TE? ";O$(0)
24:IF P=0 GOTO 30
26:INPUT "N:0 AND NAME?
"; O$(1)
28:LPRINT O$(1): LPRINT
"KKS/";OS(0)
30:INPUT "(KVA)? ";S
35:IF P=1 LPRINT "KVA",
S
40:R=3.31 :Z=4
...
Я искал для этого языка и PowerBASIC, кажется, близко к ней, но она содержит множество других функций, что испытывает недостаток этого кода. Какие-нибудь догадки?
Edit 1
Кажется, что там были опечатки. Неудивительно: «P =!» или «0 $ (0) не имеет никакого смысла.
Edit 2
Я принял ответ Габи, потому что код, кажется, очень близко к GW-Basic. Также найдено пособие для языка, который отлично работает: http://www.antonis.de/qbebooks/gwbasman/
Спасибо за помощь
Редактировать 3
получил некоторую новую информацию Язык может АСП!. союзником может быть что-то названное «Nova Basic» с 1975 года. Я не могу найти руководство для этого языка, но по крайней мере это дает мне новое направление.
«он содержит много других функций ...» Возможно ли, что этот код просто не использует другие функции? – JJJ
Похож на BASIC для меня –
Mraok, это _definitely_ not GWBASIC. Это будет barf в первой строке, так как '' K ''не является допустимым оператором и не имеет ключевого слова' PAUSE'. Кроме того, 'DIM O $ (1) * 24' также не является допустимым синтаксисом. Если это, как вы говорите, «отлично работает», я бы довольно осмотрился в вашей методике тестирования :-) – paxdiablo