home *** CD-ROM | disk | FTP | other *** search
- BEGIN { flag = 0 ; start = 0 ; origin = 1 ; pep = 1 ; lastseg = "" }
-
- $1 == "Start" {
- $0 = " Start Length Name Class"
- start = 1
- }
-
- $1 == "Address" {
- if (origin == 1) {
- printf " Origin Group\n %4s:0 DGROUP\n\n", lastseg
- origin = 0
- }
- }
-
- {
- if ((flag == 1) && ($0 != "")){
- printf " %s %6s %-22s %s\n", $1, $2, $3, $4
- lastseg = $1
- }
- else
- print $0
- }
-
- $0 == "" { flag = start ; start = 0 }
-
- $1 == "Origin" { origin = 0 }
-
- $1 == "Program" { pep = 0 }
-
- END { if (pep == 1) print "Program entry point at 0001:0000" }