/* *
* GPC SCRIPT
* 
*  GPC is a scripting language with C-like syntax.
*  To learn more access GPC Language Reference on Help menu.
* *********************************************************** */
 
//#include 
main {
 
    if(get_val(SWITCH_ZR) > 90 && get_ptime(SWITCH_ZR) > 3000){
        combo_run(start);
    }
 
    if(event_press(SWITCH_ZL)){
        combo_stop(start);
    }
}
 
 
 
combo start {
    //Perform method of accepting duelist challenge and surrendering for DP
    //Select Duelist Challenge
    //select A
    set_val(SWITCH_A, 100);
    wait(200);
    set_val(SWITCH_A, 0);
    //wait 150
    wait(200);
 
    //Select deck
    //press a
    set_val(SWITCH_A, 100);
    wait(200);
    set_val(SWITCH_A, 0);
    //wait 7000 7 seconds
    wait(7000);
 
    //Select paper/rock/scissor - going right once increases chance of winning and more chance of not messing up timing
    set_val(SWITCH_RIGHT, 100);
    wait(200);
    set_val(SWITCH_RIGHT, 0);
    //press A to select
    set_val(SWITCH_A, 100);
    wait(200);
    set_val(SWITCH_A, 0);
    //wait 3000
    wait(3000);
    //Press A again in case you win rock paper scissors
    set_val(SWITCH_A, 100);
    wait(200);
    set_val(SWITCH_A, 0);
    wait(100);
 
    //duel starts just in case you are 2nd
    //hold the B button for 45 seconds (this will skip any effect prompts or quick play draws)
    set_val(SWITCH_B, 100);
    wait(30000);
    wait(30000);
    set_val(SWITCH_B, 0);
    //press R
    set_val(SWITCH_R, 100);
    wait(200);
    set_val(SWITCH_R, 0);
    //press up
    set_val(SWITCH_UP, 100);
    wait(200);
    set_val(SWITCH_UP, 0);
    //press right
    set_val(SWITCH_RIGHT, 100);
    wait(200);
    set_val(SWITCH_RIGHT, 0);
    //press a
    set_val(SWITCH_A, 100);
    wait(200);
    set_val(SWITCH_A, 0);
    wait(200)
    //press a
    set_val(SWITCH_A, 100);
    wait(200);
    set_val(SWITCH_A, 0);
    //wait 350
    wait(500);
    //press left
    set_val(SWITCH_LEFT, 100);
    wait(200);
    set_val(SWITCH_LEFT, 0);
    wait(200)
    //press a
    set_val(SWITCH_A, 100);
    wait(200);
    set_val(SWITCH_A, 0);
    //wait 2000
    wait(2000);
    //press a
    set_val(SWITCH_A, 100);
    wait(200);
    set_val(SWITCH_A, 0);
    //wait 4000
    wait(4000);
    //press y
    set_val(SWITCH_Y, 100);
    wait(200);
    set_val(SWITCH_Y, 0);
    //wait 500
    wait(500);
    //press y
    set_val(SWITCH_A, 100);
    wait(200);
    set_val(SWITCH_A, 0);
    //wait 1000
    wait(1000);
    //this is the end
    combo_restart(start);
    wait(10);
}