BoTran2 uses a Global Variable to Dynamically switch Languages at runtime.

G:BTLang             BYTE(1)

BoTran2 uses a TPS (extension BTL) file for Language translation.

BoTranF        FILE,DRIVER('TOPSPEED'),NAME(BoTranFilename),PRE(BOT),CREATE,BINDABLE

Key_DefLang      KEY(BOT:DefLang),NOCASE,PRIMARY

Record           RECORD,PRE()

DefLang            STRING(512)

SrcOfText          CSTRING(512)

Lang2              CSTRING(512)

Lang3              CSTRING(512)

Lang4              CSTRING(512)

Lang5              CSTRING(512)

Lang6              CSTRING(512)

Lang7              CSTRING(512)

Lang8              CSTRING(512)

Lang9              CSTRING(512)

Lang10             CSTRING(512)

Lang11             CSTRING(512)

Lang12             CSTRING(512)

Lang13             CSTRING(512)

Lang14             CSTRING(512)

Lang15             CSTRING(512)

Lang16             CSTRING(512)

Lang17             CSTRING(512)

Lang18             CSTRING(512)

Lang19             CSTRING(512)

Lang20             CSTRING(512)

Lang21             CSTRING(512)

Lang22             CSTRING(512)

Lang23             CSTRING(512)

Lang24             CSTRING(512)

Lang25             CSTRING(512)

Lang26             CSTRING(512)

Lang27             CSTRING(512)

Lang28             CSTRING(512)

                END

              END