***** 1.22.hsp
                                        else {
                                                list(0, p) = 0
                                                listn(0, p) = q
                                                if ( cnt == noteinfo(0) - 1 ) {
                                                        list(0, p) = -2
                                                }
                                                p++
                                        }
                                loop
                        loop
                }
        }
***** 1.23.HSP
                                        else {
                                                s = ""
                                                repeat 100
                                                        if ( p(2) >= strlen(q) ) {
                                                                break
                                                        }
                                                        s = ""
                                                        repeat 100
                                                                p(3) = instr(q, p(2), " ") + 1
                                                                if ( p(3) == 0 ) {
                                                                        p(3) = strlen(q) - p(2)
                                                                }
                                                                if ( strlen(s) + p(3) > p(1) ) {
                                                                        break
                                                                }
                                                                s += strmid(q, p(2), p(3))
                                                                p(2) += p(3)
                                                        loop
                                                        list(0, p) = -1
                                                        listn(0, p) = s
                                                        p++
                                                loop
                                        }
                                }
                                else {
                                        list(0, p) = 0
                                        listn(0, p) = q
                                        if ( cnt == noteinfo(0) - 1 ) {
                                                list(0, p) = -2
                                                if ( en ) {
                                                        listn(0, p) = "-" + listn(0, p)
                                                }
                                        }
                                        p++
                                }
                        loop
                loop
        }
*****