mirror of https://github.com/gungwald/copy.git
21 lines
317 B
ArmAsm
21 lines
317 B
ArmAsm
|
* Program: Copy file
|
||
|
* Author: Bill Chatfield
|
||
|
|
||
|
use symbols
|
||
|
use macros
|
||
|
|
||
|
* Get source file name
|
||
|
|
||
|
getSource
|
||
|
puts sourcePrompt
|
||
|
|
||
|
* Get destination directory
|
||
|
|
||
|
>>> puts;destPrompt
|
||
|
|
||
|
* Variables
|
||
|
|
||
|
sourcePrompt asc "File to copy:",00
|
||
|
destPrompt asc "Directory to copy it to:",00
|
||
|
|