VectorScript
PROCEDURE Example;
VAR
fileName :STRING;
major, minor, maintenance, platform :INTEGER;
BEGIN
GetVersion(major, minor, maintenance, platform);
IF platform = 1 THEN BEGIN
fileName := 'Macintosh HD:Example.txt';
END ELSE BEGIN
fileName := 'C:\Example.txt';
END;
Append(fileName);
WriteLn('example text');
Close(fileName);
END;
RUN(Example);
Python
def Example():
major, minor, maintenance, platform = vs.GetVersion()
if platform == 1:
fileName = 'Macintosh HD:Example.txt'
else:
fileName := 'D:\\Example.txt'
vs.Append(fileName)
vs.WriteLn('example text')
vs.Close(fileName)
Example()