# File test/backup/DSK.rb, line 80 def is_pascal?(sector_order) #block $02 - bytes $00..$01 are both $00, byte $06 is < 8 and #bytes $0E-$0F = sectors ( 0x118 on a 35 track 5.25" disk) first_sector_in_block_2=INTERLEAVES[sector_order][4] first_sector_in_block_2=get_sector(0,4,sector_order) (first_sector_in_block_2[0..1]=="\x00\x00") && (first_sector_in_block_2[6]<=7) && (first_sector_in_block_2[0x0E]+first_sector_in_block_2[0x0F]*0x100==track_count*8) end