Home » Renegade Discussions » Mod Release Forum » [script]!sellveh
( ) 3 Votes
Re: !sellveh [message #327613 is a reply to message #327514] |
Thu, 24 April 2008 08:56 ![Go to previous message Go to previous message](/theme/Renegade_Forums/images/up.png) ![Go to next message Go to previous message](/theme/Renegade_Forums/images/down.png) |
![](http://renegadeforums.com/images/custom_avatars/3415.gif) |
reborn
Messages: 3231 Registered: September 2004 Location: uk - london
Karma:
|
General (3 Stars) |
|
|
Updated to halt the sale if you re-enter, and a sale message...
void reb_sell_veh::Created(GameObject *obj) {
GameObject *MyVeh = Find_My_Veh(obj);
VehID = Commands->Get_ID(MyVeh);
Commands->Start_Timer(obj, this, 15.0f, 1);
}
void reb_sell_veh::Killed(GameObject *obj, GameObject *shooter){
Console_Input(StrFormat("ppage %d Your vehicle sale has been halted",Get_Player_ID(obj)).c_str());
sellingveh = false;
}
void reb_sell_veh::Timer_Expired(GameObject *obj, int number){
if(number == 1){
if(Commands->Find_Object(VehID)){
float value = GetValue(Commands->Get_Preset_Name(Find_My_Veh(obj)));
Console_Input(StrFormat("ppage %d Your vehicle was successfully sold for $%f.",Get_Player_ID(obj),value).c_str());
Commands->Give_Money(obj,GetValue(Commands->Get_Preset_Name(Find_My_Veh(obj))), 0);
Commands->Destroy_Object(Find_My_Veh(obj));
sellingveh = false;
}
}
}
class sellvehChatCommand : public ChatCommandClass {
void Triggered(int ID,const TokenClass &Text,int ChatType) {
GameObject *MyVeh = Find_My_Veh(Get_GameObj(ID));
GameObject *Own = Get_GameObj(ID);
float Value = GetValue(Commands->Get_Preset_Name(MyVeh));
int Type = Commands->Get_Player_Type(Own);
if (Type == 2){
float Dist = Commands->Get_Distance(Commands->Get_Position(Own),Commands->Get_Position(Find_War_Factory(0)));
if (!MyVeh) {
Console_Input(StrFormat("ppage %d You must have a vehicle bound to you to use this command. Type !bind in teamchat to bind the vehicle you are currently in.",ID).c_str());
}
if (MyVeh && Value > 0 && Dist <= 20.0f) {
Force_Occupants_Exit(MyVeh);
Commands->Send_Custom_Event(Own,MyVeh,1112,0,0);
Commands->Attach_Script(Own,"reb_sell_veh","");
Console_Input(StrFormat("ppage %d Your vehicle will be sold in 15 seconds for $%f, unless you re-enter it or it is stolen/destroyed.",ID,GetValue(Commands->Get_Preset_Name(MyVeh))).c_str());
sellingveh = true;
}
if (MyVeh && Value == 0) {
Console_Input(StrFormat("ppage %d This vehicle is not supported by this command, please report this bug.",ID).c_str());
}
if (Dist > 20.0f) {
Console_Input(StrFormat("ppage %d To use this command you must be in close proximity to the Nod WarFactory",ID).c_str());
}
}
else{
float Dist = Commands->Get_Distance(Commands->Get_Position(Own),Commands->Get_Position(Find_War_Factory(1)));
if (!MyVeh) {
Console_Input(StrFormat("ppage %d You must have a vehicle bound to you to use this command. Type !bind in teamchat to bind the vehicle you are currently in.",ID).c_str());
}
if (MyVeh && Value > 0 && Dist <= 20.0f) {
Force_Occupants_Exit(MyVeh);
Commands->Send_Custom_Event(Own,MyVeh,1112,0,0);
Commands->Attach_Script(Own,"reb_sell_veh","");
Console_Input(StrFormat("ppage %d Your vehicle will be sold in 15 seconds for $%f, unless you re-enter it or it is stolen/destroyed.",ID,GetValue(Commands->Get_Preset_Name(MyVeh))).c_str());
sellingveh = true;
}
if (MyVeh && Value == 0) {
Console_Input(StrFormat("ppage %d This vehicle is not supported by this command, please report this bug.",ID).c_str());
}
if (Dist > 20.0f) {
Console_Input(StrFormat("ppage %d To use this command you must be in close proximity to the GDI WarFactory",ID).c_str());
}
}
}
};
ChatCommandRegistrant<sellvehChatCommand> sellvehChatCommandReg("!sellveh",CHATTYPE_ALL,0,GAMEMODE_AOW);
declare and initialise sellingveh at the top of your .cpp file (I choose GMMAIN.cpp).
I also added this code to the "else if (message == CUSTOM_EVENT_VEHICLE_ENTER) {" conditional in the "void MDB_SSGM_Vehicle_Owner::Custom(GameObject *obj, int message, int param, GameObject *sender) {" script. I moved this script over to GMMAIN.cpp long ago, but if you do not want to do that then you must remember to externalise the sellingveh boolean.
if (IsLocked && Commands->Get_ID(Get_Vehicle_Occupant(obj,0)) == Commands->Get_ID(sender) && Commands->Get_ID(sender) == MyOwner(3)) {
if(sellingveh){
Remove_Script(Get_GameObj(MyOwner(2)),"reb_sell_veh");
Console_Input(StrFormat("ppage %d Your vehicle sale has been halted because you re-entered your vehicle.",MyOwner(2)).c_str());
sellingveh = false;
}
|
|
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
[script]!sellveh
By: reborn on Wed, 23 April 2008 16:13
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: reborn on Wed, 23 April 2008 16:22
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: BlueThen on Wed, 23 April 2008 16:30
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: reborn on Wed, 23 April 2008 16:34
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: KobraOps on Wed, 23 April 2008 16:52
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: reborn on Wed, 23 April 2008 23:09
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: reborn on Thu, 24 April 2008 04:41
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: reborn on Thu, 24 April 2008 08:56
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: reborn on Thu, 12 June 2008 03:09
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: reborn on Thu, 12 June 2008 08:04
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: reborn on Thu, 12 June 2008 08:55
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: reborn on Thu, 12 June 2008 09:36
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: reborn on Thu, 12 June 2008 10:32
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: reborn on Fri, 13 June 2008 03:18
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: reborn on Fri, 13 June 2008 12:35
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: Hex on Sun, 20 July 2008 06:21
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: reborn on Mon, 21 July 2008 08:22
|
![Read Message Read Message](/theme/Renegade_Forums/images/read.png) |
|
Re: !sellveh
By: Hex on Mon, 21 July 2008 08:49
|
Goto Forum:
Current Time: Sat Feb 08 07:18:59 MST 2025
Total time taken to generate the page: 0.01114 seconds
|