5 CLS
10 KEY ON
12 KEY 4,"close"+CHR$(13)
14 KEY 5,"system"+CHR$(13)
1006 PRINT "NOM DU FICHIER ( A la fin de la transmission, taper sur CTRL + Pause puis taper close + entr‚‚ puis taper SYSTEM + Entr‚‚ puis ALT F4)":INPUT A$
1007 OPEN "O",#2,A$+".VMP"
1010 OPEN"COM1:4800,E,7,2,CS,DS,CD"AS#1
1035 INPUT#1,A$
1046 PRINT #2,A$
1060 GOTO 1035
1100 END