a=(:cp*6)-(:cs-1) ifa!=1 thengotoa end :1s+=(:1s<100)*5 :iv=-1 goto1
a=(:cp*6)-(:cs-1) ifa!=2 thengotoa end :1r+=(:1r<100)*5 :iv=-1 goto2
a=(:cp*6)-(:cs-1) ifa!=3 thengotoa end :1y+=(:1y<100)*5 :iv=-1 goto3
a=(:cp*6)-(:cs-1) ifa!=4 thengotoa end :1p+=(:1p<100)*5 :iv=-1 goto4
a=(:cp*6)-(:cs-1) ifa!=5 thengotoa end :1b+=(:1b<100)*5 :iv=-1 goto5
a=(:cp*6)-(:cs-1) ifa!=6 thengotoa end :1f+=(:1f<100)*5 :iv=-1 goto6
a=(:cp*6)-(:cs-1) ifa!=7 thengotoa end :2s+=(:2s<100)*5 :iv=-1 goto7
a=(:cp*6)-(:cs-1) ifa!=8 thengotoa end :2r+=(:2r<100)*5 :iv=-1 goto8
a=(:cp*6)-(:cs-1) ifa!=9 thengotoa end :2y+=(:2y<100)*5 :iv=-1 goto9
a=(:cp*6)-(:cs-1) ifa!=10 thengotoa end :2p+=(:2p<100)*5 :iv=-1 goto10
a=(:cp*6)-(:cs-1) ifa!=11 thengotoa end :2b+=(:2b<100)*5 :iv=-1 goto11
a=(:cp*6)-(:cs-1) ifa!=12 thengotoa end :2f+=(:2f<100)*5 :iv=-1 goto12
a=(:cp*6)-(:cs-1) ifa!=13 thengotoa end :3s+=(:3s<100)*5 :iv=-1 goto13
a=(:cp*6)-(:cs-1) ifa!=14 thengotoa end :3r+=(:3r<100)*5 :iv=-1 goto14
a=(:cp*6)-(:cs-1) ifa!=15 thengotoa end :3y+=(:3y<100)*5 :iv=-1 goto15
a=(:cp*6)-(:cs-1) ifa!=16 thengotoa end :3p+=(:3p<100)*5 :iv=-1 goto16
a=(:cp*6)-(:cs-1) ifa!=17 thengotoa end :3b+=(:3b<100)*5 :iv=-1 goto17
a=(:cp*6)-(:cs-1) ifa!=18 thengotoa end :3f+=(:3f<100)*5 :iv=-1 goto18
// Flight Profile Selector by B00M
// Credit: Adrian202, DarkyWiiYou, Goodgu