Vars Alias command

blee13

Hello,

I am having trouble setting up the following Vars_Alias command:

DISKVARS = A, B, C, D, E, F, G, H, I, J , K, L, M, N, O, P, Q, R, S, T, U, V, W, X, Y, Z
DISKFORMAT = 8.3

DIM A = 50 \All elements in A() are vectors

 

VARS_ALIAS Initial Pairing (Enter 1-16) = A(1) \Default is pairing #1

\Constant for Array A(1)
^initialPairing = 1

 

S.S.1,
S1,
0.001": SET A(^initialPairing) = 1; SET A(6) = 0; SET A(7) = 0 ---> S2
S2,
#START: SET A(^initialPairing) = A(^initialPairing); ON ^leftboxHouseLight ---> S3
S3,
0.01": IF A(^initialPairing) = 1 [@1, @Not1]
@1: Z1; Z5 --->S4
@Not1: IF A(^initialPairing) = 2 [@2, @Not2]
@2: Z1; Z6 ---> S4
@Not2: IF A(^initialPairing) = 3 [@3, @Not3]
@3: Z1; Z7 ---> S4
@Not3: IF A(^initialPairing) = 4 [@4, @Not4]
@4: Z1; Z8 ---> S4
@Not4: IF A(^initialPairing) = 5 [@5, @Not5]
@5: Z2; Z5 ---> S4
@Not5: IF A(^initialPairing) = 6 [@6, @Not6]
@6: Z2; Z6 ---> S4
@Not6: IF A(^initialPairing) = 7 [@7, @Not7]
@7: Z2; Z7 ---> S4
@Not7: IF A(^initialPairing) = 8 [@8, @Not8]
@8: Z2; Z8 ---> S4
@Not8: IF A(^initialPairing) = 9 [@9, @Not9]
@9: Z3; Z5 ---> S4
@Not9: IF A(^initialPairing) = 10 [@10, @Not10]
@10: Z3; Z6 ---> S4
@Not10: IF A(^initialPairing) = 11 [@11, @Not11]
@11: Z3; Z7 ---> S4
@Not11: IF A(^initialPairing) = 12 [@12, @Not12]
@12: Z3; Z8 ---> S4
@Not12: IF A(^initialPairing) = 13 [@13, @Not13]
@13: Z4; Z5 ---> S4
@Not13: IF A(^initialPairing) = 14 [@14, @Not14]
@14: Z4; Z6 ---> S4
@Not14: IF A(^initialPairing) = 15 [@15, @mustBe16]
@15: Z4; Z7 ---> S4
@mustBe16: Z4; Z8 ---> S4

S4,
1": SHOW 1, Initial Pairing, A(^initialPairing) ---> SX

I get the following error:

ERROR # 25
VARS_ALIAS Initial Pairing Enter 1-16 = A(1)
Offending text: Illegal characters found when state number expected: VARS_ALIAS Initial Pairing Enter 1-16 = A(1)
Error unknown or as described in above message

Not sure where I am going wrong here, thanks for any help!