Openkore.com

Code: Select all

automacro countItForMe1 {
    console /Unknown\s#\d+:\s>If\s?:\s([ABC])=(\d+)\s([ABC])=(\d+)\s([ABC])=(\d+).*\nUnknown\s#\d+: How many is A\s(-|\+)\sB\s(-|\+)\sC.*/i
    call doCount1
}

macro doCount1 {
    pause 1
    switch ($.lastMatch1) {
        case (== A){
            $a = $.lastMatch2
        }
        case (== B){
            $b = $.lastMatch2
        }
        case (== C){
            $c = $.lastMatch2
        }
    }
    switch ($.lastMatch3) {
        case (== A){
            $a = $.lastMatch4
        }
        case (== B){
            $b = $.lastMatch4
        }
        case (== C){
            $c = $.lastMatch4
        }
    }
    switch ($.lastMatch5) {
        case (== A){
            $a = $.lastMatch6
        }
        case (== B){
            $b = $.lastMatch6
        }
        case (== C){
            $c = $.lastMatch6
        }
    }
    $doThis = $a$.lastMatch7$b$.lastMatch8$c
    $res = @eval($doThis)
    do talk num $res
}

automacro countItForMe2 {
    console /Unknown\s#\d+:\s>If\s?:\s([AB])=(\d+)\s([AB])=(\d+).*\nUnknown\s#\d+: How many is A\s(-|\+)\sB.*/i
    call doCount2
}

macro doCount2 {
    pause 1
    switch ($.lastMatch1) {
        case (== A){
            $a = $.lastMatch2
        }
        case (== B){
            $b = $.lastMatch2
        }
    }
    switch ($.lastMatch3) {
        case (== A){
            $a = $.lastMatch4
        }
        case (== B){
            $b = $.lastMatch4
        }
    }
    $doThis = $a$.lastMatch5$b$
    $res = @eval($doThis)
    do talk num $res
}