编写speed速度控制模块程序： Speed进程首先根据start信号判断是否开始计费（实际情况即是否有顾客上车），然后根据输入的速度信号sp判定出行驶100m所需要的时钟clk个数kinside（车速越快则行驶100m所需的时间越少，即所需的clk个数越少，kinside越小）。同时由cnt对clk进行计数，当cnt=kinside时，把clkout信号置“1”，cnt清0.

好的，这是一个简单的速度控制模块程序，可以根据输入的速度信号sp来控制时钟clk的计数，以实现行驶100m所需的时钟clk个数kinside的计算，同时可以根据cnt和kinside来控制clkout信号的输出。下面是一个可能的实现方式：

module Speed (
    input start, // 判断是否开始计费的信号
    input [7:0] sp, // 速度信号
    output reg clkout // 时钟输出信号
);

reg [7:0] kinside; // 行驶100m所需的时钟clk个数
reg [7:0] cnt; // 计数器，用于计数clk的个数

always @(*) begin
    if (start) begin // 如果开始计费
        kinside = 100 / sp; // 计算kinside
        cnt = cnt + 1; // 计数器加1
        if (cnt == kinside) begin // 如果cnt达到kinside
            clkout = 1; // 置clkout为1
            cnt = 0; // 清零计数器
        end else begin
            clkout = 0; // 否则置clkout为0
        end
    end else begin
        kinside = 0; // 如果没有开始计费，kinside清零
        cnt = 0; // 计数器清零
        clkout = 0; // clkout清零
    end
end

endmodule

上面的代码中，使用了always @(*)语句，表示任何输入信号的变化都会引起该模块的运算，这样可以保证模块的实时性。同时，根据输入的start信号来判断是否开始计费，如果开始计费，则计算出kinside，然后在每个时钟周期中对cnt进行计数，当cnt达到kinside时，将clkout信号置1，并且清零计数器cnt。如果没有开始计费，则清零kinside、cnt和clkout。