;ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ Copy ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ» ;º º ;º Copy FILENAME.EXT to: º ;º °°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°° º ;ºÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄĺ ;º [ Copy ] [ Cancel ] º ;ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ ; ޝ¨á â¥«ì ­ ç «ì­®£® ®ª­  ª®¯¨à®¢ ­¨ï dial_copy: dw 0902h,074Ch ; Yo,Xo,lenY,lenX db "Copy",0 ; â¨â« ®ª­  ; db TextLine dw 0202h ; Yo,Xo db "Copy " copy_name: db "FILENAME.EXT"," to:",0 ; ¨¬ï ä ©«  (®áâ â®ª § ¯. ¯à®¡¥« ¬¨) ; db HLine dw 0401h ; Yo,Xo db 74 ; ¤«¨­  «¨­¨¨ db "Ä" ; ᨬ¢®« § ¯®«­¥­¨ï ; db Button ; ­®¬¥à ®¡ê¥ªâ  dw 051Bh ; Yo,Xo db "[ &Copy ]",0 ; ¨¬ï ¡ãâ®­  db 2Ch ; ᪥­-ª®¤ hot-ª« ¢¨è¨ db cmOkey ; ­®¬¥à ª®¬ ­¤ë db 1 ; ª®­â¥ªáâ ; db Button ; ­®¬¥à ®¡ê¥ªâ  dw 0527h ; Yo,Xo db "[ Ca&ncel ]",0 ; ¨¬ï ¡ãâ®­  db 2Fh ; ᪥­-ª®¤ hot-ª« ¢¨è¨ db cmCancel ; ­®¬¥à ª®¬ ­¤ë db 2 ; ª®­â¥ªáâ ; db InputLine ; å à ªâ¥à ®¡ê¥ªâ  dw 0302h ; Yo,Xo db 72 ; ¤«¨­  áâப¨ db 0 ; ª®­â¥ªáâ dw input_line_copy ; ¡ãä¥à áâப¨ ¢¢®¤  ; db -1 ; ª®­¥æ ®¯¨á â¥«ï ;ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ Copy ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ» ;º º ;º Copying the file º ;º FILENAME.EXT to: º ;º A:\FILENAME.EXT º ;º °°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°° º ;ºÄÄÄÄÄÄÄÄÄÄ Total: 0,000,000,000 ÄÄÄÄÄÄÄÄÄĺ ;º °°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°° º ;º º ;ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ ; ޝ¨á â¥«ì ®ª­  ¯à®æ¥áá  ª®¯¨à®¢ ­¨ï dial_copy_total_process: dw 0912h,0A2Ch ; Yo,Xo,lenY,lenX db "Copy",0 ; â¨â« ®ª­  ; db TextLine dw 0202h ; Yo,Xo db "Copying the file",0 ; db TextLine dw 0302h ; Yo,Xo copy_name1: db "FILENAME.EXT"," to:",0 ; ¨¬ï ä ©«  (®áâ â®ª § ¯. ¯à®¡¥« ¬¨) ; db TextLine dw 0402h ; Yo,Xo copy_name2: db 'A:\FILENAME.EXT ',0 ; 34 ¡ ©â  ; db HLine dw 0601h ; Yo,Xo db 42 ; ¤«¨­  «¨­¨¨ db "Ä" ; ᨬ¢®« § ¯®«­¥­¨ï ; db TextLine dw 060Bh ; Yo,Xo db " Total: " db "0,000,000,000 ",0 ; 2-ï «¨­¥©ª  (®¡é ï) db ProcesLine dw 0702h ; Y,X ¯®«®¦. db 40 ; ¤«¨­  «¨­¥©ª¨ dw max_file_bytes1 ;  ¤à¥á ï祩ª¨ á MAX ç¨á«®¬ dw curr_bytes1 ;  ¤à¥á ï祩ª¨ á ⥪. ç¨á«®¬ subrout_process1: dw copy_file ; á®åà.  ¤à¥á ¯/¯à®£à ¬¬ë ¯à®æ¥áá  ; 1-ï «¨­¥©ª  db ProcesLine dw 0502h ; Y,X ¯®«®¦. db 40 ; ¤«¨­  «¨­¥©ª¨ dw max_file_bytes ;  ¤à¥á ï祩ª¨ á MAX ç¨á«®¬ dw curr_bytes ;  ¤à¥á ï祩ª¨ á ⥪. ç¨á«®¬ subrout_process: dw copy_file ; á®åà.  ¤à¥á ¯/¯à®£à ¬¬ë ¯à®æ¥áá  ; db -1 ; ª®­¥æ ®¯¨á â¥«ï