prAdd2ForEachEnemyInArea:
    rForEachUnitInRangeTemplate(pTheWanShape)
        rIfUnitsAreNotAllied
            rAdd(rConstant(2))

pTheWanShape:
    // Header
    BYTE 5 5 // Size
    BYTE 2 2 // Origin (Where the Unit would be)

    // Data
    BYTE 0 1 1 1 0
    BYTE 1 0 1 0 1
    BYTE 1 1 0 1 1
    BYTE 1 0 1 0 1
    BYTE 0 1 1 1 0

    // For good measure
    ALIGN 4