TO MODE2›FS HT CS›MAKE "START ( ( ( .EXAMINE 561 ) * 256 ) + .EXAMINE 560 )›REPEAT 3 [.DEPOSIT :START 112 MAKE "START ( :START + 1 )]›.DEPOSIT :START 71 MAKE "START ( :START + 1 )›.DEPOSIT :START 17 MAKE "START ( :START + 1 )›.DEPOSIT :START 59 MAKE "START ( :START + 1 )›REPEAT 11 [.DEPOSIT :START 7 MAKE "START ( :START + 1 )]›.DEPOSIT :START 65 MAKE "START ( :START + 1 )›.DEPOSIT :START ( .EXAMINE 560 ) MAKE "START ( :START + 1 )›.DEPOSIT :START ( .EXAMINE 561 )›END›››