Program to reformat dumped data

Please use this Board for QBasic related requests ( file research, programming, etc.)

Moderators:Administrator, Global Moderator

Post Reply
joe.vaira@live.com
Newbie
Posts:1
Joined:Mon Aug 28, 2017 10:55 pm
Program to reformat dumped data

Post by joe.vaira@live.com » Mon Aug 28, 2017 11:55 pm

The following code did not work on my new computer but did on the old. They are both DELLs. The OPEN command gave errors.

Code: Select all

    n$ = "dump.txt"
    next$ = "12/45/7890"
    OPEN n$ FOR INPUT AS #1
'
'   locate first line of Merrill data
    key$= mid$(next$,7,4)
    do until key$ = "2017"
      input #1, next$
      key$= mid$(next$,7,4)
    loop
    merill$ = next$ + " ~ "
'
'   read and combine data until first footer line
    do until next$="Icon legend"
      input #1, next$
      key$ = "NO"
      do until key$="2017"
        input #1, next$
        if next$ = "Pending" or next$ = "show details" then input #1, next$ 'skip extra comments
        merill$ = merill$  + next$ + " ~ "
        key$ =  mid$(next$,7,4)
      loop
      print line$
      merill$ =  next$ + " ~ "
    loop

Cobramil
Jr. Member
Posts:11
Joined:Sat Mar 05, 2016 3:22 am

Re: Program to reformat dumped data

Post by Cobramil » Fri Oct 27, 2017 4:27 am

On my QbeX desktop opened the file without error.

Post Reply