|
|
- function UseItem: Boolean;
- begin
- if This_Player.FreeBagNum > 15 then
- begin
- case This_Player.Job of
- 0:
- begin
- This_Player.SysGiveGift('修复神水',1,true);
- This_Player.SysGiveGift('火龙珠',10,true);
- This_Player.SysGiveGift('金条',1,true);
- This_Player.PlayerDialog(
- '你获得了：金条、修复神水.10个火龙珠。'
- );
-
- end;
- 1:
- begin
- This_Player.SysGiveGift('修复神水',1,true);
- This_Player.SysGiveGift('火龙珠',10,true);
- This_Player.SysGiveGift('金条',1,true);
- This_Player.PlayerDialog(
- '你获得了：金条、修复神水.10个火龙珠。'
- );
- end;
- 2:
- begin
- This_Player.SysGiveGift('修复神水',1,true);
- This_Player.SysGiveGift('火龙珠',10,true);
- This_Player.SysGiveGift('金条',1,true);
- This_Player.PlayerDialog(
- '你获得了：金条、修复神水.10个火龙珠。'
- );
-
- end;
- end;
- Result := true;
- end
- else
- begin
- This_Player.PlayerDialog(
- '对不起，包裹空间不足，请预留15个以上再次开启！'
- );
- Result := false;
- end;
- end;
- begin
- end.
|
|
发表于 2022-12-31 21:28:24
发表于 2023-12-26 07:39:46