Ako moze mala pomoc od Clipper programera.Interesuje me ovaj kod tacnije sta on predstavlja:
setcursor(0)
clear screen
clear gets
run dir > c:\mis.txt
vred:= SubStr(memoline(memoread("c:\mis.txt"), 78, 3), 26, 9)
broj:= 0
for i:= 1 to 9
kar:= SubStr(vred, i, 1)
broj:= broj + Asc(kar)
next
if (broj != 471 .AND. broj != 288)
erase c:\mis.txt
set color to W*/N
@ 10, 21 say "Neovlastena upotreba programa !!!"
set color to W/N
setcursor(1)
quit
endif
erase c:\mis.txt
if (!file("D:\CLIP\E.EX"))
quit
endif
Najvise mi nije jasan ova linija koda:if (broj != 471 .AND. broj != 288)
Programirao sam u VB6 i Delphi i po mojoj logici to bi znacilo sledece:Ako je broj 471 i broj je 288 onda brisi c:\mis.txt ali predhodne linije koda se ne uklapaju
u to kako ja razmislam