Looking at the entrance into B, I see stacked together green, yellow and magenta in that order before entering into B from the outside. As brianjn calls it, it's a triple coloured bar, as is the exit, which starts with a green and ends with a magenta.
If one were, however to treat the entrance as solely green, then the following would work:
BADEADEFCBADEIHDIMNOKJFGKLPONQRSPONRX 36
BADEADEFGKPLGCFBADEIHDIMNOKJNQRSPONRX 36
BADEADEIHDIMNOKJFCBADEFGKLPONQRSPONRX 36
BADEFCBADEADEIHDIMNOKJFGKLPONQRSPONRX 36
BADEFCBADEFGKLPOJEDIHDIMNOKJNQRSPONRX 36
BADEFCBADEFGKLPONRQMHDIMNOKJNQRSPONRX 36
BADEFCBADEFGKLPONQRSPOJEDIHDIMNOKJNRX 36
BADEFCBADEFGKLPONQRSPONRQMHDIMNOKJNRX 36
BADEFCBADEFGKLPONQRSPOJEDIHDIMNOKJNRX 36
BADEFCBADEFGKLPOJEDIHDIMNOKJNQRSPONRX 36
BADEFCBADEIMNIHDIMNOKJFGKLPONQRSPONRX 36
BADEFCBADEIHDIMNIMNOKJFGKLPONQRSPONRX 36
BADEFCBADEIHDIMNJEBADEFGKLPONQRSPONRX 36
BADEFCBADEIHDIMNOKJFGKFGKLPONQRSPONRX 36
BADEFCBADEIHDIMNOKJFGKLPONQRSPONRX 33
BADEFCBADEIHDIMNOKJOKJFGKLPONQRSPONRX 36
BADEFCBADEIHDIHDIMNOKJFGKLPONQRSPONRX 36
BADEFGKFCBADEIHDIMNOKJFGKLPONQRSPONRX 36
BADEFGKFGKPLGCFBADEIHDIMNOKJNQRSPONRX 36
BADEFGKPLGCFBADEADEIHDIMNOKJNQRSPONRX 36
BADEFGKPLGCFBADEIMNIHDIMNOKJNQRSPONRX 36
BADEFGKPLGCFBADEIHDIMNIMNOKJNQRSPONRX 36
BADEFGKPLGCFBADEIHDIMNOKJOKJNQRSPONRX 36
BADEFGKPLGCFBADEIHDIMNOKJNQRSPONRX 33
BADEFGKPLGCFBADEIHDIHDIMNOKJNQRSPONRX 36
BADEIMNIHDIMNOKJFCBADEFGKLPONQRSPONRX 36
BADEIHDIMNIMNOKJFCBADEFGKLPONQRSPONRX 36
BADEIHDIMNJEBADEFCBADEFGKLPONQRSPONRX 36
BADEIHDIMNOKJFCBADEADEFGKLPONQRSPONRX 36
BADEIHDIMNOKJFCBADEFGKFGKLPONQRSPONRX 36
BADEIHDIMNOKJFCBADEFGKLPONQRSPONRX 33
BADEIHDIMNOKJFGKFCBADEFGKLPONQRSPONRX 36
BADEIHDIMNOKJOKGCFBADEFGKLPONQRSPONRX 36
BADEIHDIMNOKJOKJFCBADEFGKLPONQRSPONRX 36
BADEIHDIHDIMNOKJFCBADEFGKLPONQRSPONRX 36
with, as before, the numbers representing the actual rooms on the list. Each of these also requires allowing more than one passage through a given portal in the same direction.
The only change to the program was the initial placement in the color sequence:
roomList$ = "B": currSeq = 2