;περικόπτω.ασμ
%macro περικοπή όνομα αρχείου len=0
mov ecx, όνομα αρχείου;δείκτης προς όνομα αρχείου
mov edx, len;length για περιορισμό του μεγέθους του αρχείου
xor eax, eax;ανοιχτό μόνο για ανάγνωση
mov ebx, 0;περικοπή εάν υπάρχει
καλέστε [open];άνοιξε το αρχείο
δοκιμή eax, eax;επιτυχία;
jnz @@περικομμένο
xor eax, eax;κολοβώ
κλήση [περικοπή];περικοπή του αρχείου
δοκιμή eax, eax;επιτυχία;
jnz @@περικομμένο
@@κολοβός:
pop ecx;επαναφορά ecx πριν από τη μακροεντολή
%endmacro
ενότητα .δεδομένα
όνομα αρχείου db 'truncate.txt',0
len dw 5
ενότητα .κείμενο
υποθέστε cs:code, ds:data
org 100h
περικοπή ονόματος αρχείου,len
mov ah, 4ch;exit program
int 21h
```
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα