你还保留着哪些古老的编码技术？

Question

在我病假几天且无聊至极的时候，我决定尝试挖掘一些旧代码。我找到了我写过的一些古老的Atari ST二进制版本，但是我找不到任何源代码。我确实设法从传说中的x2ftp网站的存档中找到了我很久以前用汇编语言编写的旧ModeX库：http://ftp.lanet.lv/ftp/mirror/x2ftp/msdos。这是过去的回忆 :-)

; Actually Sticks Us Into ModeX - With 240 Scanlines Per Page
; Set The Variable LSCAN To The Virtual Scanline Length You Want
; Trashes AX, CX, DX, DS, SI
; Shouldn't Matter Though As This Should Be The First Thing You Call!
Set_X_240   PROC
        Call    Set_Graph       ; Set Mode 13h
        mov     dx, Seq_Port
        mov     ax, 00604h      ; Index 4 (Memory Mode Reg.) In AL
                                ; Bit 3 = Chain 4
        out     dx, ax          ; Kill Chain 4 Mode
        mov     ax, 00100h      ; Index 0 (Reset Reg.) In AL
        out     dx, ax          ; Reset Syncronous (At End Of Cycle)
        dec     dx              ; Change Port
        dec     dx              ; To Misc. S--t Port :)
        mov     al, 11100011b
        out     dx, al          ; Sets 480 Line Mode, 25Mhz Dot Clock
        inc     dx              ; Change Port
        inc     dx              ; Back To Sequencer Port
        mov     ax, 00300h
        out     dx, ax          ; Restart Controller
        mov     dx, Crtc_Port
        mov     al, 011h
        out     dx, al          ; Select Index 11h (Vert.Retrace End)
        inc     dx              ; Data Port
        in      al, dx          ; Read In Current Bit Mask
        and     al, 07Fh        ; 01111111 - Clear Top Bit (Write Protect)
        out     dx, al          ; Un-Write Protect Index 0-7 Of CRTC Reg.
        dec     dx              ; Restore Port To Index
        mov     ax, seg CRTC_Data_240           ; Address Of Our CRTC Data
        mov     ds, ax
        mov     si, offset CRTC_Data_240
        mov     cx, LCRTC_Data_240      ; Length Of Data
        repz    outsw                       ; Chuck It At The Port
        mov     ax, lscan
        shr     ax, 3           ; Number Of Words Per Scan Line
        mov     ah, al          ; Into AH
        mov     al, 013h        ; Port Index 013h - Logical Screen Width
        out     dx, ax

        mov     NScan, 240
    Call    Set_Pages
    ret
Set_X_240   ENDP

还有其他人想要让自己看起来老一些，然后贴出一些老式的代码吗？ :-) 真遗憾我现在没有我的68000 ASM的东西了，尽管现在我可能甚至都不会认识它了！

哦，回忆啊 :-)

- Steve Robbins

---

我的个人信条是：如果你能看旧代码而不感到不安，那么你作为程序员就没有进步。 - JohnFx

嗯，我不会说我的旧代码让我感到难堪...除了大量的注释之外...但我不认为我现在会以同样的方式编写PutPixel;-) - Steven Robbins

我想发一些东西，但是我没有带有USB连接器的卡带录音机。 - Dan Dyer

我对投票关闭这个旧问题感到有点难过，特别是因为我确实有一些不错的旧的68k汇编代码闲置着，但很明显它已经超出了今天Stack Overflow的范围。即使被关闭，我希望我们仍然可以将其保留作为一个历史提醒，提醒人们SO曾经是一个更加健谈和开放的地方。 - Ilmari Karonen

Answer 1

我有一堆古老的Atari 8位BASIC和Atari ST相关资料（我仍然拥有ST，但它没有网络，所以我几乎不使用它）。

我曾经将David Ahl的“ BASIC计算机游戏：微型计算机版”中的大多数游戏输入到了8位和ST BASIC中。

我有点想把那些旧游戏移植到Processing / Arduino上，来一次怀旧心情。

- Scott Prive

Answer 2

我在大学期间编写并维护了一个MUD游戏，时间是1990年至1993年，全部使用C语言编写。这是基于Diku MUD衍生出来的SillyMUD版本，在当时是我的骄傲。

你仍然可以在互联网上找到一些代码。

- John Brothers

---

我和一个朋友曾经玩过SillyMUD，最近决定拿起源代码并将其作为业余项目进行翻新：https://github.com/jonm/SillyMUD。如果你有机会，请给我们留言，Loki。 :) - Jon Moore

Answer 3

我在1998年写的一些极其糟糕的Perl代码仍然在某个网站上使用...

所谓糟糕，就是没有任何use strict;，也没有任何my...

- R. Bemrose

Answer 4

我从 Atari ST 得到的大部分代码都是用 GFA-Basic 写的，我不想去碰那些灰尘满满的软盘。

- Osama ALASSIRY

---

最近我尝试读取一些旧的ST软盘。现在它们中的大多数都无法读取 :-( - Gunther Piez

Answer 5

来自旧的 EISPACK Fortran 程序：

C     这个子程序是 Martin 和 Wilkinson 在《数值数学》12卷349-368页(1968)中编写的 ALGOL 程序 ELMHES 的翻译。
C     自动计算手册，第二卷-线性代数，339-358页(1971)。
C
C     给定一个实数通用矩阵，这个子程序通过稳定的初等相似变换将位于行和列 LOW 到 HIGH 的子矩阵缩减为上 Hessenberg 形式。
...
C     问题和评论应该直接发送给 BURTON S. GARBOW，
C     数学和计算机科学部，ARGONNE 国家实验室
C
C     此版本日期为1983年8月。

- SumoRunner

Answer 6

我们有一个测试工具，最初是为 Windows 3.1 编写的。虽然外观已经更新了很多，但内部仍然保持不变。它在核心中仍然使用一些 far/long 指针术语。

- Steve Rowe

Answer 7

复制粘贴作为核心开发策略让我非常非常难过。

- so-tester