INPUT "AHOY THERE MATEY! An' what be YER name? >", NAME$

IF LEN(NAME$) MOD 2 = 0 THEN
    say$ = "EVEN"
ELSE
    say$ = "UNEVEN"
END IF

PRINT "Arr, that be a mighty "; say$; " name yer've got there, "; NAME$; "!"