Исходный код Apollo 11 на GoogleCode

[popoffka666]

В этом топике анонсировано, что часть кода для космического корабля Apollo 11 теперь доступна в сети Интернет.

В этот день 40 лет назад Нил Армстронг (Neil Armstrong) и Базз Олдрин (Buzz Aldrin) стали первыми людьми, которые прошли по Луне. Это было большим достижением для человечества и ключевым моментом в мировой истории.

Чтобы почтить память этого события исходные коды коммандного модуля (Comanche054) и лунного модуля (Luminary099) были записаны со сканированных изображений и запущены на yaAGC (эмуляторе AGC с открытым кодом) by the Virtual AGC and AGS project.

Исходный код даёт понять, что полёт на луну на самом деле не сильно отличается от программирования, которым занимается большинство программистов каждый день. Обратите внимание на комменты:

Код: Выделить всё

VRTSTART	TS	WCHVERT
# Page 801
		CAF	TWO		# WCHPHASE = 2 ---> VERTICAL: P65,P66,P67
		TS	WCHPHOLD
		TS	WCHPHASE
		TC	BANKCALL	# TEMPORARY, I HOPE HOPE HOPE
		CADR	STOPRATE	# TEMPORARY, I HOPE HOPE HOPE
		TC	DOWNFLAG	# PERMIT X-AXIS OVERRIDE
		ADRES	XOVINFLG
		TC	DOWNFLAG
		ADRES	REDFLAG
		TCF	VERTGUID

Код: Выделить всё

# Page 801 UNIT — LIFE SUPPORT
CAF TWO #
TS WCHPHOLD
TS WCHPHASE
TC BANKCALL # VERY UGLY HACK
CADR STOPRATE # HOPE NEVER HAPPEN
TC DOWNFLAG # OH SHIT!
ADRES XOVINFLG
TC DOWNFLAG
ADRES REDFLAG
TCF VERTGUID

Источник: http://habrahabr.ru

[Adolf_BarniK]

давайте таки запустим свое что-нибудь

[1nquIz]

TC BANKCALL # VERY UGLY HACK
CADR STOPRATE # HOPE NEVER HAPPEN
TC DOWNFLAG # OH SHIT!

если бы я такое увидел, я бы не летел никуда.

[Pitch666]

хахаха, быдлокодеры

[Morfin]

+1 такое отбивает желание лететь куда-либо
P.S Фортран мать его
Улыбнуло =)

Код: Выделить всё

TC   BANKCALL   # TEMPORARY, I HOPE HOPE HOPE
      CADR   STOPRATE   # TEMPORARY, I HOPE HOPE HOPE
      TC   DOWNFLAG   # PERMIT X-AXIS OVERRIDE

[NiGHt-LEshiY]

Точно не фейк?