Скрипты на C#

[Half-Life]

Взываю к тем кто умеет и могёт. Сделайте небольшой туториал как запилить небольшой такой скриптик на C#.

Что то типа такого

Code: Select all

Program test;
var
NumberLine:Integer;

procedure RandomNumber;
begin
  NumberLine:=RandomRange(HighJournal-100,HighJournal);
end;

Procedure Say(Text:String;Color:Word);
begin
  UOSayColor(Text,Color);
end;

function ScanJ(int:Integer):Boolean;
var
Text:String;
Color:Word;
begin
  Text:=Journal(int);
  Color:=RandomRange(Random(1),Random(500));
  Result:=length(Text)>10;
  if Result then Say(Text,Color);
end;

procedure Talk;
begin
  RandomNumber;
  if not ScanJ(NumberLine) then AddToSystemJournal('Не прошло.');
end;

begin
  repeat
    Talk;
    Wait(5500);
  until(1<>1)
end.

[drabadan]

а чо на шарпе? и чо делать такой скрипт через внешние скрипты?
у меня маловато моска осознать, что же ты хотел таким скриптом получить...
Объясни словами, может у кого-то реализация другая получится.

Code: Select all

Result:=length(Text)>10;

такое реально вообще, никогда не видел, хотя, что я в жизни вообще видел!

Code: Select all

Program test;
var
	text : String;	
begin
	text := Journal(RandomRange(0, HighJournal));
	if Length(text) > 10 then
		UOSayColor(text, RandomRange(Random(1), Random(500)))
	else
		AddToSystemJournal('Не прошло.');
		
end.

так вроде короче получается или я суть не уловил?

http://www.scriptuo.com/index.php?topic=11675.0 ссылка на тему Орича по поводу шарпа, там все очень красочно описано и показано!

[Half-Life]

Конечно так проще. Но это всё специально именно так написано. Я хочу увидеть как это было бы на шарпе. И не заостряй внимание на самом скрипте, вернее на то что он делает.
Туториал что то типа такого http://stealth.od.ua/forum/viewtopic.php?f=8&t=2592 только с VS и С#

зы Спасибо за ссылку. Сразу не заметил.

[Vizit0r]

с шарпом в последней версии некоторые проблемы, орич оффлайн, а у меня времени нет .net библиотеку скриптовую исправить.

[Half-Life]

Буду ждать)