Lua应用场景 #

-- NPC 行为脚本
local NPC = {}

function NPC:on_update(dt)
    if self.state == "idle" then
        self:idle_behavior(dt)
    elseif self.state == "patrol" then
        self:patrol_behavior(dt)
    elseif self.state == "chase" then
        self:chase_behavior(dt)
    end
end

function NPC:idle_behavior(dt)
    if self:can_see_player() then
        self.state = "chase"
    end
end

function NPC:patrol_behavior(dt)
    local target = self.patrol_points[self.current_point]
    self:move_towards(target, dt)
    
    if self:reached_point(target) then
        self.current_point = (self.current_point % #self.patrol_points) + 1
    end
    
    if self:can_see_player() then
        self.state = "chase"
    end
end

function NPC:chase_behavior(dt)
    if not self:can_see_player() then
        self.state = "patrol"
        return
    end
    
    self:move_towards(self.player.position, dt)
    
    if self:in_attack_range() then
        self:attack()
    end
end

return NPC

-- 武器配置
weapons = {
    sword = {
        name = "铁剑",
        damage = 10,
        speed = 1.2,
        range = 1.5,
        cost = 100
    },
    bow = {
        name = "长弓",
        damage = 8,
        speed = 0.8,
        range = 10,
        cost = 150
    },
    staff = {
        name = "法杖",
        damage = 15,
        speed = 0.6,
        range = 8,
        cost = 200
    }
}

-- 关卡配置
levels = {
    {
        name = "新手村",
        enemies = {{"slime", 5}, {"goblin", 3}},
        rewards = {gold = 100, exp = 50}
    },
    {
        name = "黑暗森林",
        enemies = {{"wolf", 4}, {"bear", 2}},
        rewards = {gold = 200, exp = 100}
    }
}

-- API 网关
local function handle_request()
    local uri = ngx.var.uri
    local method = ngx.req.get_method()
    
    -- 路由
    local routes = {
        ["/api/users"] = handle_users,
        ["/api/products"] = handle_products,
        ["/api/orders"] = handle_orders
    }
    
    local handler = routes[uri]
    if handler then
        handler(method)
    else
        ngx.status = 404
        ngx.say('{"error": "Not found"}')
    end
end

-- Kong 插件
local plugin = {
    NAME = "my-plugin",
    VERSION = "1.0.0"
}

function plugin:access(conf)
    -- 请求拦截
    local token = kong.request.get_header("Authorization")
    
    if not token then
        return kong.response.exit(401, {error = "Missing token"})
    end
    
    -- 验证 token
    local valid = validate_token(token)
    if not valid then
        return kong.response.exit(401, {error = "Invalid token"})
    end
    
    -- 设置用户信息
    kong.service.request.set_header("X-User-Id", valid.user_id)
end

return plugin

-- Lapis 框架示例
local lapis = require("lapis")
local app = lapis.Application()

app:match("/", function(self)
    return {render = "index"}
end)

app:match("/users/:id", function(self)
    local user = get_user(self.params.id)
    return {json = user}
end)

app:match("/api/login", respond_to({
    POST = function(self)
        local user = authenticate(self.params.username, self.params.password)
        if user then
            return {json = {token = create_token(user)}}
        else
            return {status = 401, json = {error = "Invalid credentials"}}
        end
    end
}))

return app

-- WiFi 连接
wifi.setmode(wifi.STATION)
wifi.sta.config("SSID", "password")

wifi.sta.eventMonReg(wifi.STA_GOTIP, function()
    print("Connected! IP: " .. wifi.sta.getip())
    
    -- 启动 HTTP 服务器
    local server = net.createServer(net.TCP)
    server:listen(80, function(conn)
        conn:on("receive", function(sck, req)
            sck:send("HTTP/1.1 200 OK\r\n\r\nHello from ESP!")
            sck:close()
        end)
    end)
end)

-- 传感器读取
local sensor_pin = 4
gpio.mode(sensor_pin, gpio.INPUT)

tmr.create():alarm(1000, tmr.ALARM_AUTO, function()
    local value = gpio.read(sensor_pin)
    print("Sensor: " .. value)
    
    -- 发送到服务器
    http.post("http://api.example.com/sensor",
        "Content-Type: application/json\r\n",
        '{"value": ' .. value .. '}')
end)

-- 网络监控脚本
local uci = require("uci")
local x = uci.cursor()

-- 获取网络配置
local function get_network_config()
    local config = {}
    x:foreach("network", "interface", function(s)
        config[s[".name"]] = {
            ipaddr = s.ipaddr,
            netmask = s.netmask,
            gateway = s.gateway
        }
    end)
    return config
end

-- 流量统计
local function get_traffic_stats()
    local file = io.open("/proc/net/dev", "r")
    local stats = {}
    
    for line in file:lines() do
        local iface, rx, tx = line:match("(%S+):%s*(%d+)%s+%d+%s+%d+%s+%d+%s+%d+%s+%d+%s+%d+%s+%d+%s+(%d+)")
        if iface then
            stats[iface] = {rx = rx, tx = tx}
        end
    end
    
    file:close()
    return stats
end

-- 端口扫描脚本
description = "检测 HTTP 服务"

categories = {"default", "safe"}

portrule = function(host, port)
    return port.protocol == "tcp" and port.state == "open"
end

action = function(host, port)
    local result = {}
    
    -- 发送 HTTP 请求
    local socket = nmap.new_socket()
    socket:connect(host.ip, port.number)
    
    socket:send("GET / HTTP/1.0\r\n\r\n")
    
    local response
    socket:receive_lines(response)
    
    -- 解析响应
    local server = response:match("[Ss]erver:%s*(.-)\r\n")
    if server then
        table.insert(result, "Server: " .. server)
    end
    
    socket:close()
    return stdnse.format_output(true, result)
end

-- 协议解析器
local my_protocol = Proto("MyProtocol", "My Custom Protocol")

local fields = my_protocol.fields
fields.version = ProtoField.uint8("myprotocol.version", "Version")
fields.type = ProtoField.uint8("myprotocol.type", "Type")
fields.length = ProtoField.uint16("myprotocol.length", "Length")
fields.data = ProtoField.bytes("myprotocol.data", "Data")

function my_protocol.dissector(buffer, pinfo, tree)
    pinfo.cols.protocol = "MyProtocol"
    
    local subtree = tree:add(my_protocol, buffer())
    
    subtree:add(fields.version, buffer(0, 1))
    subtree:add(fields.type, buffer(1, 1))
    subtree:add(fields.length, buffer(2, 2))
    subtree:add(fields.data, buffer(4))
end

-- 导出插件
local LrExportSession = import "LrExportSession"
local LrPathUtils = import "LrPathUtils"

local exportServiceProvider = {}

function exportServiceProvider.processRenderedPhotos(functionContext, exportContext)
    local exportSession = exportContext.exportSession
    local photos = exportSession:photosToExport()
    
    for i, photo in ipairs(photos) do
        local path = exportSession:renditionPath(photo)
        
        -- 处理照片
        process_photo(path)
    end
end

return exportServiceProvider

-- VLC 扩展
function descriptor()
    return {
        title = "My Extension",
        version = "1.0",
        author = "Author",
        url = "https://example.com",
        description = "Extension description"
    }
end

function activate()
    vlc.msg.info("Extension activated")
end

function deactivate()
    vlc.msg.info("Extension deactivated")
end

function menu()
    return {"Action 1", "Action 2"}
end

function trigger_menu(id)
    if id == 1 then
        action1()
    elseif id == 2 then
        action2()
    end
end

-- 应用配置
config = {
    app_name = "MyApp",
    version = "1.0.0",
    
    server = {
        host = "localhost",
        port = 8080,
        workers = 4
    },
    
    database = {
        driver = "mysql",
        host = "localhost",
        port = 3306,
        name = "myapp",
        user = "root",
        password = "secret"
    },
    
    cache = {
        enabled = true,
        ttl = 3600,
        max_size = 1000
    },
    
    logging = {
        level = "info",
        file = "/var/log/myapp.log",
        max_size = "10M"
    }
}

-- 游戏数据定义
local items = {
    {
        id = 1,
        name = "Health Potion",
        type = "consumable",
        effect = {hp = 50},
        price = 10,
        stackable = true,
        max_stack = 99
    },
    {
        id = 2,
        name = "Iron Sword",
        type = "weapon",
        stats = {attack = 10, speed = 1.0},
        price = 100,
        slot = "main_hand"
    }
}