changeset 10613 | f2597a21f562 |
parent 10611 | 58cad46782ff |
child 10615 | e3dcb235a354 |
10611:58cad46782ff | 10613:f2597a21f562 |
---|---|
2275 |
2275 |
2276 |
2276 |
2277 function lc_addPoint(L : Plua_State) : LongInt; Cdecl; |
2277 function lc_addPoint(L : Plua_State) : LongInt; Cdecl; |
2278 var np, param: integer; |
2278 var np, param: integer; |
2279 begin |
2279 begin |
2280 if CheckAndFetchParamCountRange(L, 2, 4, 'AddPoint', 'x, y, width [, erase]', np) then |
2280 if CheckAndFetchParamCountRange(L, 2, 4, 'AddPoint', 'x, y [, width [, erase] ]', np) then |
2281 begin |
2281 begin |
2282 // x |
2282 // x |
2283 param:= lua_tointeger(L,1); |
2283 param:= lua_tointeger(L,1); |
2284 PointsBuffer:= PointsBuffer + char((param and $FF00) shr 8); |
2284 PointsBuffer:= PointsBuffer + char((param and $FF00) shr 8); |
2285 PointsBuffer:= PointsBuffer + char((param and $FF)); |
2285 PointsBuffer:= PointsBuffer + char((param and $FF)); |