ClientRequestTileTarget
Sends a tile target request to the connected client. The client will display a targeting cursor that allows the user to select a tile or ground location (not an object).
After the user selects a tile, the result can be retrieved via ClientTargetResponse. Use ClientTargetResponsePresent to check whether the user has responded, or WaitForClientTargetResponse to wait with a timeout.
For targeting objects, use ClientRequestObjectTarget.
Отправляет запрос на выбор тайла подключённому клиенту. Клиент покажет курсор таргета, позволяющий пользователю выбрать тайл или точку на земле (не объект).
После выбора тайла результат можно получить через ClientTargetResponse. Используйте ClientTargetResponsePresent для проверки ответа или WaitForClientTargetResponse для ожидания с таймаутом.
Для выбора объектов используйте ClientRequestObjectTarget.
procedure ClientRequestTileTarget;
def ClientRequestTileTarget() -> None: ...
var
tx, ty: Word;
tz: ShortInt;
begin
ClientPrint('Select fishing spot');
ClientRequestTileTarget;
WaitForClientTargetResponse(60000);
if ClientTargetResponsePresent then
begin
tx := ClientTargetResponse.X;
ty := ClientTargetResponse.Y;
tz := ClientTargetResponse.Z;
AddToSystemJournal('Selected tile: (' + IntToStr(tx) + ', ' + IntToStr(ty) + ', ' + IntToStr(tz) + ')');
end
else
AddToSystemJournal('No tile selected (timeout)');
end.
ClientPrint('Select fishing spot')
ClientRequestTileTarget()
WaitForClientTargetResponse(60000)
if ClientTargetResponsePresent():
resp = ClientTargetResponse()
AddToSystemJournal(f'Selected tile: ({resp.X}, {resp.Y}, {resp.Z})')
else:
AddToSystemJournal('No tile selected (timeout)')
ClientRequestObjectTarget, ClientTargetResponse, ClientTargetResponsePresent, WaitForClientTargetResponse