suggest optimize code

[xxxxxx]

testmesage=1
FOR I=0 to 3  
    if poruka[i+1]<>klima[i+1] then testmesage=0
next i

if testmesage=1 then gosub saljisms

this one works fine and compiles less....