https://remp3indir.net/modular-programming-qbasic-string-function-mid/