...
function SS1_Act takes nothing returns nothing
    local unit d
    local unit g
    
    call CreateNUnitsAtLoc( 1, 'n000', Player(PLAYER_NEUTRAL_PASSIVE), GetSpellTargetLoc(), bj_UNIT_FACING )
    set d = GetLastCreatedUnit()
    set g = GetTriggerUnit()

    set bj_forLoopAIndex = 1
    set bj_forLoopAIndexEnd = 60
    loop
        exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
         call ForGroupBJ(  GetUnitsInRangeOfLocAll( 500.00, GetUnitLoc(d) ), function Enter(g)  ) //Здесь выводит ошибку о том что отсутствует символ '
         call TriggerSleepAction( 0.10 )
         call ForGroupBJ(  GetUnitsInRangeOfLocAll( 500.00, GetUnitLoc(d) ), function Exit(g)  )  //И здесь выводит ошибку о том что отсутствует символ '
        set bj_forLoopAIndex = bj_forLoopAIndex + 1
    endloop
endfunction
...

call CreateNUnitsAtLoc(1,'n000'

function SS1_Act takes nothing returns nothing
    local unit d
    local unit g
    
    call CreateNUnitsAtLoc( 1, 'n000', Player(PLAYER_NEUTRAL_PASSIVE), GetSpellTargetLoc(), bj_UNIT_FACING )
    set d = GetLastCreatedUnit()
    set g = GetTriggerUnit()

    set bj_forLoopAIndex = 1
    set bj_forLoopAIndexEnd = 60
    loop
        exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
         call ForGroupBJ(  GetUnitsInRangeOfLocAll( 500.00, GetUnitLoc(d) ), function Enter  ) 
         call TriggerSleepAction( 0.10 )
         call ForGroupBJ(  GetUnitsInRangeOfLocAll( 500.00, GetUnitLoc(d) ), function Exit  )
         set bj_forLoopAIndex = bj_forLoopAIndex + 1
    endloop
endfunction

function Test_Filter takes nothing returns nothing
 if GetEnumUnit()!=bj_lastCreatedUnit then
  call KillUnit(GetEnumUnit())
 endif
endfunction

function Test takes nothing returns nothing
 local unit u=GetTriggerUnit()
 local location p=GetUnitLoc(u)
 local group g=GetUnitsInRangeOfLocAll(500.,p)

 set bj_lastCreatedUnit=u
 call ForGroup(g,function Test_Filter)

 call RemoveLocation(p)
 call DestroyGroup(g)
 set bj_lastCreatedUnit=null
 set u=null
 set p=null
 set g=null
endfunction