top - download
⟦3b5df6694⟧ Wang Wps File
Length: 1085 (0x43d)
Types: Wang Wps File
Notes: Spelunked
Names: »~ORPHAN01.01«
Derivation
└─⟦518101e25⟧ Bits:30005806 8" Wang WCS floppy, CR 0110A
└─ ⟦this⟧ »~ORPHAN01.01«
WangText
F)
TDX.CLOSE ̲SUBDEVICE (#32,0,#A2)
TDX.CLOSE ̲BUS (#32,0)
TDX.SHUTDOWN (#32)
END
5̲ ̲P̲T̲P̲/̲P̲T̲R̲ ̲A̲N̲D̲ ̲O̲C̲R̲ ̲T̲E̲S̲T̲S̲E̲Q̲U̲E̲N̲C̲E̲S̲
5.1 L̲I̲N̲K̲ ̲A̲1̲1̲ ̲T̲E̲S̲T̲S̲E̲Q̲U̲E̲N̲C̲E̲ ̲(̲P̲T̲P̲/̲P̲T̲R̲)̲,̲ ̲D̲O̲ ̲#̲p̲a̲g̲e̲.̲d̲i̲s̲p̲l̲a̲c̲e̲m̲e̲n̲t̲
BEGIN
TDX.INITIALIZE (#32)
TDX.OPEN ̲BUS (#32,0)
TDX.OPEN ̲SUBDEVICE (#32,0,#A1,)
TDX.OPEN ̲VDU (#32,0,#A1,3,5,#F)
DEFINE (1,…08…THE QUICK BROWN FOX JUMPS OVER THE LAZY
DOGS BACK 0123456789(:13:)(:10:)…08…)
GENERATE (1,1,31)
CLEAR (2)
TDX.WRITE (#F,1,62)
TDX.READ (#F,2,62)
COMPARE (1,2,31)
CLEAR (2)
TDX.CLOSE ̲VDU (#)
TDX.CLOSE ̲SUBDEVICE (#32,0,#A2)
TDX.CLOSE ̲BUS (#32,0)
TDX.SHUTDOWN (#32)
END
5.2 L̲I̲N̲K̲ ̲A̲2̲1̲ ̲T̲E̲S̲T̲S̲E̲Q̲U̲E̲N̲C̲E̲ ̲(̲O̲C̲R̲)̲,̲ ̲D̲O̲ ̲#̲p̲a̲g̲e̲.̲d̲i̲s̲p̲l̲a̲c̲e̲m̲e̲n̲t̲
This test is only applied if the OCR is available at
the time of the test.
BEGIN
TDX.INITIALIZE (#32
TDX.OPEN ̲BUS (#32,0)
TDX.OPEN ̲SUBDEVICE (#32,0,#A2,5)
TDX.OPEN ̲VDU (#32,0,#A2,3,5,#F)
( Body wil be defined when the actual OCR is known
)
TDX.CLOSE ̲VDU (#F)
TDX.CLOSE ̲SUBDEVICE (#32,0,#A2)
TDX.CLOSE ̲BUS (#32,0)
TDX.SHUTDOWN (#32)
END