[Gector]

Сообщение от St_AnGer

МужЫк, извини конечно, но ты наркоман.

;Вот твой тип (аля класс в цпп)
Type blablabla
    Field hp%;
    Field speed%;
End Type

;Создание "объекта" (коли профи - знаешь что это такое)
Function CreateMotherFucker.blablabla(speed%)
    Local b.blablabla = New blablabla;
    b\hp = 100;
    b\speed = speed;

    Return b;
End Function

;Любая другая функция
Function DieMotherFuckerDie(b.blablabla)
    b\hp = -100500;
    b\speed = 0;
End Function

;Инициализируем переменную и создаём "объект" твоего типа
Local mzfk.blablabla = CreateMotherFucker(100500);

;Выполняем нашу другую функцию, принимающую в себя созданный ранее "объект" твоего типа
DieMotherFuckerDie(mzfk);


;Выведем на экран содержимое "объекта" после выполнения нашей функции
Print("HP: "+mzfk\hp);
Print("Speed: "+mzfk\speed);

;Ждём нажатия любой клавиши и выходим
WaitKey;
End;

"Объект" в кавычках потому, что это не тот объект из цпп или любого ООП языка. Это простая переменная указанного типа, в твоём случае типа blablabla. Но это нечто похожее на "объект", ты можешь получить доступ к его внутренностям (в твоём случае к hp и speed). Доходчивее уже некуда объяснять. Вкуривайся в это, или бросай сию затею.

Dope слушаешь?