Name | Type | is_array | initial_value |
Building_Label_Points | location | Yes | |
CHEAT_DELETE_THIS_BEFORE_V01 | unit | No | |
CHEAT_ON | boolean | No | |
colors_blue | integer | Yes | 100 |
colors_green | integer | Yes | 100 |
colors_red | integer | Yes | 100 |
Cops_Killed | integer | Yes | |
Drug_Pat_Points | location | Yes | |
Employed_Boolean | boolean | Yes | |
Horizontal_Street | string | Yes | |
Inventory_Enter_Points | location | Yes | |
Inventory_Leave_Points | location | Yes | |
Inventory_Waygates | unit | Yes | |
JOB__ButtChef_Burgers | item | No | |
JOB__Mailman_Unit | unit | No | |
JOB__McGrubChef_Unit | unit | No | |
JOB_Cracks_Cracksleft | integer | No | 20 |
JOB_Cracks_Filler | unit | No | |
JOB_Cracks_floatingtext | texttag | No | |
JOB_Deliver_McGrub | item | No | |
JOB_Deliver_Pizza_Butt | item | No | |
JOB_Janitor_Broom | item | No | |
JOB_Janitor_TrashLeft | integer | No | 15 |
JOB_Mailman_Letters | item | No | |
JOB_McGrubChef_Burgers | item | No | |
Money_In_Bank | integer | Yes | |
Ped_Order_Point | location | No | |
Ped_Random_Point | location | No | |
Peds_To_Spawn | integer | No | |
Player | unit | Yes | |
Players_In_1st_Person | force | No | |
taxi_ability_ug | group | Yes | |
Taxi_Customer | unit | Yes | |
Taxi_DropRegion | rect | Yes | |
Taxi_has_customer | boolean | Yes | false |
Taxi_Random | integer | Yes | |
TempPoint | location | Yes | |
TempUnitGroup | group | No | |
TempUnitGroup2 | group | No | |
TempUnitGroup3 | group | No | |
Unit | unit | Yes | |
Up_Key_Is_Down | boolean | Yes | |
Vertical_Street | string | Yes | |
Wanted_Levels | string | Yes | 0 |
Wanted_Multiboard | multiboard | Yes | |
Weather_Array | integer | No |
//***************************************************************************
//*
//* Item Stacking System
//* Version 1.0.7, 01/01-08
//*
//* Coded by Mr. Zero - [email protected]
//*
//***************************************************************************
function ISS_SC takes nothing returns nothing
local integer array i
local item a=GetManipulatedItem()
local unit b=GetManipulatingUnit()
local item c
set i[0]=0
set i[1]=GetItemLevel(a)
set i[2]=GetItemCharges(a)
set i[3]=GetItemTypeId(a)
if(i[2]!=0)then
loop
exitwhen i[0]>5
set c=UnitItemInSlot(b,i[0])
set i[4]=GetItemCharges(c)
set i[5]=GetItemTypeId(c)
if(((c!=a)and(i[5]==i[3]))and(i[4]<i[1]))then
if((i[4]+i[2])<=i[1])then
call SetItemCharges(c,(i[4]+i[2]))
call RemoveItem(a)
exitwhen true
else
call SetItemCharges(a,(i[4]+i[2])-i[1])
call SetItemCharges(c,i[1])
call UnitAddItem(b,a)
exitwhen true
endif
endif
set i[0]=i[0]+1
endloop
endif
set a=null
set b=null
set c=null
endfunction
function ISS_RC takes nothing returns nothing
local integer array i
local unit a=GetOrderedUnit()
local item b=GetOrderTargetItem()
local item c=UnitItemInSlot(a,(GetIssuedOrderId()-852002))
set i[0]=0
set i[1]=GetItemCharges(b)
set i[2]=GetItemLevel(b)
set i[3]=GetItemTypeId(b)
set i[4]=GetItemCharges(c)
set i[5]=GetItemTypeId(c)
if((((GetIssuedOrderId()>=852002)and(GetIssuedOrderId()<=852007))and(i[1]!=0)and(c!=null)))then
if(b==c)then
set c=CreateItem(i[3],0,0)
set i[4]=GetItemCharges(c)
call RemoveItem(c)
if(i[1]>i[4])then
loop
exitwhen i[0]>5
if(UnitItemInSlot(a,i[0])==null)then
call SetItemCharges(b,(i[1]-i[4]))
set b=CreateItem(i[3],0,0)
call DisableTrigger(gg_trg_Item_Stacking_System)
call UnitAddItem(a,b)
call EnableTrigger(gg_trg_Item_Stacking_System)
exitwhen true
endif
set i[0]=i[0]+1
endloop
endif
else
if((i[5]==i[3])and(i[4]<i[2]))then
if((i[1]+i[4])<=i[2])then
call SetItemCharges(b,(i[1]+i[4]))
call RemoveItem(c)
else
call SetItemCharges(c,(i[1]+i[4])-i[2])
call SetItemCharges(b,i[2])
endif
endif
endif
endif
set a=null
set b=null
set c=null
endfunction
function InitTrig_Item_Stacking_System takes nothing returns nothing
local integer i=0
local trigger t=CreateTrigger()
set gg_trg_Item_Stacking_System=CreateTrigger()
loop
exitwhen i==16
call TriggerRegisterPlayerUnitEvent(gg_trg_Item_Stacking_System,Player(i),EVENT_PLAYER_UNIT_PICKUP_ITEM,null)
call TriggerRegisterPlayerUnitEvent(t,Player(i),EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER,null)
set i=i+1
endloop
call TriggerAddAction(gg_trg_Item_Stacking_System,function ISS_SC)
call TriggerAddAction(t,function ISS_RC)
set t=null
endfunction