Define macro

[Nanci Avitable]

    I am working on a new
        MacBookPro, M4 chip with Sequoia. I have downloaded and
        installed the PSPP version 2.0.1-2 bundle.
        
        I have several SPSS programs that I use to score some protocols
        and output information for use in WORD via mail merge.
        
        These programs include Define routines. Although the information
        I've read indicates that they should transfer okay, I'm running
        into problems. It may be that I don't fully understand when to
        use periods and things like "+". Below is a syntax portion that
        I've been trying to get to run. The actual program is around
        1300 lines long so I'm just focusing on a small bit.
        
        My interpretation from the error messages is that there is
        something wrong with the "if" statement. Unless the problem is
        that Do Repeat cannot be used in a macro body.
        
        Thanks for whatever information you can give me about using
        Define properly. -- Nanci
        
        Data list / ctraw cutraw fatraw sltraw hstraw ltraw sctraw
        sdtraw straw (9f3).
        Begin data.
        45 37 52 52 42 35 54 43 46
        end data.
        
        set Printback on.
        set mprint yes.
        
        define subscore3 (!pos !tokens(1)/!pos !enclose('(',')')/!pos
        !tokens(1))
        do repeat ssc = 1 to 19/limit = !2.
        if (!1 ge limit)  !3 = ssc.
        end repeat.
        !enddefine.
        
        do repeat ssc = 1 to 19 / limit = 0 10 14 18 22 26 30 34 38 42
        46 49 52 55 58 62 65 100 100.
        if(ctraw ge limit)ct = ssc.
        end repeat.
        
        /Users/nanciavitable/Cloud-drive/Private
        Practice/Scoring&Report/ABASIII/ABASmacro.sps:7.1-7.78:
        error: DO REPEAT: In syntax expanded from `subscore3 ctraw (0 10
        14 18 22 26 30 34 38 42 46 49 52 55 58...': Syntax error
        expecting END REPEAT.
            7 | subscore3 ctraw (0 10 14 18 22 26 30 34 38 42 46 49 52
        55 58 62 65 100 100) ct.
              |
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
        
        /Users/nanciavitable/Cloud-drive/Private
        Practice/Scoring&Report/ABASIII/ABASmacro.sps:7.1-7.78:
        error: END REPEAT: In syntax expanded from `subscore3 ctraw (0
        10 14 18 22 26 30 34 38 42 46 49 52 55 58...': No matching DO
        REPEAT.
            7 | subscore3 ctraw (0 10 14 18 22 26 30 34 38 42 46 49 52
        55 58 62 65 100 100) ct.
              |
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
        
        subscore3 ctraw (0 10 14 18 22 26 30 34 38 42 46 49 52 55 58 62
        65 100 100) ct.