Создание исполняемого файла exe в QB - QBasic

CLS
RANDOMIZE TIMER
ON ERROR GOTO FLEr
 
  PRINT "Vvedite imya faila(bez rashirenya)";
  INPUT ":", FLnm$
  FLnm$ = LEFT$(FLnm$, 8)
    Sv = FREEFILE
  a = RND * 50
  b = RND * 50
  OPEN "O", Sv, FLnm$ + ".txt"
     PRINT #Sv, a, b
  CLOSE Sv
  FLnm$ = LEFT$(FLnm$, 7) + "2"
  OPEN "O", Sv, FLnm$ + ".txt"
     PRINT #Sv, a + b
     PRINT #Sv, a - b
  CLOSE Sv
 
PRINT "Deistvie vipolneno..."
END
 
FLEr:
PRINT "Oshibka..."