' Example of E/CFA in Amos 5.0 Sub Main () Dim sem As New AmosEngine sem.TextOutput sem.Standardized sem.Smc sem.BeginGroup "ecfa.txt" sem.Structure "x1 = COPING + (1) E1" ' X1 IS ANCHOR sem.Structure "x2 = COPING + SOCIAL + ENHANCE + (1) E2" sem.Structure "x3 = COPING + SOCIAL + ENHANCE + (1) E3" sem.Structure "x4 = COPING + SOCIAL + ENHANCE + (1) E4" sem.Structure "x5 = COPING + SOCIAL + ENHANCE + (1) E5" sem.Structure "x6 = COPING + SOCIAL + ENHANCE + (1) E6" sem.Structure "x7 = COPING + SOCIAL + ENHANCE + (1) E7" sem.Structure "x8 = SOCIAL + (1) E8" ' X8 IS ANCHOR sem.Structure "x9 = COPING + SOCIAL + ENHANCE + (1) E9" sem.Structure "x10 = COPING + SOCIAL + ENHANCE + (1) E10" sem.Structure "x11 = COPING + SOCIAL + ENHANCE + (1) E11" sem.Structure "x12 = ENHANCE + (1) E12" ' X12 IS ANCHOR sem.Structure "COPING (1)" sem.Structure "SOCIAL (1)" sem.Structure "ENHANCE (1)" sem.Structure "COPING <--> SOCIAL" sem.Structure "COPING <--> ENHANCE" sem.Structure "SOCIAL <--> ENHANCE" End Sub