Документация → Встроенные функции
WriteLine("Hello, world!");string name="John";
string surname="Doe";
WriteLine("Logged in as {0} {1}", name, surname); //Logged in as John Doe
WriteLine("Current date and time in RFC1123 format: {0:R}", Now()); // Current date and time in RFC1123 format: Fri, 19 Feb 2021 11:07:27 GMT
object key=ReadKey("Нажмите Enter");
WriteLine();
// Нажимаем клавишу ввод
if(key==object\"Enter") WriteLine("Вы нажали Enter (references are equal)."); // не сработает, т.к. сравниваются ссылки, а не значения.
if(ToString(key)=="Enter") WriteLine("Вы нажали Enter."); //сработает. ToString(key) вернёт имя клавиши.
key=ReadKey("Нажмите s");
WriteLine();
// Нажимаем клавишу s (любая раскладка)
if(ToString(key)=="S") WriteLine("Вы нажали S."); // сработает, и неважно, маленькую или большую 's' вы ввели, - имя клавиши будет 'S'.
key=ReadKey("Нажмите ф");
WriteLine();
// Нажимаем 'ф' (русская раскладка)
WriteLine(key+"; "+ToInt(key)); // A; 65 // A - это имя клавиши, а не символ. 65 - её код. На русско-английской клавиатуре 'ф' и 'a' (англ.) находятся на одной клавише.
if(ToInt(key)==1092) WriteLine("key==1092"); // не сработает, 1092 - код символа 'ф', но key сконвертится в 65 (код клавиши A).
if(ToInt(key)==65) WriteLine("key==65"); // сработает потому, что key при конвертировании в int будет 65.
if(ToChar(key)=='ф') WriteLine("key=='ф'"); // сработает потому, что key сконвертится в символ 'ф', и будут сравниваться char-ы.
if(ToString(key)=="ф") WriteLine("key==\"ф\""); // не сработает, т.к. ToString(key) вернёт 'A'.
object key=ReadKey(true);
// Нажимаем любую клавишу вместе с Alt и Shift
object km=KeyModifiers(key);
WriteLine(GetType(km)); // System.ConsoleModifiers
if(ToString(km)=="Alt, Shift") WriteLine("Нажаты Alt и Shift"); // сработает
if(ToInt(km)==3) WriteLine("km==3"); // сработает, 3 это ConsoleModifiers.Alt (1) + ConsoleModifiers.Shift (2)
WriteLine(Substring("hello", 1, 2)); // возвращает "el"
WriteLine(Substring("hello", 3)); // возвращает "lo"WriteLine(Slice("abcde", 2)); //cde
WriteLine(Slice("abcde", 2, 4)); //cd
WriteLine(Slice("abcde",, 3)); //abc //можно писать Slice("abcde", 0, 3), но перегрузка без 0 работает чуть быстрее
WriteLine(Slice("abcde", 3,)); //de
WriteLine(Slice("abcde", -2)); //de
WriteLine(Slice("abcde", -4, -2)); //bc
WriteLine(Slice("abcde", -10, 20)); //abcdestr = Left("hello", 2); // возвращает "he"str = Right("hello", 3); // возвращает "llo"l = Length("hello"); // возвращает 5i = IndexOf("hello", 'l'); // возвращает 2
i = IndexOf("hello", "ell"); // возвращает 1
i = IndexOf("hello", 'l', 0); // возвращает 2
i = IndexOf("hello", 'l', 3); // возвращает 3
i = IndexOf("hello", "ell", 0); // возвращает 1
i = IndexOf("hello", "Ell", ToEnum("OrdinalIgnoreCase", "System.StringComparison")); // возвращает 1
i = IndexOf("hello", "Ell", true); // возвращает 1
i = IndexOf("hello", "Ell", 0, true); // возвращает 1
i = IndexOf("hello", 'e', 0, 5); // возвращает 1
i = IndexOf("hello", 'l', 0, 2); // возвращает -1
i = IndexOf("hello", 'l', 3, 2); // возвращает 3
i = IndexOf("hello", "el", 0, 5); // возвращает 1
i = IndexOf("hello", "el", 0, 2); // возвращает -1
i = IndexOf("hello", "el", 1, 2); // возвращает 1
i = IndexOf("hello", "el", 0, 5, 1); // возвращает 1
i = IndexOf("hello", "el", 0, 5, ToEnum("OrdinalIgnoreCase", "System.StringComparison")); // возвращает 1
i = IndexOf("hello", "el", 0, 5, true); // возвращает 1i = LastIndexOf("hello", 'l'); // возвращает 3
i = LastIndexOf("HELLO", "el", true); // возвращает 1
i = LastIndexOf("hello", 'l', 2); // возвращает 2
i = LastIndexOf("hello", "l", 3); // возвращает 3char[] chars=new char[]{'d', 'c', 'e'};
i=IndexOfAny("abcde", chars); //2
i=IndexOfAny("abcde", chars, 3); //3
i=IndexOfAny("abcde", chars, 2, 3); //2char[] chars=new char[]{'b', 'c', 'd'};
i=LastIndexOfAny("abcde", chars); //3
i=LastIndexOfAny("abcde", chars, 2); //2
i=LastIndexOfAny("abcde", chars, 2, 3); //2str=Trim(" hello "); // возвращает "hello"
str=Trim("__hello_",'_'); // возвращает "hello"WriteLine(TrimStart(" hello ")+";"); //hello ;
WriteLine(TrimStart("__hello_", '_')+";"); //hello_;WriteLine("_"+TrimEnd(" hello ")); //_ hello
WriteLine(TrimEnd("__hello_", '_')); //__hellostr=ToUpper("hello"); // возвращает "HELLO"str=ToLower("HELLO"); // возвращает "hello"str=ToUpperFirst("hello"); // возвращает "Hello"str=ToLowerFirst("HELLO"); // возвращает "hELLO"str = Replace("hello", "ell", "ABC"); // возвращает "hABCo"
str = Replace("HELLO", "ll", "xx", 5); // возвращает "HExxO"
object ordinalIgnoreCase=ToEnum("OrdinalIgnoreCase", "System.StringComparison"); // создаём enum
str = Replace("HELLO", "ll", "xx", ordinalIgnoreCase); // возвращает "HExxO"
str = Replace("Hello", 'l', 'x'); // возвращает "Hexxo"
str = Replace("HELLO", "ll", "xx", true); // возвращает "HExxO"str = Remove("hello", 2, 2); // возвращает "heo"
str = Remove("hello", 2); // возвращает "he"str = Insert("hello", 2, "ABC"); // возвращает "heABCllo"WriteLine(PadLeft("hello", 7)); // возвращает " hello"
WriteLine(PadLeft("hello", 7, '*')); // возвращает "**hello"WriteLine(PadRight("hello", 7)); // возвращает "hello "
WriteLine(PadRight("hello", 7, '*')); // возвращает "hello**"b = StartsWith("hello", 'h'); // возвращает true
b = StartsWith("hello", "he"); // true
b = StartsWith("Hello", "he", 5); // true
b = StartsWith("Hello", "he", ToEnum("OrdinalIgnoreCase", "System.StringComparison")); // true
b = StartsWith("Hello", "he", true); // true
b = StartsWith("Hello", "he", true, Create("System.Globalization.CultureInfo", "es-ES", false)); // trueb = EndsWith("hello", 'o'); // возвращает true
b = EndsWith("hello", "lo"); // true
b = EndsWith("HELLO", "lo", 5); // true
b = EndsWith("HELLO", "lo", ToEnum("OrdinalIgnoreCase", "System.StringComparison")); // true
b = EndsWith("HELLO", "lo", true); // true
b = EndsWith("HELLO", "lo", true, Create("System.Globalization.CultureInfo", "es-ES", false)); // truestring product="blazer";
decimal price = 15.99m;
string s = Format("The current price of the {0} is {1:C2}.", product, price); //возвращает (en-US): The current price of the blazer is $15,99.b=IsNumeric("123.4567"); // False
b=IsNumeric("123,4567"); // True
b=IsNumeric("123,45,67"); // FalseWriteLine(Ord('b')); // возвращает 98
WriteLine(Ord('Б')); // возвращает 1041
WriteLine(Ord("Hello",1)); // возвращает 101 // код символа 'e'WriteLine(Asc('b')); // 98
WriteLine(Asc('Б')); // 63 // 63 - это символ '?' в Latin1. Это значит, что укзанный символ не найден.
WriteLine(Asc('Б', "windows-1251")); // 193
WriteLine(Asc('Б', "utf-8")); // 208 // т.к. в utf-8 символ представлен двумя байтами, то 208 - это только первый байт (второй 145).
WriteLine(Asc('Щ')); // 63 // нет такого символа в Latin1.
WriteLine(Asc('Б', "windows-1250")); // 63 // нет такого символа в Windows-1250.
WriteLine(Asc("Тест", 2, "windows-1251")); // возвращает 241 // код символа 'c'
WriteLine(Chr(Asc("Б", "windows-1251"), "windows-1251")); // Б // Asc и Chr - обратные функции.
object enc=typeof("System.Text.Encoding")->GetEncoding("windows-1251");
WriteLine(Asc('Б', enc));WriteLine(Chr(193, "windows-1251")); // Б
WriteLine(Chr(193)); // A //символ в Latin1
WriteLine(Chr(119)); //w
object enc=typeof("System.Text.Encoding")->GetEncoding("windows-1251");
WriteLine(Chr(193, enc));
for(int i=0;i<256;i++) WriteLine(i+") "+Chr(i)); //Вывод всех символов из Latin1WriteLine(CharAt("abc",1)); //b
WriteLine("abc"[1]); //b //"abc"[1] интерпретатор преобразовывает в CharAt("abc",1)|
bool IsControl(char c) - управляющим символом. bool IsDigit(char c) - десятичной цифрой. bool IsHighSurrogate(char c) - старшим символом-заместителем. bool IsLetter(char c) - буквой. bool IsLetterOrDigit(char c) - буквой или десятичной цифрой. bool IsLower(char c) - буквой нижнего регистра. bool IsLowSurrogate(char c) - младшим символом-заместителем. bool IsNumber(char c) - цифрой. |
bool IsPunctuation(char c) - знаком препинания. bool IsSeparator(char c) - знаком-разделителем. bool IsSurrogate(char c) - имеет ли символ заменяющую кодовую единицу. bool IsSurrogatePair(char c1, char c2) - образуют ли два заданных char-а суррогатную пару. bool IsSymbol(char c) - символьным знаком. bool IsUpper(char c) - буквой верхнего регистра. bool IsWhiteSpace(char c) - пробелом. |
|
bool ToBool(object value) - в Boolean (логическое значение: true или false). byte ToByte(object value) - в Byte (8-битовое целое число без знака). short ToShort(object value) - в Int16 (16-разрядное целое число со знаком). int ToInt(object value) - в Int32 (32-разрядное целое число со знаком). long ToLong(object value) - в Int64 (64-разрядное целое число со знаком). float ToFloat(object value) - в Single (число одиночной точности с плавающей запятой). double ToDouble(object value) - в Double (число двойной точности с плавающей запятой). decimal ToDecimal(object value) - в Decimal (десятичное число с плавающей запятой). |
date ToDate(object value) - в DateTime (время, обычно выраженное как дата и время суток). string ToString(object value) - в строку. string ToString(byte|short|int|long value, int toBase) - в эквивалентное строковое представление в указанной системе счисления (2, 8, 10 или 16). object ToChar(object code) - в символ (тип char). object ToEnum(string|object value, string|object type) - в Enum (преобразует значение заданного целого числа, либо строки, в член перечисления). В type можно указывать строку с именем типа, либо передавать объект Type. |
object protocol=ToEnum(3072, "System.Security.Authentication.SslProtocols, System"); // SslProtocols.Tls12.
WriteLine(protocol); //Tls12
object comparison=ToEnum("InvariantCulture", "System.StringComparison"); // StringComparison.InvariantCulture
WriteLine(comparison); //InvariantCulture
object enumType=typeof("System.StringSplitOptions");
object splitOptions=ToEnum("RemoveEmptyEntries", enumType); // StringSplitOptions.RemoveEmptyEntries
WriteLine(splitOptions); //RemoveEmptyEntries
str=ToString(123, 2); // возвращает "1111011"
str=ToString(123, 8); // возвращает "173"
str=ToString(123, 10); // возвращает "123"
str=ToString(123, 16); // возвращает "7b"char c=ToChar(98); // возвращает 'b'
c=ToChar(1041); // возвращает 'Б'
c=ToChar("Т"); // возвращает 'Т'WriteLine(Floor(4.789)); // 4
WriteLine(Ceiling(4.789)); // 5
WriteLine(Round(4.789,1)); // 4,8
WriteLine(Round(4.789, 2, ToEnum("AwayFromZero", "System.MidpointRounding"))); // 4,79
WriteLine(Truncate(4.9)+" / "+Floor(4.9)+" / "+Ceiling(4.9)); //4 / 4 / 5
WriteLine(Truncate(-4.9)+" / "+Floor(-4.9)+" / "+Ceiling(-4.9)); //-4 / -5 / -4
WriteLine(Pow(2, 3)); //8d=Abs(-5); // 5double x = 1.0, y = 2.0;
double angle, radians, result;
const double PI = typeof("System.Math")->PI;
// Calculate the tangent of 30 degrees.
angle = 30;
radians = angle * (PI/180);
result = Tan(radians);
WriteLine("The tangent of 30 degrees is {0}.", result);
// Calculate the arctangent of the previous tangent.
radians = Atan(result);
angle = radians * (180/PI);
WriteLine("The previous tangent is equivalent to {0} degrees.", angle);
// Calculate the arctangent of an angle.
radians = Atan2(y, x);
angle = radians * (180/PI);
WriteLine();
WriteLine("The arctangent of the angle formed by the x-axis and ");
WriteLine("a vector to point ({0},{1}) is {2}, ", x, y, radians);
WriteLine("which is equivalent to {0} degrees.", angle);
/*
This example produces the following results:
The tangent of 30 degrees is 0,5773502691896257.
The previous tangent is equivalent to 29,999999999999996 degrees.
The arctangent of the angle formed by the x-axis and
a vector to point (1,2) is 1,1071487177940904,
which is equivalent to 63,43494882292201 degrees.
*/
int[] arr=new int[]{1, 2, 3, 4, 5};
WriteLine(Join("; ",arr)); // 1; 2; 3; 4; 5
WriteLine(Join('|',arr)); // 1|2|3|4|5
//Вместо массива можно передавать любой объект, тип которого реализует System.Collections.IEnumerable
object list=Create("System.Collections.Generic.List`1[System.String], System.Collections"); //создаём List<string>
list->AddRange(new string[]{"Hello", "World", "Test"});
WriteLine(Join(", ", list)); //Hello, World, Teststring[] arr= Split("1|2|3|4|5", '|');
WriteLine(Join("; ",arr)); // 1; 2; 3; 4; 5int[] arr=new int[3];
WriteLine(Length(arr)); // 3
Resize(arr, 5);
WriteLine(Length(arr)); // 5
//Можно получать кол-во элементов в любых объектах
object list=Create("System.Collections.Generic.List`1[System.String], System.Collections"); //создаём List<string>
list->AddRange(new string[]{"Hello", "World", "Test"});
WriteLine(Length(list)); // 3
int[] arr=new int[]{100, 234, 567, 234};
index=IndexOf(arr, 234); // 1
index=IndexOf(arr, 234, 2); // 3
index=LastIndexOf(arr, 234); // 3
index=LastIndexOf(arr, 234, 2); // 1short[] arr=new short[]{10, 20, 30, 40, 50};
Reverse(arr);
WriteLine(Join(' ', arr)); //50 40 30 20 10int[] arr=new int[]{3, 5, 1, 4, 2};
Sort(arr);
WriteLine(Join("; ", arr)); // 1; 2; 3; 4; 5int[] keys=new int[]{5, 4, 3, 2, 1};
string[] items=new string[]{"item-1", "item-2", "item-3", "item-4", "item-5"};
Sort(keys, items);
WriteLine(Join("; ", items)); // item-5; item-4; item-3; item-2; item-1int[] arr=new int[]{1, 2, 3, 4, 5};
int c=Length(arr);
int[] arr2=new int[c];
Copy(arr, arr2, c);
WriteLine(Join("; ", arr2)); // 1; 2; 3; 4; 5
//Перегрузка: Копирует диапазон элементов из массива, начиная с заданного индекса источника, и вставляет его в другой массив, начиная с заданного индекса назначения.
c-=2;
int[] arr3=new int[c];
Copy(arr, 1, arr3, 0, c);
WriteLine(Join("; ", arr3)); // 2; 3; 4long[] arr:=Array(long, 100L, 200L, 300L);
WriteLine(Join(", ", arr)); //100, 200, 300
char[] arr2:=Array("System.Char", 'a', 'b', 'c');
WriteLine(Join(", ", arr2)); //a, b, c
date[] arr3:=Array(date, "18.09.2021", "19.09.2021 10:15:55", "20.09.2021"); //значения string будут конвертированы в date автоматически
WriteLine(Join("; ", arr3)); //18.09.2021 0:00:00; 19.09.2021 10:15:55; 20.09.2021 0:00:00
byte[] arr=new byte[]{10, 20, 30, 40, 50, 60, 70};
byte[] newArr=Slice(arr, 2, -2); //а можно написать arr[2, -2], что интерпретатор преобразует в Slice(arr, 2, -2)
WriteLine(Join(' ', newArr)); //30 40 50
newArr=Slice(arr, 2);
WriteLine(Join(' ', newArr)); //30 40 50 60 70
newArr=Slice(arr, , 2);
WriteLine(Join(' ', newArr)); //10 20byte[] arr=new byte[]{10, 20, 30, 40, 50, 60, 70};
byte[] arr2=Splice(arr, 2, 3, 33, 44, 55); //замена элементов 2, 3, 4 (30 на 33, 40 на 44, 50 на 55)
WriteLine(Join(' ', arr)); //10 20 33 44 55 60 70
WriteLine(Join(' ', arr2)); //30 40 50
//*****
arr=new byte[]{10, 20, 30, 40, 50, 60, 70};
arr2=Splice(arr, 2, 3); //удаление трёх элементов начиная с индекса 2
WriteLine(Join(' ', arr)); //10 20 60 70
WriteLine(Join(' ', arr2)); //30 40 50
//*****
arr=new byte[]{10, 20, 30, 40, 50, 60, 70};
arr2=Splice(arr, 2, 0, 22, 222); //вставить 22 и 222 без удаления других
WriteLine(Join(' ', arr)); //10 20 22 222 30 40 50 60 70
WriteLine(Join(' ', arr2)); //ничего, т.к. массив пуст
byte[] arr=new byte[]{10, 20, 30, 40, 50};
Insert(arr, 2, byte\22, byte\222);
WriteLine(Join(' ', arr)); //10 20 22 222 30 40 50
int[] arr={10, 20, 30};
int[] arr2={100, 200, 300};
int c=InsertRange(arr, 1, arr2);
WriteLine(c); //6
WriteLine(Join(' ', arr)); //10 100 200 300 20 30
short[] arr3={123, 456, 789};
InsertRange(arr, 1, arr3);
WriteLine(Join(' ', arr));
long[] arr4={1111, 2222, 3333};
InsertRange(arr, 1, arr4, true); //true указывает, что нужно сконвертировать вставляемые значения в нужный тип
WriteLine(Join(' ', arr)); //10 1111 2222 3333 123 456 789 100 200 300 20 30
byte[] arr=new byte[]{10, 20, 30, 40, 50};
ConvInsert(arr, 2, 22, 222);
WriteLine(Join(' ', arr)); //10 20 22 222 30 40 50
byte[] arr=new byte[]{10, 20, 30, 40, 50};
RemoveRange(arr, 1, 2);
WriteLine(Join(' ', arr)); //10 40 50
int[] arr={10, 20, 30};
WriteLine(RemoveAt(arr, 1)); //2
WriteLine(Join(' ', arr)); //10 30
Foo[] arr={new Foo(10), new Foo(20), new Foo(30), new Foo(40)};
WriteLine(RemoveAll(arr, Foo f, f.X>10 && f.X<40)); //2
WriteLine(Join(' ', arr)); //10 40
ReadKey();
class Foo{
public int X;
New(int x){X=x;}
string ToString(){return ToString(X);}
}
byte[] arr=new byte[]{10, 20, 30, 40, 50, 60, 70};
WriteLine(Find(arr, byte v, v>44)); //50
WriteLine(Find(arr, byte $v, v>99)); //0
//-----
Point[] points=new Point[]{new Point(2, 3), new Point(4, 5), new Point(5, 7)};
Point point=Find(points, Point p, p.X>=5 && p.Y>=5);
WriteLine(point.X+"; "+point.Y); //5; 7
point=Find(points, p, p.X==2 && p.Y>=5);
WriteLine(point==null); //True
class Point{
public int X, Y;
New(int x, int y){
X=x;
Y=y;
}
}byte[] arr=new byte[]{10, 20, 30, 40, 50, 60, 70};
WriteLine(FindIndex(arr, byte v, v>44)); //4
WriteLine(FindIndex(arr, v, v>99)); //-1
//-----
Point[] points=new Point[]{new Point(2, 3), new Point(4, 5), new Point(5, 7)};
int index=FindIndex(points, Point p, p.X>=5 && p.Y>=5);
WriteLine(index); //2
index=FindIndex(points, p, p.X==2 && p.Y>=5);
WriteLine(index); //-1
class Point{
public int X, Y;
New(int x, int y){
X=x;
Y=y;
}
}Foo[] arr={new Foo(3), new Foo(4), new Foo(5), new Foo(6), new Foo(7)};
Foo[] arr2=FindAll(arr, Foo f, f.X>=4 && f.X<=5);
WriteLine(Join(' ', arr2)); //4 5
ReadKey();
class Foo{
public int X;
New(int x){X=x;}
string ToString(){return ToString(X);}
}//Выбрать все числа больше 10:
int[] arr=new int[]{10, 20, 30};
int[] arr2=Select(arr, int v, v, v>10);
foreach(int x in arr2) Write(x+" "); //20 30
//Конвертирование int-массива в short[]:
int[] arr=new int[]{10, 20, 30};
short[] arr2=Select(arr, int v, ToShort(v));
foreach(short x in arr2) Write(x+" "); //10 20 30
//Выбрать все числа меньше 30 в string-массив с добавлением текста:
int[] arr=new int[]{10, 20, 30};
string[] arr2=Select(arr, int v, "Item-"+v, v<30);
foreach(string x in arr2) Write(x+" "); //Item-10 Item-20
//Выборка из List-а:
object list=Create("System.Collections.Generic.List`1[System.String], System.Collections");
list->AddRange(new string[]{"Hello", "World", "Test"});
int n;
string[] arr2=Select(list, string str, (n++)+") "+str);
WriteLine(Join('\n', arr2));
//0) Hello
//1) World
//2) Test
//*****Далее пример выборки объектов пользовательского типа*****
//Выбираем авто фирмы Ford:
Car[] arr=new Car[]{new Car("Ford", "Mondeo"), new Car("Kia", "Rio"), new Car("Ford", "Fiesta"), new Car("Kia", "Sorento")};
Car[] arr2=Select(arr, Car car, car, car.Company=="Ford");
foreach(Car $car in arr2) WriteLine(car.Model);
//Mondeo
//Fiesta
//А теперь выбрать авто (фирма + модель), у которых название модели заканчивается на "о":
string[] cars=Select(arr, car, car.Company+" "+car.Model, EndsWith(car.Model,'o'));
WriteLine(Join(", ", cars)); //Ford Mondeo, Kia Rio, Kia Sorento
class Car{
public string Model, Company;
New(string company, string model){
Model=model;
Company=company;
}
}
short[] arr=new short[]{10, 20, 30};
WriteLine(Push(arr, short\40, short\50)); //5
WriteLine(Join(' ', arr)); //10 20 30 40 50
//-----
object list=Create("System.Collections.Generic.List`1[System.String], System.Collections");
Push(list, "Hello", "World", "Test"); //аргументы должны быть нужного типа (не будут конвертированы)
WriteLine(Join(' ', list)); //Hello World Test
date[] d=new date[]{Now()};
ConvPush(d, "06.09.2021", "07.09.2021"); //аргументы будут конвертированы в нужный тип
WriteLine(Join("; ", d)); //05.09.2021 14:28:07; 06.09.2021 0:00:00; 07.09.2021 0:00:00
//---------------------
object list=Create("System.Collections.Generic.List`1[System.DateTime]");
ConvPush(list, "05.09.2021", "06.09.2021", "07.09.2021");
WriteLine(Join("; ", list)); //05.09.2021 0:00:00; 06.09.2021 0:00:00; 07.09.2021 0:00:00
byte[] arr=new byte[]{10, 20, 30};
WriteLine(Peek(arr)); //30
//****List<string>******
object list=Create("System.Collections.Generic.List`1[System.String], System.Collections");
list->AddRange(new string[]{"Hello", "World", "Test"});
WriteLine(Peek(list)); //Test
//*****Stack*****
object stack=Create("System.Collections.Stack, System.Collections.NonGeneric");
stack->Push("Hello");
stack->Push("World");
stack->Push("Test");
WriteLine(Peek(stack)); //Test
//*****Queue*****
object queue=Create("System.Collections.Queue, System.Collections.NonGeneric");
queue->Enqueue("Hello");
queue->Enqueue("World");
queue->Enqueue("Test");
WriteLine(Peek(queue)); //Hellobyte[] arr=new byte[]{10, 20, 30};
WriteLine(Pop(arr)); //30
WriteLine(Join(' ', arr)); //10 20byte[] arr=new byte[]{10, 20, 30};
WriteLine(At(arr, -2)); //20object stack=Create("System.Collections.Stack, System.Collections.NonGeneric");
Push(stack, "hello", "world", "test");
WriteLine(ElementAt(stack, 1)); //worldobject stack=Create("System.Collections.Stack, System.Collections.NonGeneric");
Push(stack, "hello", "world", "test");
string[] arr:=stack.ToArray(string);
WriteLine(Join(' ', arr)); //test world helloshort[] arr={10, 20, 30};
byte[] arr2:=ConvertArray(arr, byte);
WriteLine(Join(' ', arr2)); //10 20 30
object arr3=ConvertArray(arr, "System.UInt32"); //10 20 30
WriteLine(Join(' ', arr3));
WriteLine(arr3); //System.UInt32[]
int[] arr={10, 20, 30};
object[] arr2=ToObjectArray(arr, byte);
WriteLine(arr2); //System.Object[]
WriteLine(GetType(arr2[0])); //System.Byte
WriteLine(Join(' ', arr2)); //10 20 30
arr2=ToObjectArray(arr, "System.UInt32");
WriteLine(GetType(arr2[0])); //System.UInt32
WriteLine(Join(' ', arr2)); //10 20 30
arr2=ToObjectArray(arr); //без конвертирования
WriteLine(Join(' ', arr2)); //10 20 30
string str=ReadAllText("file.txt", "windows-1251");
str=ReadAllText("file.txt", 1251);
str=ReadAllText("file.txt", GetEncoding("windows-1251"));WriteAllText("file.txt", "текст", "windows-1251");WriteLine(GetEncoding("utf-8")); //System.Text.UTF8Encoding+UTF8EncodingSealedCopyFile(@"D:\files\test.txt", @"D:\files\test2.txt");
CopyFile("test.txt", "test2.txt"); // можно указывать относительный путь
CopyFile(@"D:\files\test.txt", @"D:\files\test2.txt", true); // перезаписывает файлMoveFile(@"D:\files\test.txt", @"D:\files\test2.txt");DeleteFile(@"D:\files\test.txt");CreateDirectory(@"D:\dir\newdir");DeleteDirectory(@"D:\dir\test", true);MoveDirectory(@"D:\dir\test", @"D:\dir\test2");string[] files = GetFiles(@"D:\files"); // берутся все файлы.
files = GetFiles(@"D:\files", "*.txt"); // берутся только txt-файлы.
files = GetFiles(@"D:\files", "", true); // берутся все файлы, в том числе из вложенных папок.string fileName = GetFileName(@"D:\files\test.txt"); // test.txtstring fileName = GetFileNameWithoutExtension(@"D:\files\test.txt"); // teststring fileExt = GetExtension(@"D:\files\test.txt"); // .txtstring[] dirs = GetDirectories(@"D:\dir"); // берутся все папки.WriteLine(CombinePath("D:", "test", "hello.txt")); //D:\test\hello.txt
WriteLine(CombinePath(@"D:\dir", "test", "hello.txt")); //D:\dir\test\hello.txt
object thread = Thread(WriteLine("")); //создание потока с ссылкой на функцию WriteLine(object)object thread = ThreadByFuncRef(FuncRef(WriteLine(""))); //ссылка на функцию передаётся первым аргументомobject thread = Thread(WriteLine("")); //создание потока с ссылкой на функцию WriteLine(object)
StartThread(thread, "Hello!"); //запуск потока с передачей функции WriteLine строки "Hello!"
Wait(thread); //ожидание завершения потока
ReadKey("Press some key to exit");string s="Hello!";
object thread = LocalThread(WriteLine(s));
StartThread(thread);
//Hello!
ReadKey();string s="Hello!";
object thread = LocalThread(s="Test!");
StartThread(thread);
Wait(thread);
WriteLine(s); //Test!
ReadKey();
string s="Hello!";
object thread = LocalThreadByExpr(Expr(WriteLine(s)));
StartThread(thread);
//Hello!
ReadKey();object t=RunLocalThread(WriteLine("OK!"));
Wait(t);
//OK!
string s="Test";
object t=RunThread(WriteLine("s="+s));
Wait(t);
//s=Test
object mre=Create("System.Threading.ManualResetEvent", false);
WriteLine("Start 3 named threads that block on a ManualResetEvent:\n");
for(int i = 0; i <= 2; i++)
{
object t = Thread(ThreadProc(), "Thread_" + i);
StartThread(t);
}
Sleep(500);
WriteLine("\nWhen all three threads have started, press Enter to call SetEventWaitHandle(mre)" +
"\nto release all the threads.\n");
ReadLine();
SetEventWaitHandle(mre);
Sleep(500);
WriteLine("\nWhen a ManualResetEvent is signaled, threads that call Wait(mre)" +
"\ndo not block. Press Enter to show this.\n");
ReadLine();
for(int $i = 3; i <= 4; i++)
{
object $t = Thread(ThreadProc(), "Thread_" + i);
StartThread(t);
}
Sleep(500);
WriteLine("\nPress Enter to call ResetEventWaitHandle(mre), so that threads once again block" +
"\nwhen they call Wait().\n");
ReadLine();
ResetEventWaitHandle(mre);
// Start a thread that waits on the ManualResetEvent.
object $t = Thread(ThreadProc(), "Thread_5");
StartThread(t);
Sleep(500);
WriteLine("\nPress Enter to call SetEventWaitHandle(mre) and conclude the demo.");
ReadLine();
SetEventWaitHandle(mre);
ReadKey();
void ThreadProc()
{
string name = ThreadName();
WriteLine(name + " starts and calls Wait(mre)");
Wait(mre);
WriteLine(name + " ends.");
}
object task=Task(WriteLine(""), "Hello!");object task=TaskByFuncRef(FuncRef(WriteLine("")), "Hello!");object task=Task(Test(int\), 5);
StartTask(task);
WriteLine(TaskResult(task)); //10
//Теперь с LocalTask:
task=LocalTask(Test(5));
StartTask(task);
WriteLine(TaskResult(task)); //10
//Из выражения:
task=LocalTaskByExpr(Expr(Test(5)));
StartTask(task);
WriteLine(TaskResult(task)); //10
ReadKey();
int Test(int x){
return x*2;
}object cts=CancellationTokenSource();
object token=CancellationToken(cts);
object task=Task(Test(object\), token);
StartTask(task);
Sleep(5000);
Cancel(cts);
Wait(task);
WriteLine("END");
//1 2 3 4 5 END
//Пример с автоматической отменой через 5 секунд
cts=CancellationTokenSource(5000);
token=CancellationToken(cts);
task=Task(Test(object\), token);
StartTask(task);
Wait(task);
WriteLine("END");
//1 2 3 4 5 END
ReadKey();
Test(object cts){
int n;
do{
Write((++n)+" ");
Sleep(1000);
}while(!IsCancellationRequested(cts));
}object t=RunLocalTask(WriteLine("OK!"));
Wait(t);
//OK!
string s="Test";
object t=RunTask(WriteLine("s="+s));
Wait(t);
//s=Test
object t=Timer(OnTimedEvent(object\, object\), 1000, true); //создание и запуск таймера
//OnTimedEvent! SignalTime: 29.08.2021 10:46:28
//OnTimedEvent! SignalTime: 29.08.2021 10:46:29
//OnTimedEvent! SignalTime: 29.08.2021 10:46:30
//...
ReadKey();
OnTimedEvent(object source, object e){
WriteLine("OnTimedEvent! SignalTime: " + e->SignalTime);
}int x=555;
string str="test";
object t=Timer(OnTimedEvent(object\, object\, int\, string\), 1000, true, true, true, x, str); //дополнительные аргументы x и str указываются в конце
//OnTimedEvent! SignalTime: 29.08.2021 14:04:12; v: 555; s: test
//OnTimedEvent! SignalTime: 29.08.2021 14:04:13; v: 555; s: test
//OnTimedEvent! SignalTime: 29.08.2021 14:04:14; v: 555; s: test
//...
ReadKey();
OnTimedEvent(object source, object e, int v, string s){
WriteLine("OnTimedEvent! SignalTime: " + e->SignalTime + $"; v: {v}; s: {s}");
}object timer=LocalTimer(WriteLine(TickCount()), 1000, true); // каждую секунду будет выводиться время, истекшее с момента загрузки системы.
ReadKey();object timer=LocalTimerByExpr(Expr(WriteLine(TickCount())), 1000, true); object timer=LocalTimer(WriteLine(TickCount()), 1000);
StartTimer(timer);
Sleep(3000);
StopTimer(timer);
//Таймер будет выключен через 3 сек.
ReadKey();int n;
object t=RunTimer(Write((n++)+" "), 1000, true, true);
Sleep(5000);
StopTimer(t);
//0 1 2 3 4
string[] result=RegexMatches("Who writes these notes?", @"\b\w+es\b");
WriteLine(Join(", ",result)); // writes, notes
result=RegexMatches("Who writes these NOTES?", @"\b\w+es\b", 1);
WriteLine(Join(", ",result)); // writes, NOTES
object options=ToEnum("IgnoreCase", "System.Text.RegularExpressions.RegexOptions, System");
result=RegexMatches("Who writes these NOTES?", @"\b\w+es\b", options);
WriteLine(Join(", ",result)); // writes, NOTESstring pattern=@"при(\w*)";
string result=RegexReplace("привет мир принцесса", pattern, "ОК");
WriteLine(result); // ОК мир ОК
result=RegexReplace("привет мир Принцесса", pattern, "ОК", 1);
WriteLine(result); // ОК мир ОК
object options=ToEnum("IgnoreCase", "System.Text.RegularExpressions.RegexOptions, System");
result=RegexReplace("привет мир Принцесса", pattern, "ОК", options);
WriteLine(result); // ОК мир ОКPoint point=new Point(15, 77);
string js=ToJson(point);
WriteLine(js); // {"x":15,"y":77}
class Point{
public int x, y;
New(int x, int y){
this.x=x;
this.y=y;
}
}string js="{\"x\":15,\"y\":77}";
Point point2=FromJson(js,Point);
WriteLine(point2.x+"; "+point2.y); // 15; 77string js=ToJson(point, true);
Point point2=FromJson(js, Point, true);Foo f=new Foo();
Bar b=FromJson(ToJson(f), Bar); // Создаём объект Point
object pointType=typeof("System.Drawing.Point, System.Drawing");
object point=Create(pointType, 10, 20);
string js=ToJson(point); //сериализация
object point2=FromJson(js, pointType); //десериализация
//Теперь в point2 находится объект Point
WriteLine("Type: "+GetType(point2)); // Type: System.Drawing.Point
WriteLine(point2); // {X=10,Y=20} // результат Point.ToString()
WriteLine(point2->Y); //20string str=Fetch("http://overscript.org/");string headers="Referer: http://en.wikipedia.org/wiki/Main_Page\r\nUser-Agent: Mozilla/5.0 (X11; Linux i686; rv:2.0.1) Gecko/20100101 Firefox/4.0.1";
string str=Fetch("http://overscript.org/", headers);string str=Fetch("http://overscript.org/",, "windows-1251", 20000, "MaxAutomaticRedirections=5, AllowAutoRedirect=true");string str=Fetch("http://overscript.org/",,,,, "someValue=Hello&someValue2=World"); // POST-запросobject handler=Create("System.Net.Http.HttpClientHandler, System.Net.Http");
handler->AllowAutoRedirect=true;
handler->MaxAutomaticRedirections=7;
handler->SslProtocols=ToEnum("Tls12", "System.Security.Authentication.SslProtocols, System");
string str=Fetch("http://overscript.org/",,, 5000, handler);
WriteLine(LoadPage("http://overscript.org/"));
ReadKey();
//Функция ниже получает страницу без http-заголовка
string LoadPage(string url){
try{
string data=Fetch(url);
int i=IndexOf(data, "\r\n\r\n");
if(i>=0) data=Substring(data, i+4);
return data;
}catch{
WriteLine("Не удалось открыть "+url+" ("+exMessage+")");
}
} WriteLine(UrlEncode("Привет")); // %d0%9f%d1%80%d0%b8%d0%b2%d0%b5%d1%82
WriteLine(UrlEncode("Привет", "windows-1251")); // %cf%f0%e8%e2%e5%f2WriteLine(UrlDecode("%d0%9f%d1%80%d0%b8%d0%b2%d0%b5%d1%82")); // Привет
WriteLine(UrlDecode("%cf%f0%e8%e2%e5%f2", "windows-1251")); // Приветobject uri=Uri("https://www.google.com/");
WriteLine(uri->Host); //www.google.comWriteLine(GetAbsoluteUri("http://site.com/hello/", "page.php?q=test")); //http://site.com/hello/page.php?q=test
WriteLine(GetAbsoluteUri("http://site.com/hello/", "page.php?q=test", true)); // /hello/page.php?q=testWriteLine(Now()); // 22.02.2021 20:03:30 // локальная дата и время
WriteLine(Now(true)); // 22.02.2021 17:03:30 // глобальная дата и время
WriteLine(Now(,true)); // 22.02.2021 0:00:00 // локальная дата без времени
WriteLine(Now(true,true)); // 22.02.2021 0:00:00 // глобальная дата без времениdate d:="18.02.2021";
WriteLine(DateAdd(d, 10, 's')); // 18.02.2021 0:00:10 // увеличиваем дату на 10 секунд
WriteLine(DateAdd(d, 5, 'd')); // 23.02.2021 0:00:00 // увеличиваем дату на 5 дней
WriteLine(DateAdd(d, 2, 'M')); // 18.04.2021 0:00:00 // увеличиваем дату на 2 месяцаdate d1:="18.02.2021";
date d2=DateAdd(d1,1,'y'); // увеличиваем дату на 1 год
WriteLine(DateDiff(d1,d2,'y')); // 1
WriteLine(DateDiff(d1,d2,'M')); // 12
WriteLine(DateDiff(d1,d2,'d')); // 365
WriteLine(DateDiff(d1,d2,'h')); // 8760
WriteLine(DateDiff(d1,d2,'m')); // 525600
WriteLine(DateDiff(d1,d2,'s')); // 31536000
WriteLine(DateDiff(d1,d2,'f')); // 31536000000object type=GetType("Test");
WriteLine(type); // System.String
byte n=123;
WriteLine(GetType(n)); // System.Bytestring str="test";
WriteLine("Type name: "+GetTypeName(str)+"; full name: "+GetTypeName(str, true)); // Type name: String; full name: System.String
object sb=Create("System.Text.StringBuilder", "test");
WriteLine("Type name: "+GetTypeName(sb)+"; full name: "+GetTypeName(sb, true)); // Type name: StringBuilder; full name: System.Text.StringBuilder
Foo f=new Foo();
Bar b=new Bar();
Test(f); //Processing Foo. Type: App.Foo
Test(b); //Processing Bar. Type: App.Bar
Test(object obj){
switch(GetType(obj)){
case typeof(Foo):
WriteLine("Processing Foo. Type: "+GetTypeName(obj, true));
break;
case typeof(Bar):
WriteLine("Processing Bar. Type: "+GetTypeName(obj, true));
break;
}
}
class Foo{}
class Bar{}
object obj=123;
WriteLine(GetType(obj)); // System.Int32
obj=ChangeType(obj, "System.Byte");
WriteLine(GetType(obj)); // System.Byte
obj=ChangeType(obj,typeof("System.Int64"));
WriteLine(GetType(obj)); //System.Int64object sb=Create("System.Text.StringBuilder", "test");
WriteLine(sb); // "test"
sb=Create(typeof("System.Text.StringBuilder"), "hello"); //вместо имени типа передаём сам тип
WriteLine(sb); // выведет "hello"object obj=CreateFrom(@"D:\lib\TestLib.dll", "TestClass");
//Или так:
object asm=LoadAssemblyFrom(@"D:\lib\TestLib.dll"); // сначала загружаем сборку
obj=CreateFrom(asm, "TestClass"); // подаём на вход сборку, а не имя файла
object type=GetTypeByName("System.Text.StringBuilder");
object sb=Create(type, "test");
WriteLine(sb); // "test"object asm=LoadAssembly("System");
WriteLine(asm); // System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089WriteLine(LoadAssemblyFrom(@"D:\lib\Test.dll")); // Test, Version=1.0.0.0, Culture=neutral, PublicKeyToken=nullobject type=typeof("System.Text.StringBuilder");
object sb=Create(type, "Hello ");
InvokeMember(type, "Append", "InvokeMethod",, sb, "World!");
InvokeMember(, "Append", 256,, sb, " It"); // тип можно не указывать (будет взят у sb)
InvokeMember(type, "Append", ToEnum("InvokeMethod", "System.Reflection.BindingFlags"),, sb, " Works!");
WriteLine(sb); //Hello World! It Works!object obj=CreateFrom(@"D:\lib\Test.dll", "SomeType"); //создаём экземпляр класса SomeType.
object v=InvokeMethod(obj, "Test", 2, 3); //вызывает метод Test объекта obj с передачей аргументов (2 и 3).
//Синтаксический сахар для InvokeMethod:
v=obj->Test(2, 3);
object type=typeof("System.IO.Stream");
bool b:=InvokeMethod(type, "@IsAssignableFrom", typeof("System.IO.MemoryStream, System.IO"));
WriteLine(b); //True
object obj=CreateFrom(@"D:\lib\Test.dll", "SomeType"); //создаём экземпляр класса SomeType.
object v=GetMemberValue(obj, "SomeProp"); //получение значения свойства SomeProp.
v=GetMemberValue(obj, "Item", 2); //получение значения по индексу. Item - индексатор (свойство по умолчанию).
//Синтаксический сахар для GetMemberValue:
v=obj->SomeProp;
v=obj->Item[2]; //индексатор
//Пример использования синтаксического сахара с List-ом:
object list=Create("System.Collections.Generic.List`1[System.String], System.Collections"); //создаём List<string>
list->AddRange(new string[]{"Hello", "World", "Test"}); //добавляем 3 элемента: "Hello", "World" и "Test".
for(int i=0; i<Length(list); i++) WriteLine(list->Item[i]); //вывод всех элементов
//Hello
//World
//Test
object type=typeof("System.IO.Stream");
WriteLine(GetMemberValue(type, "@IsValueType")); //False
object obj=CreateFrom(@"D:\lib\Test.dll", "SomeType"); //создаём экземпляр класса SomeType.
SetMemberValue(obj, "SomeProp", 10); //установка значения свойства SomeProp.
SetMemberValue(obj, "Item", 10, 2); //установка значения по индексу. Item - индексатор (свойство по умолчанию).
//Синтаксический сахар для SetMemberValue:
obj->SomeProp=10;
obj->Item[2]=10; //индексатор
//В этом примере перехватывается нажатие Ctrl+C (прерывание процесса)
object d = Delegate(OnConsoleCancel(null, null), typeof("System.ConsoleCancelEventHandler, System.Console")); //создаём делегат ConsoleCancelEventHandler
//Для вызова SetMemberValue используем стрелочку
typeof("System.Console, System.Console")->CancelKeyPress += d; // CancelKeyPress - это событие, а присваивание ему d - это добавление делегата. В C# было бы: Console.CancelKeyPress += d;
//"System.Console, System.Console" - это упрощенное AssemblyQualifiedName для System.Console (https://docs.microsoft.com/ru-ru/dotnet/api/system.type.assemblyqualifiedname?view=net-5.0)
WriteLine("Press Ctrl+C...");
ReadKey();
OnConsoleCancel(object sender, object args){
WriteLine("\nThe read operation has been interrupted.");
WriteLine(" Key pressed: "+args->SpecialKey);
WriteLine(" Cancel property: "+args->Cancel);
WriteLine("Setting the Cancel property to true...");
args->Cancel = true;
WriteLine(" Cancel property: "+args->Cancel);
WriteLine("The read operation will resume...\n");
}
object type=typeof("System.IO.Stream");
WriteLine(GetMember(type, "@IsValueType")); //Boolean IsValueType
const object Math=typeof("System.Math");
WriteLine(GetMember(Math, "Ceiling")); //Double Ceiling(Double)
object[] arr=GetMembers(Math, "Ceiling");
WriteLine(Join("; ", arr)); //Double Ceiling(Double); System.Decimal Ceiling(System.Decimal)
object env=typeof("System.Environment"); //получаем тип System.Environment
object m=GetMember(env, "TickCount"); //получаем из System.Environment свойство TickCount
WriteLine(m); //Int32 TickCount
WriteLine(GetValue(m)); //867103296
object point=Create("System.Drawing.Point, System.Drawing", 10, 20); //создаём Point с X: 10, Y: 20
m=GetMember(point, "X"); //получаем свойство X
WriteLine(m); //Int32 X
WriteLine(GetValue(m, point)); //10
SetValue(m, point, 15); //меняем свойство X на 15
WriteLine(GetValue(m, point)); //15
object list=Create("System.Collections.Generic.List`1[System.String], System.Collections"); //создаём List<string>
list->AddRange(new string[]{"Hello", "World", "Test"}); //добавляем 3 элемента: "Hello", "World" и "Test".
m=GetMember(list, "Item"); //получаем индексатор
WriteLine(GetValue(m, list, 2)); //Test //это элемент с индексом 2
SetValue(m, list, "OK", 2); //теперь меняем Test на OK
WriteLine(GetValue(m, list, 2)); //OK //элемент с индексом 2 изменился
object type=typeof("System.IO.Stream");
object m=GetMethod(type, "@IsAssignableFrom", typeof("System.Type"));
//с type.GetType(): object m=GetMethod(GetType(type), "IsAssignableFrom", typeof("System.Type"));
WriteLine(m); //Boolean IsAssignableFrom(System.Type)
WriteLine(Invoke(m, type, typeof("System.IO.MemoryStream, System.IO"))); //True
//то же самое можно так: WriteLine(type->@IsAssignableFrom(typeof("System.IO.MemoryStream, System.IO"))); //True
//посмотрим, как видит стрелку интерпретатор:
//WriteLine(Expr(type->@IsAssignableFrom(typeof("System.IO.MemoryStream, System.IO")))); //@InvokeMethod(type,"@IsAssignableFrom",#System.IO.MemoryStream#)
object math=typeof("System.Math");
object m=GetMethod(math, "Max", int, int); //в OverScript тип можно можно писать как typeof(int) (литерал), так и int (не литерал)
WriteLine(m); //Int32 Max(Int32, Int32)
WriteLine(Invoke(m,, 2, 3)); //3 //объект пропущен т.к. метод статический
object sb=Create("System.Text.StringBuilder", "test");
object m=GetMethod(sb, "Append", string);
WriteLine(m); //System.Text.StringBuilder Append(System.String)
WriteLine(Invoke(m, sb, " hello")); //test hello
object Math=typeof("System.Math");
object m=GetMethod(Math, "Max", int, int);
WriteLine(m); //Int32 Max(Int32, Int32)
int x=TInvoke(m, int, , 2, 3); //тут нужно писать именно int, а не typeof(int)
WriteLine(x); //3
object sb=Create("System.Text.StringBuilder", "test");
object m=GetMember(sb, "Length");
WriteLine(m); //Int32 Length
WriteLine(TGetValue(m, int, sb)); //4 //тут нужно писать именно int, а не typeof(int)
int x, y;
object e=Expr(WriteLine(x+y));
WriteLine(e); //WriteLine(x+y)
WriteLine(GetType(e)); //OverScript.Expr
//можно указать какие переменные вовлеч в выражение
e=Expr(WriteLine(x+y), x, y);int x=2, y=3;
object e=Expr(WriteLine(x+y));
Eval(e); //5
e=Expr(x+y);
int sum=Eval(e, int); //тип нужно указывать именно int, а не typeof(int)
WriteLine(sum); //5
int x=2, y=3;
object e=Expr(WriteLine(x+y));
SetVarScopeKind(e, "Static", x, y);
int x=2, y=3;
object e=Expr(WriteLine(x+y));
object e2=CopyExpr(e);
int x=2, y=3;
object e=Expr(WriteLine(x+y));
Involve(e, x, y);
int x=2, y=3;
object e=Expr(WriteLine(x+y));
Box(e, x, y);
int x=2, y=3;
object e=Expr(WriteLine(x+y));
BoxAll(e);
int x=2, y=3;
object e=Expr(WriteLine(x+y));
FixOrigExpr(e);
int x=2, y=3;
object e=Expr(WriteLine(x+y));
FixOrigExpr(e);
object e2=OrigExpr(e);
//можно указать, какие переменные вовлечь в новое выражение
e2=OrigExpr(e, x, y);
object e=Expr(Write("Hello! "));
object timer=LocalTimerByExpr(e, 1000, true);
Sleep(3000);
Renew(e, Expr(Write("Test! ")), true); //true указывает, что нужно сделать горячее обновление
Sleep(3000);
StopTimer(timer);
//Hello! Hello! Hello! Test! Test! Test!
WriteLine(Is(5, int)); //True
WriteLine(Is(5, short)); //False
WriteLine(Is(5, "System.Int32")); //True
object pointType=typeof("System.Drawing.Point, System.Drawing");
object point=Create(pointType, 10, 20);
WriteLine(Is(point, pointType)); //True
WriteLine(Is(point, typeof("System.Drawing.Rectangle, System.Drawing"))); //False
object ms=Create("System.IO.MemoryStream, System.IO");
WriteLine(Is(ms, typeof("System.IO.Stream"))); //True т.к. MemoryStream наследует от Stream
Foo f=new Foo();
WriteLine(Is(f, Foo)); //True
WriteLine(Is(f, Bar)); //False
Baz b=new Baz();
WriteLine(Is(b, Foo)); //True т.к. Baz наследует от Foo
class Foo{}
class Bar{}
class Baz:Foo{}
Bar b=new Bar();
Foo f=As(b, Foo);
WriteLine(f==null ? "NULL" : f); //NULL
Baz bz=new Baz();
f=As(bz, Foo);
WriteLine(f==null ? "NULL" : f); //Instance of Baz
class Foo{}
class Bar{}
class Baz:Foo{}
object ms=Create("System.IO.MemoryStream, System.IO");
object s=As(ms, "System.IO.Stream");
WriteLine(s==null ? "NULL" : s); //System.IO.MemoryStream
object obj=As(555, long);
WriteLine(obj==null ? "NULL" : obj+" "+GetType(obj)); //555 System.Int64
obj=As(555, "System.IO.Stream");
WriteLine(obj==null ? "NULL" : obj+" "+GetType(obj)); //NULL
Bar b=new Bar(10, 20);
Bar b2=Clone(b, Bar);
b2.Print(); //Bar: 10; 20
WriteLine(GetType(b2)); //App.Bar
Foo f=Clone(b, Foo);
f.Print(); //Foo: 10
WriteLine(GetType(f)); //App.Foo
Baz bz=Clone(b, Baz); //Unable to clone object. The object does not inherit from Baz.
class Foo{
public int X;
New(int x){X=x;}
public Print(){WriteLine("Foo: "+X);}
}
class Bar:Foo{
public int Y;
New(int x, int y){
X=x;
Y=y;
}
public Print(){WriteLine("Bar: "+X+"; "+Y);}
}
class Baz{}
object type=typeof("System.Drawing.Point, System.Drawing");
object point=Create(type, 10, 20);
object point2=Clone(point, type);
WriteLine(point2->X+"; "+point2->Y); //10; 20
int randNum=Rand(10,20); // случайное целое число между 10 и 20 (включительно)
//Вывод 5 случайных чисел от 0 до 10:
for(int i=0; i<5; i++) Write(Rand(0,10)+" "); //6 4 1 10 0int t=TickCount();
WriteLine(t); // 1658266859int n = If(5>4, 777, 123); // 777
string str = If(5==4, "hello", "world"); // "world"
//можно написать так:
//string str = 5==4 ? "hello" : "world";
WriteLine(IfNotNull("test", "OK")); //OK
WriteLine(IfNotNull(null, "OK")==null); //True
//Заполнение массива и вывод всех значений
int[] arr=new int[10];
For(0, Length(arr)-1, 1, int i, arr[i]=i, Write(arr[i]+" ")); //заполняет массив и выводит от 0 до 9
WriteLine();
//Вывести от 0 до 20 с шагом 2
For(0, 20, 2, int x, Write(x+" ")); // выводит: 0 2 4 6 8 10 12 14 16 18 20
WriteLine();
//Вывести от 10 до 5 с шагом -1
For(10, 5, -1, i, Write(i+" ")); //10 9 8 7 6 5
WriteLine();
//Вывести 5 случайных чисел
For(1, 5, 1, , Write(Rand(10,100)+" ")); //87 46 96 46 67
ReadKey();
short[] arr=new short[]{10, 20, 30};
int n;
ForEach(arr, short v, WriteLine(n+") "+v), n++);
//0) 10
//1) 20
//2) 30
object list=Create("System.Collections.Generic.List`1[System.String], System.Collections");
list->AddRange(new string[]{"Hello", "World", "Test"});
n=0;
ForEach(list, string item, WriteLine(n+") "+item), n++);
//0) Hello
//1) World
//2) Test
int i;
While(i<5, i++, Write(i+" ")); // 1 2 3 4 5
int i;
DoWhile(i>0, Write(i)); // 0
WriteLine();
While(i>0, Write(i)); // ничего не выведет
foreach(int x in Range(10, 15)) Write(x+" "); //10 11 12 13 14
WriteLine();
foreach(int $x in Range(10, 20, 2)) Write(x+" "); //10 12 14 16 18
WriteLine();
foreach(int $x in Range(20, 10, -2)) Write(x+" "); //20 18 16 14 12
WriteLine();
foreach(int $x in Range(5)) Write(x+" "); //0 1 2 3 4
object fn=FuncRef(Test(123));
WriteLine(Call(fn, 10)); //int x: 10
fn=FuncRef(Test(123L));
WriteLine(Call(fn, 555)); //long x: 555
fn=FuncRef(Test(ToByte(0)));
WriteLine(Call(fn, 9)); //byte x: 9
fn=FuncRef(Test(byte\)); //byte\ - это значение по умолчанию, т.е. 0 для чисел и null для ссылочных типов
WriteLine(Call(fn, 9)); //byte x: 9
fn=FuncRef(Test(""));
WriteLine(Call(fn, "HELLO")); //string x: HELLO
fn=FuncRef(Test());
WriteLine(Call(fn)); //Test!
fn=FuncRef(Test("", 0));
WriteLine(Call(fn, "OK", 777)); //OK; 777
ReadKey();
string Test(long x){return "long x: "+x;}
string Test(int x){return "int x: "+x;}
string Test(byte x){return "byte x: "+x;}
string Test(string x){return "string x: "+x;}
string Test(){return "Test!";}
string Test(string s, int x){return s+"; "+x;}
const object GC=typeof("System.GC");
Foo f=new Foo(5);
object fn = FuncRef(f.PrintX());
f=null; //ссылка на экземпляр Foo останется внутри fn, поэтому он не будет удалён
GC->Collect();
GC->WaitForPendingFinalizers();
Call(fn); //выведет 5 несмотря на то, что f==null
ReadKey();
class Foo{
public int X;
New(int x){X=x;}
public PrintX(){WriteLine(X);}
}
Foo foo=new Foo(10);
Foo foo2=new Foo(20);
object fn=FuncPureRef((Foo\).Test(int\)); //берём ссылку без информации об объекте, на котором выполнять функцию. Foo\ - это Foo\null, т.е. экземпляр класса Foo. Вместо (Foo\).Test(int\) можно написать: new Foo().Test(int\). Сам объект типа Foo при этом создаваться не будет. (Foo\) или new Foo() просто указывают, что берётся экземплярная функция Test().
WriteLine(CallOn(fn, foo, 5)); //15 //Test() вызвана на foo
WriteLine(CallOn(fn, foo2, 5)); //25 //Test() вызвана на foo2
ReadKey();
class Foo{
public int X;
New(int x){
X=x;
}
public int Test(int v){
return X+v;
}
}Bar bar=new Bar(5); //создаём объект с X=5
object fn = FuncPureRef((Foo\).GetX()); //берём ссылку на экземплярную функцию GetX() класса Foo (без создания экземпляра Foo)
WriteLine(CallOn(fn, bar)); //5 // вызываем GetX() на объекте bar
ReadKey();
class Foo{
int X;
public int GetX(){ //этой функцией будет доставаться приватная переменная X из экземпляра Bar
return X;
}
}
class Bar{
int X; //это приватная (видна только внутри класса) переменная
New(int x){
X=x;
}
}Foo f=new Foo();
WriteLine(DynCall(f, "Test", "hello", 123)); //s=hello; x=123
ReadKey();
class Foo{
Test(string s, int x){WriteLine($"s={s}; x={x}");}
}
object eh=EventHandler(OnEvent(null, null));
Raise(eh, "SomeSender", null); //sender: SomeSender; args=
Raise(eh, "SomeSender"); //sender: SomeSender; args=System.EventArgs
OnEvent(object sender, object args){
WriteLine($"sender: {sender}; args={args}");
}
object eh=EventHandler(OnEvent(object\, int[]\), int[]); //создание EventHandler<int[]>
Raise(eh, this, new int[]{10, 20, 30});
OnEvent(object sender, int[] arr){
WriteLine($"sender: {sender}"); //sender: Instance of App
WriteLine($"arr: "+Join(' ', arr)); //args: 10 20 30
}
object eh=EventHandler(OnEvent(null, null), "System.UInt64"); //создание EventHandler<ulong>
Raise(eh, this, As(5, "System.UInt64"));
ReadKey();
//вместо "System.UInt64" лучше писать typeof("System.UInt64"), или указывать константу:
//const object UInt64 = typeof("System.UInt64");
//object eh=EventHandler(FuncRef(OnEvent(null, null)), UInt64);
//Raise(eh, this, As(5, UInt64));
OnEvent(object sender, object v){ //v можно задать не object, а, например, long или byte, и работать будет (значение сконвертируется, либо возникнет исклюение).
WriteLine($"sender: {sender}; v={v}"); //sender: Instance of App; v=5
}
//Допустим, из dll на C# в событие передаётся объект типа:
//public class SomeEventArgs : EventArgs
//{
// public int X { get; set; }
//}
//Событие в вашем OverScript-коде, которое вызывается из внешней библиотеки:
OnEvent(object sender, object args){
object x=args->X; //тут через Reflection получаем значение свойства X
}
object d=Delegate(OnUnhandledException(null, null), typeof("System.UnhandledExceptionEventHandler"));
WriteLine(d); //System.UnhandledExceptionEventHandler
ReadKey();
OnUnhandledException(object sender, object args){}
object d=Delegate(Test(int\, long\), typeof("System.Func`3[System.Int32,System.Int64,System.String]")); //создание делегата обобщённого типа Func<int,long,string> (функция, принимающая int и long, а возвращающая string)
WriteLine(Raise(d, 2, 3L)); //x=2; y=3
string Test(int x, long y){
return $"x={x}; y={y}";
}
object fn=FuncRef(Test(int\, long\));
object d=DelegateByFuncRef(fn, typeof("System.Func`3[System.Int32,System.Int64,System.String]"));
Test();
ReadKey();
Test(){
WriteLine(CallChain()); //App.Instance()->App.Test()
}object timer=LocalTimer(Write("Test "), 1000, true);
Sleep(3000);
Dispose(timer);
//Test Test Test End
ReadKey("End"); WriteLine(GetHashCode("Test")); // 1228681308WriteLine(Equals("Test", "Test")); //True#app HelloApp, Version="1.2.3.4", CustomParam=Test
WriteLine(AppInfo("Name")); // HelloApp // если Name не задано, то по умолчанию будет 'App'
WriteLine(AppInfo("Version")); // 1.2.3.4
WriteLine(AppInfo("CustomParam")); // Test
WriteLine("ALL: "+Join(", ", AppInfo())); // ALL: AppName: HelloApp, Version: 1.2.3.4, CustomParam: Test
WriteLine(AppPath()); //D:\scripts\TestAppDir//Запускаем OverScript без аргументов командной строки
WriteLine(CommandLine()); //D:\Programs\OverScript\OverScript.dll
// Теперь запускаем OverScript из cmd с указанием файла скрипта и аргументов, которые передать в скрипт: >D:\Programs\OverScript\OverScript.exe D:\Scripts\TestApp.txt SomeArg1 SomeArg2
WriteLine(CommandLine()); //D:\Programs\OverScript\OverScript.dll D:\Scripts\TestApp.txt SomeArg1 SomeArg2if(IndexOf(CommandLine(),' ')<0) WriteLine("Не из командной строки"); else WriteLine("Из командной строки");StartProcess(@"C:\windows\system32\notepad.exe", @"D:\docs\test.txt", 3, false); // открывает на весь экран блокнот с указанным файлом
StartProcess(@"D:\docs\test.txt",,, false); // открывает файл в программе, которая по умолчанию используется для работы с txt-файлами
object proc=StartProcess(@"D:\docs\test.txt"); // открывает файл и ждёт его закрытия
WriteLine(proc); //InvalidOperationException: Process has exited, so the requested information is not available.
object proc=StartProcess(@"D:\docs\test.txt",,, false); // открывает файл и не ждёт его закрытия
WriteLine(proc); //"System.Diagnostics.Process (notepad)"object info=Create("System.Diagnostics.ProcessStartInfo, System" , "notepad", @"D:\docs\test.txt");
StartProcess(info, true);car = BMW #марка
price = 12345,67 ;цена
color = White #цвет
string ini=ReadAllText("test.ini"); //читаем содержимое ini-файла, который лежит в папке с исполняющимся скриптом
WriteLine(IniGet(ini, "car")); //BMW
WriteLine(IniGet(ini, "price")); //12345,67
WriteLine(IniGet(ini, "color")); //White
//[main]
//car = BMW #марка
//color = Black #цвет
//[advanced]
//car = "BMW X3 20d xDrive III (G01)" #полное название
//color = Super Black #название цвета
string ini=ReadAllText("test.ini");
WriteLine(IniGet(ini, "car", "main")); //BMW
WriteLine(IniGet(ini, "car", "advanced")); //BMW X3 20d xDrive III (G01)
WriteLine(IniGet(ini, "color", "main")); //Black
WriteLine(IniGet(ini, "color", "advanced")); //Super Black
string ini="";
ini=IniSet(ini, "car", "Ford");
ini=IniSet(ini, "price", 56789.99m);
ini=IniSet(ini, "inStock", true);
ini=IniSet(ini, "website", "extended-info", null);
ini=IniSet(ini, "date", "extended-info", Now());
ini=IniSet(ini, "factory", "extended-info", @"""Ford River Rouge"" factory complex");
WriteLine(ini);
//car=Ford
//price=56789,99
//inStock=True
//
//[extended-info]
//website=
//date=02.08.2021 18:09:19
//factory="\"Ford River Rouge\" factory complex"
object t=Tuple(5, "test");
WriteLine(t->Item1); //5
WriteLine(t->Item2); //test
//t->Item2="hello"; //ошибка
object t=ValueTuple(5, "test");
WriteLine(t->Item1); //5
WriteLine(t->Item2); //test
t->Item2="hello";
WriteLine(t->Item2); //hello
int a, b;
WriteLine(@(a=2, b=3, a+b)); //5
@(Write("foo"), Write(" bar"), Write(" baz"), Write(" end")); //foo bar baz end
WriteLine(_(555, Write("Hello "), Write("World "))); //Hello World 555
int a, b;
WriteLine(__(a+b, a=2, b=a+1)); //5
Foo f=new Foo();
foreach(int item in f) Write(item+" "); //1 2 3 4 5
WriteLine();
ForEach(f, int $item, Write(item+" ")); //1 2 3 4 5 DISPOSE!
ReadKey();
class Foo{
object GetEnumerator(){
return Enumerator(new MyEnumerator()); //функция Enumerator делает из объекта перечислитель (IEnumerator)
//Можно из ссылок на функции создавать:
//MyEnumerator e=new MyEnumerator();
//object moveNext=FuncRef(e.MoveNext());
//object current=FuncRef(e.Current());
//object reset=FuncRef(e.Reset());
//object dispose=FuncRef(e.Dispose());
//return EnumeratorByFuncRefs(moveNext, current, reset, dispose); //dispose можно не задавать
}
}
class MyEnumerator{
int X;
public bool MoveNext(){ //вызывается при каждой итерации (включая первую) в foreach. Должен возвращать true, если перечисление не закончено (текущее значение не последнее), и false если перечисление вышло за пределы последнего элемента в коллекции (последовательности).
return(++X<=5 ? true : false);
}
public object Current(){ //возвращает значение текущей итерации
return X;
}
public Reset(){ //сбрасывает значение
X=0;
}
public Dispose(){ //срабатывает при очистке перечислителя (в OverScript foreach не вызывает Dispose, а функция ForEach вызывает)
WriteLine("DISPOSE!");
}
}
object obj=new object();
bool lockTaken;
Lock(obj, lockTaken);
WriteLine(lockTaken); //True
Unlock(obj);
SetBasePath(@"C:\files");
WriteLine(BasePath()); //C:\files
string str=ReadAllText("file.txt"); //чтение файла C:\files\file.txt
SetGlobal("x", 123);
int x=int\GetGlobal("x");
WriteLine(x); //123
try{
@(WriteLine("Hello"), WriteLine("World"), Throw("TestException", "Some test exception")); //сначала выведется "Hello", потом "World", а потом выбросится исключение
}
catch{ //можно так перехватывать: catch$("TestException") или catch("OverScript.CustomThrownException"), чтобы перехватить все CustomThrownException
WriteLine(exName+"; "+exMessage); // TestException; Some test exception
WriteLine(GetType(exception)); //OverScript.CustomThrownException
Throw(); //работает так же, как и инструкция throw;
}
//TestException: Some test exception
ReadKey();
Throw(Create("System.ApplicationException", "Hello!"));
//ApplicationException: Hello!