Forum

CS2D

Scripts

Lua Scripts/Questions/Help

Forums overview CS2D overview Scripts overview Log in to reply

Lua Scripts/Questions/Help

6,770 replies

1 2 … 211 212 213 … 338 339

Re: Lua Scripts/Questions/Help

Sudden Death
User Off

Offline

24.06.10 03:13:31 pm

AaAa where is mod for "player kill" - kick (i can't search..)

Re: Lua Scripts/Questions/Help

TimeQuesT
User Off

Offline

24.06.10 06:26:13 pm

huh? which mod?

do you mean something like "!kickplayer xyz" or something like that?

Re: Lua Scripts/Questions/Help

KINGGOLDrus
User Off

Offline

24.06.10 09:44:10 pm

Why doesn't it work?

parse('flashplayer '..id..' 50')

Please, help me.

Re: Lua Scripts/Questions/Help

archmage
User Off

Offline

24.06.10 10:39:25 pm

Is that all your script? If not post it.
The problem is that the variable id is nil.

parse("flashplayer "..id.." 50") -- ERROR- id has not been initialized

1
2

id = 1 -- id has been initialized
parse("flashplayer "..id.." 50") -- no error

Re: Lua Scripts/Questions/Help

KenVo
User Off

Offline

24.06.10 10:56:34 pm

i'm trying to make a car locking system using weiwen car script but i don't know how to make it

sorry, i'm noob at scripting

Here is my script

Spoiler

Here's the weiwen's script:

Spoiler

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117

CARS = {}
CARS_MAXSPEED = 25
CARS_ACCELERATION = function(speed) return speed/2 + 1 end
CARS_DECELERATION = function(speed) return -speed/2 - 1 end
CARS_IMAGEPATH = "gfx/weiwen/car.png"
CARS_PRICE = 10000

if not addmoney then
     function addmoney(id, amount)
          if player(id, 'money') >= amount then
               parse(string.format("setmoney %i %i", id, player(id, 'money') - amount))
               return true
          end
          return false
     end
end

function addcar(x, y)
     table.insert(CARS, {x = x, y = y, speed = 0, image = image(CARS_IMAGEPATH, x, y, 0), rot = 0})
end

function carpos(car, x, y)
     local tilex, tiley = math.floor(car.x/32), math.floor(car.y/32)
     if not tile(tilex, tiley, 'walkable') then
          return false
     end
     for _, id in ipairs(player(0, 'table')) do
          if car.driver and car.driver ~= id and player(id, 'health') > 0 and math.abs(x - player(id, 'x')) < 16 and math.abs(y - player(id, 'y')) < 16 then
               parse(string.format("customkill %i Car %i", car.driver, id))
          end
     end
     car.x, car.y = x, y
     if car.driver then
          parse(string.format("setpos %i %i %i", car.driver, x, y))
     else
          imagepos(car.image, x, y, car.rot)
     end
     return true
end

addhook("ms100", "CARms100")
function CARms100()
     for id, car in pairs(CARS) do
          if car.driver then
               if not player(car.driver, 'exists') or player(car.driver, 'health') <= 0 then
                    car.driver = nil
                    car.speed = math.min(CARS_MAXSPEED, car.speed + CARS_DECELERATION(car.speed))
               else
                    car.rot = player(car.driver, 'rot')
                    car.speed = math.min(CARS_MAXSPEED, car.speed + CARS_ACCELERATION(car.speed))
               end
          elseif car.speed > 0 then
               car.speed = math.min(CARS_MAXSPEED, car.speed + CARS_DECELERATION(car.speed))
          end
          if car.speed > 0 then
               local rot = math.rad(car.rot - 180)
               if not carpos(car, car.x - math.sin(rot)*car.speed, car.y + math.cos(rot)*car.speed) then
                    if car.driver then
                         parse(string.format("customkill %i Car %i", car.driver, car.driver))
                    end
                    freeimage(car.image)
                    parse(string.format("explosion %i %i 128 250 %i", car.x, car.y, car.driver or 0))
                    parse(string.format("effect \"fire\" %i %i 256 128", car.x, car.y))
                    CARS[id] = nil
               end
          end
     end
end

addhook("use", "CARuse")
function CARuse(id,event,data,x,y)
     x, y = player(id, 'x'), player(id, 'y')
     for _, car in pairs(CARS) do
          if not car.driver and math.abs(car.x - x) < 32 and math.abs(car.y - y) < 32 then
               car.speedmod = player(id, 'speedmod')
               parse(string.format("speedmod %i 0", id))
               car.driver = id
               freeimage(car.image)
               car.image = image(CARS_IMAGEPATH, 1, 0, 200+id)
                break
          elseif car.driver == id then
               parse(string.format("speedmod %i %i", id, car.speedmod))
               car.driver = nil
               freeimage(car.image)
               car.image = image(CARS_IMAGEPATH, player(id, 'x'), player(id, 'y'), 0)
                break
          end
     end
end

addhook("die", "CARdie")
function CARdie(id,killer,weapon,x,y)
     x, y = player(id, 'tilex'), player(id, 'tiley')
     for id, car in pairs(CARS) do
          if car.driver == id then
               freeimage(car.image)
               parse(string.format("explosion %i %i 128 250 %i", car.x, car.y, car.driver))
               parse(string.format("effect \"fire\" %i %i 256 128", car.x, car.y))
               CARS[id] = nil
                break
          end
     end
end

local bought, nomoney = "You have bought a car for $" .. CARS_PRICE .. ".", "You do not have enough money to buy a car. ($" .. CARS_PRICE .. ")"
addhook("say", "CARsay")
function CARsay(id,message)
     if message == "!car" then
          if addmoney(id, -CARS_PRICE) then
               addcar(player(id, 'x'), player(id, 'y'))
               msg2(id, bought)
          else
               msg2(id, nomoney)
          end
          return 1
     end
end

Lua

Snake_Eater
User Off

Offline

25.06.10 12:56:10 pm

Hi all! I want if I shoot somebody with deagle that this player teleports AND SPAWN again and again at a special place.For example at x=2160 y=784.
CAN ANYBODY SHOW ME A SCRIPT LIKE THIS??

Re: Lua Scripts/Questions/Help

RyceR
User Off

Offline

25.06.10 01:30:55 pm

i have 2 questions:
1) Where can i download Fifa2D mod?
2) Where is mod from server "modded"?

say plz

Re: Lua Scripts/Questions/Help

KINGGOLDrus
User Off

Offline

25.06.10 03:51:13 pm

Dark Byte,

1
2
3
4
5
6
7
8
9
10
11
12

addhook("spawn","spw")
function spw(id)
	if (pl_loaded[id]==0) then
		mes(id,1)
	else
		parse('sv_sound2 '..id..' rpg/sounds/other/respawn.wav')
		parse('setpos '..id..' '..pl_savedx[id]..' '..pl_savedy[id])
		parse('speedmod '..id..' '..rpg_speedmod[pl_sk[id][2]])
		resetallhud(id)
	end
	parse('flashplayer '..id..' 50')
end

flashing doesn't work

Re: Lua Scripts/Questions/Help

DRoNe
User Off

Offline

25.06.10 04:05:47 pm

1
2
3
4
5

for id = 1, 32 do
	if player(id,"exists") then
		parse("flashplayer "..id.." 50")
	end
end

maybe this

edited 2×, last 25.06.10 06:39:37 pm

Re: Lua Scripts/Questions/Help

RyceR
User Off

Offline

25.06.10 08:11:38 pm

How to make walls in a random place at round start?
It dont work:

1
2
3
4

addhook("startround","wall")
function wall()
	parse("spawnobject "..math.random(3,5).." "..math.random(1,14).." "..math.random(154,164).." 0 1 0 0")
end

P.S: Map tiles: 15x15
P.S: Sorry for my bad english

edited 3×, last 25.06.10 08:22:44 pm

Re: Lua Scripts/Questions/Help

archmage
User Off

Offline

25.06.10 08:16:27 pm

@DRoNe
The quotes won't matter, but you could also use this.

1
2
3
4
5

for id = 1, 32 do
     if player(id,[[exists]]) then
          parse([[flashplayer ]]..id..[[ 50]])
     end
end

But I do not ever use those as they can be confusing.

@KINGGOLDrus
See if there are any errors in the console.
btw what is mes(id,1)?

Edit
I need your full script otherwise I will keep getting an error. If that is your whole script then I know the problem.

Re: Lua Scripts/Questions/Help

DRoNe
User Off

Offline

25.06.10 08:48:06 pm

@MSek

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

addhook("startround","wall")
function wall()
local wall1 = math.random(0,10)
local wall2 = math.random(0,10)
local wall3 = math.random(0,10)
x = math.random(1, map("xsize")) -- or if tiles 15x15, x = math.random(1,15)
y = math.random(1, map("ysize")) -- here too
	for id = 1, wall1 do
		parse("spawnobject 3 " "..x.." "..y)
	end
	for id = 1, wall2 do
		parse("spawnobject 4 " "..x.." "..y)
	end
	for id = 1, wall3 do
		parse("spawnobject 5 " "..x.." "..y)
	end 
end

try this, i not tested it. maybe it should work.

Re: Lua Scripts/Questions/Help

BrunoRZ
User Off

Offline

25.06.10 10:26:47 pm

I need a lua script.
I want a simple lua, just like in editor we have "trigger_start".
Cuz I need this trigger only to my server, and people that try use my map will fail.

kind of trigger start "seckey" <-- thats what I need
(prefer using lua instead of putting it in map)
THX

Re: Lua Scripts/Questions/Help

archmage
User Off

Offline

25.06.10 11:36:00 pm

@BrunoRZ

1
2
3
4
5

addhook("startround", "sr")
trigger = "" -- what to trigger
function sr ()
	parse("trigger " .. trigger)
end

just replace trigger = ""
with
trigger = "<what to trigger>"

Re: Lua Scripts/Questions/Help

YellowBanana
BANNED Off

Offline

26.06.10 12:20:45 am

vesa-omar has written

Ok, Im trying to do when you throw an Smoke it freeze's the one's it hit.

But i cant get it to work

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

--Weapons--
addhook("projectile","hnsteam_smokecus")
function hnsteam_smokecus(id,weapon,x,y)
  if (weapon==53) then
     		parse('effect "colorsmoke" ' ..x.. ' ' ..y.. ' 140 96 0 0 128')
     		parse('effect "colorsmoke" ' ..x.. ' ' ..y.. ' 140 96 0 0 128')
		return 1
	end
end

addhook("hit","hnsteam_smokefreeze")
function hnsteam_freeze(target,weapon)
  if (weapon==53) then
		parse("speedmod "..target.." -100")
		return 1
	end
end

hit function will never be called when u hit with a smoke grenade, that's what projectile hook is for. So check in the projectile hook for every player if he's close to the grenade.

Re: Lua Scripts/Questions/Help

Sudden Death
User Off

Offline

26.06.10 08:18:52 am

@Drone
AaAaA Plisi no more chalenges in lua :S first you can test it okay? :X

Re: Lua Scripts/Questions/Help

Snake_Eater
User Off

Offline

26.06.10 09:36:02 am

Hi all! I want if I shoot somebody with deagle that this player teleports AND SPAWN again and again at a special place.For example at x=2160 y=784.
CAN ANYBODY SHOW ME A SCRIPT LIKE THIS PLS PLS??
I am repeating me but there is no good answer

Re: Lua Scripts/Questions/Help

DRoNe
User Off

Offline

26.06.10 04:09:29 pm

@Intrusion

care yourself ...

Re: Lua Scripts/Questions/Help

archmage
User Off

Offline

26.06.10 06:39:13 pm

I have an error that I don't understand: "chunk has too many syntax levels" what does it mean & how exactly to fix it?

Re: Lua Scripts/Questions/Help

Flacko
User Off

Offline

26.06.10 07:21:52 pm

Post the script please

1 2 … 211 212 213 … 338 339