Příklad 63.10. Práce s jednostranně vázaným seznamem na PDP-8

    1             / File: db/pdp8.code/linked-list.pal  -*- mode:asm; -*-
    2             / From: http://en.wikipedia.org/wiki/PDP-8#Linked_list
    3
    4       0400          *0400
    5 00400 0000  GETN,   0       /Gets the number pointed to and moves the pointer
    6 00401 7300          CLA CLL         / AC = Mem[PTR]
    7 00402 1610          TAD I PTR       /+
    8 00403 3211          DCA TEMP        / Save the AC temporarily
    9 00404 2210          ISZ PTR         / PTR++
   10 00405 1610          TAD I PTR
   11 00406 3210          DCA PTR
   12 00407 5600          JMP I GETN      /Return
   13 00410 0000  PTR,    0
   14 00411 0000  TEMP,   0
   15                     $

      No detected errors