هذى مثال عن الودك ياه عدل عليه
كلنت
marker = createMarker( -1353.4000244141, -483.5, 14.199999809265, "cylinder", 3, 0, 0, 0, 0 )
outputChatBox('#FFFF00الورشه في المطار',255, 255, 0, true )
local screX, screY = guiGetScreenSize()
function Show_wheel_one(player)
if player ~= localPlayer then return end
if (guiGetVisible(Window_Wheel) == true) then
guiSetVisible(Window_Wheel, false)
showCursor(false)
else
guiSetVisible(Window_Wheel, true)
showCursor(true)
local sound = playSound("x1x.wma")
setSoundVolume(sound, 1)
end
end
addEventHandler("onClientMarkerHit", marker, Show_wheel_one)
Window_Wheel = guiCreateWindow(screX/2 - 150, screY/2 - 150,347,295,"Wheels Window",false)
guiSetVisible(Window_Wheel, false)
Grid_Wheel = guiCreateGridList(14,23,186,261,false,Window_Wheel)
guiGridListSetSelectionMode(Grid_Wheel,2)
Close = guiCreateButton(304, 262, 28, 24, "X", false, Window_Wheel)
Image_Wheel = guiCreateStaticImage(217,36,117,96,"img/i.png",false,Window_Wheel)
Butto_Wheel_on = guiCreateButton(220,158,104,39,"Change it",false,Window_Wheel)
Checkbox_txd_for_wheel_on = guiCreateCheckBox(262,261,16,16,"",false,false,Window_Wheel)
lbl_wheel__ = guiCreateLabel(213,238,119,17,"By yazan !~! يزن",false,Window_Wheel)
lbl_wheel_ = guiCreateLabel(213,213,119,17,"New Wheels : OFF",false,Window_Wheel)
guiLabelSetColor(lbl_wheel_,255,0,0)
Servers = guiGridListAddColumn(Grid_Wheel,"Wheels List",0.5)
Wheels = {1074,1075,1076,1077,1078,1079,1080,1081,1082,1083,1084,1085,1096,1097}
for _, k in ipairs(Wheels) do
guiGridListSetItemText(Grid_Wheel, guiGridListAddRow(Grid_Wheel), Servers, tostring(k), false, false)
end
function guiClick (button, state, absoluteX, absoluteY)
local scheck = guiGridListGetItemText ( Grid_Wheel, guiGridListGetSelectedItem ( Grid_Wheel ), 1 )
if (source == Butto_Wheel_on) then
if ( guiCheckBoxGetSelected(Checkbox_txd_for_wheel_on) ) then
triggerServerEvent ( "addWheel", getLocalPlayer(), scheck)
else
outputChatBox ( "Sorry , You must select the check box to turn it on" , 0, 217,176, false )
end
elseif (source == Grid_Wheel) then
local scheck = guiGridListGetItemText ( Grid_Wheel, guiGridListGetSelectedItem ( Grid_Wheel ), 1 ) or 1
guiStaticImageLoadImage(Image_Wheel,"img/i"..scheck..".png")
elseif (source == Close) then
guiSetVisible(Window_Wheel,false)
showCursor(false)
end
end
addEventHandler ("onClientGUIClick", getRootElement(), guiClick)
function Replacetxd()
if ( guiCheckBoxGetSelected(source) ) then
playSoundFrontEnd(1)
txd = engineLoadTXD("data/wheel_gn1.txd", 1074 )
engineImportTXD(txd, 1074)
dff = engineLoadDFF("data/wheel_gn1.dff", 1074)
engineReplaceModel(dff, 1074)
txd = engineLoadTXD("data/wheel_gn2.txd", 1075 )
engineImportTXD(txd, 1075)
dff = engineLoadDFF("data/wheel_gn2.dff", 1075)
engineReplaceModel(dff, 1075)
txd = engineLoadTXD("data/wheel_gn3.txd", 1076 )
engineImportTXD(txd, 1076)
dff = engineLoadDFF("data/wheel_gn3.dff", 1076)
engineReplaceModel(dff, 1076)
txd = engineLoadTXD("data/wheel_gn4.txd", 1077 )
engineImportTXD(txd, 1077)
dff = engineLoadDFF("data/wheel_gn4.dff", 1077)
engineReplaceModel(dff, 1077)
txd = engineLoadTXD("data/wheel_gn5.txd", 1078 )
engineImportTXD(txd, 1078)
dff = engineLoadDFF("data/wheel_gn5.dff", 1078)
engineReplaceModel(dff, 1078)
txd = engineLoadTXD("data/wheel_lr1.txd", 1079 )
engineImportTXD(txd, 1079)
dff = engineLoadDFF("data/wheel_lr1.dff", 1079)
engineReplaceModel(dff, 1079)
txd = engineLoadTXD("data/wheel_lr2.txd", 1080 )
engineImportTXD(txd, 1080)
dff = engineLoadDFF("data/wheel_lr2.dff", 1080)
engineReplaceModel(dff, 1080)
txd = engineLoadTXD("data/wheel_lr3.txd", 1081 )
engineImportTXD(txd, 1081)
dff = engineLoadDFF("data/wheel_lr3.dff", 1081)
engineReplaceModel(dff, 1081)
txd = engineLoadTXD("data/wheel_lr4.txd", 1082 )
engineImportTXD(txd, 1082)
dff = engineLoadDFF("data/wheel_lr4.dff", 1082)
engineReplaceModel(dff, 1082)
txd = engineLoadTXD("data/wheel_lr5.txd", 1083)
engineImportTXD(txd, 1083)
dff = engineLoadDFF("data/wheel_lr5.dff", 1083)
engineReplaceModel(dff, 1083)
txd = engineLoadTXD("data/wheel_sr1.txd", 1084 )
engineImportTXD(txd, 1084)
dff = engineLoadDFF("data/wheel_sr1.dff", 1084)
engineReplaceModel(dff, 1084)
txd = engineLoadTXD("data/wheel_sr2.txd", 1085 )
engineImportTXD(txd, 1085)
dff = engineLoadDFF("data/wheel_sr2.dff", 1085)
engineReplaceModel(dff, 1085)
txd = engineLoadTXD("data/wheel_sr3.txd", 1096 )
engineImportTXD(txd, 1096)
dff = engineLoadDFF("data/wheel_sr3.dff", 1096)
engineReplaceModel(dff, 1096)
txd = engineLoadTXD("data/wheel_sr4.txd", 1097 )
engineImportTXD(txd, 1097)
dff = engineLoadDFF("data/wheel_sr4.dff", 1097)
engineReplaceModel(dff, 1097)
guiLabelSetColor(lbl_wheel_,0,255,0)
guiSetText ( lbl_wheel_, "New Wheels : ON" )
else
playSoundFrontEnd(2)
engineRestoreModel(1074)
engineRestoreModel(1075)
engineRestoreModel(1076)
engineRestoreModel(1077)
engineRestoreModel(1078)
engineRestoreModel(1079)
engineRestoreModel(1080)
engineRestoreModel(1081)
engineRestoreModel(1082)
engineRestoreModel(1083)
engineRestoreModel(1084)
engineRestoreModel(1085)
engineRestoreModel(1096)
engineRestoreModel(1097)
guiLabelSetColor(lbl_wheel_,255,0,0)
guiSetText ( lbl_wheel_, "New Wheels : OFF" )
end
end
addCommandHandler("00", Checkbox_txd_for_wheel_on, Replacetxd, false)
سيرفر
root = getRootElement()
function Change_ (scheck)
if ( isPedInVehicle ( source ) ) then
local theVehicle = getPedOccupiedVehicle ( source )
local success = addVehicleUpgrade ( theVehicle, scheck )
if ( success ) then
outputChatBox( getVehicleUpgradeSlotName ( scheck ) .. " Wheel #FF0000Added", source, 255, 255, 0, true )
else
outputChatBox( "Failed to Add The Wheel.", source, 255, 255, 0, true )
end
else
outputChatBox( "You Must Be in a Vehicle!", source, 255, 255, 0, true )
end
end
addEvent("addWheel",true)
addEventHandler("addWheel",root,Change_)
غير و عدل هذى مثال
