L2C 开源，有需要的吗？新版块，来占个位～～

seekyou2008

https:\/\/github.com/panshaogui/L2C

相关贴子：https:\/\/bbs.wuyou.net/forum.php?mod=viewthread&tid=452240

1. -- ==============================================
   
2. -- 05_ws2812.tl: L2C PIO HLS 点亮幻彩灯带 (Wokwi 靶场版)
   
3. -- ==============================================
   
4. 
   
5. -- @l2c_import: std/pico.tl
   
6. -- @l2c_include: clib/ws2812_helpers.h
   
7. 
   
8. -- 1. 思想域：降维级 WS2812 时序逻辑 (完美 11-Cycle 架构)
   
9. local function L2C_PIO_ws2812()
   
10.     -- 确保状态机启动时，接管引脚为输出模式
    
11.     set("pindirs", 1)
    
12. 
    
13.     ::bitloop::
    
14.     --  先取数据！如果没数据，PIO 会在这里挂起休眠。
    
15.     -- 因为此时处于循环的起点，引脚必然维持在上一周期的 LOW 状态，完美形成 50us RESET 信号！
    
16.     out("x", 1)
    
17. 
    
18.     -- 取到数据后，发送周期正式开始，拉高并消耗 2 个周期
    
19.     set("pins", "1 [1]")
    
20.     -- 判断跳转 (消耗 1 周期) -> 至此，无论如何电平都维持了 3 个周期的 HIGH (375ns)
    
21.     jmp("!x", "do_zero")
    
22. 
    
23.     ::do_one::
    
24.     -- 发送 1：继续保持 HIGH 4 周期 (总计 7 周期 = 875ns，完美符合 T1H)
    
25.     set("pins", "1 [3]")
    
26.     -- 拉低 LOW 2 周期 (250ns)
    
27.     set("pins", "0 [1]")
    
28.     -- 跳回循环，消耗 1 周期 LOW，加上 out 消耗的 1 周期 LOW，总 LOW 500ns 完美！
    
29.     jmp("bitloop")
    
30. 
    
31.     ::do_zero::
    
32.     -- 发送 0：立即拉低 LOW 4 周期
    
33.     set("pins", "0 [3]")
    
34.     -- 继续拉低 LOW 2 周期 (加上跳回，总计 8 周期 = 1000ns，完美符合 T0L)
    
35.     set("pins", "0 [1]")
    
36.     jmp("bitloop")
    
37. 
    
38. end
    
39. 
    
40. local type C_WS2812 = record
    
41.     c_pio_ws2812_init: function(integer)
    
42.     c_pio_ws2812_put: function(integer, integer, integer)
    
43. end
    
44. 
    
45. -- ===============================================
    
46. -- 2. 物理执行域 (主循环)
    
47. -- ===============================================
    
48. C_PICO.stdio_init_all()
    
49. 
    
50. local PIN_DIN = 15
    
51. C_WS2812.c_pio_ws2812_init(PIN_DIN)
    
52. 
    
53. print(" L2C WS2812 幻彩驱动已启动！")
    
54. 
    
55. local offset = 0
    
56. while true do
    
57.     for i = 0, 7 do
    
58.         local r = 0
    
59.         local g = 0
    
60.         local b = 0
    
61.         
    
62.         -- 流星拖尾算法
    
63.         if i == offset then
    
64.             r = 255 -- 领头红
    
65.         elseif i == ((offset + 1) % 8) then
    
66.             g = 255 -- 拖尾绿
    
67.         elseif i == ((offset + 2) % 8) then
    
68.             b = 255 -- 拖尾蓝
    
69.         else
    
70.             -- 极其微弱的白光，证明芯片活着
    
71.             r = 2
    
72.             g = 2
    
73.             b = 2
    
74.         end
    
75.         
    
76.         C_WS2812.c_pio_ws2812_put(r, g, b)
    
77.     end
    
78. 
    
79.     offset = (offset + 1) % 8
    
80.     C_PICO.sleep_us(100000) -- 每 100ms 刷新一帧

复制代码

1. -- ==============================================
   
2. -- 09_hls_counter.tl: L2C HLS 时序逻辑降维测试
   
3. -- ==============================================
   
4. 
   
5. -- 思想域：带记忆的硬件计数器 (注意 L2C_HDL_SEQ_ 前缀！)
   
6. -- 它的每一次运算都需要外部提供一个时钟上升沿信号 (Tick)
   
7. local function L2C_HDL_SEQ_Counter(step: integer): integer
   
8.     -- 声明一个带有记忆功能的寄存器 (D触发器)，复位初始值为 0
   
9.     local count = HDL_Reg(0)
   
10.    
    
11.     -- 在每一个时钟周期，将当前计数值与外部输入的 step 相加，塞回寄存器
    
12.     count = count + step
    
13.    
    
14.     -- 将寄存器的实时引脚状态连到输出总线
    
15.     return count
    
16. end
    
17. 
    
18. -- 物理域：随便留个入口防止报错
    
19. global function main(): integer
    
20.     print("Verilog Sequential HLS test...")
    
21.     return 0
    

复制代码

39438006@qq.com

厉害了楼主，感谢，好人一生平安🙏

ZMLoveLH

感谢楼主的无私分享啊

a66

支持，很不错~

左岸麦田

谷歌翻译...

dvd2010@126.com

这是什么软件呢、

seekyou2008

dvd2010@126.com 发表于 2026-7-22 16:18
这是什么软件呢、

简单来说，就是用lua来写脚本，生成纯c，然后用在单片机或其它类似场景。

黑先森

好的。不错

it323

不错，可以试一下。

yyz219195888

支持发布

ebaqiang

惭愧，第一次听说。

aka144

感谢分享