请列举CAPL自动化测试的代码

以下是一些CAPL自动化测试的代码示例：

1. 简单的CAN消息发送和接收：

on start {
  message msg;
  msg.id = 0x123;
  msg.dlc = 8;
  msg.data[0] = 0x11;
  msg.data[1] = 0x22;
  msg.data[2] = 0x33;
  msg.data[3] = 0x44;
  msg.data[4] = 0x55;
  msg.data[5] = 0x66;
  msg.data[6] = 0x77;
  msg.data[7] = 0x88;
  output(msg);
}

on message CAN1::0x123 {
  write("Received message: ");
  writehexbyte(this.dlc);
  write(" ");
  writehexbyte(this.data[0]);
  write(" ");
  writehexbyte(this.data[1]);
  write(" ");
  writehexbyte(this.data[2]);
  write(" ");
  writehexbyte(this.data[3]);
  write(" ");
  writehexbyte(this.data[4]);
  write(" ");
  writehexbyte(this.data[5]);
  write(" ");
  writehexbyte(this.data[6]);
  write(" ");
  writehexbyte(this.data[7]);
}

2. 通过定时器触发事件：

on timer event {
  write("Timer event occurred.");
}

on start {
  setTimer(event, 1000); // 1 second
}

3. 通过用户输入触发事件：

on key 'a' {
  write("User pressed 'a' key.");
}

on key 'b' {
  write("User pressed 'b' key.");
}

4. 通过系统事件触发事件：

on sysvar SystemState {
  write("System state changed to: ");
  write(this);
}

5. 使用函数进行数据处理：

int add(int a, int b) {
  return a + b;
}

on start {
  int result = add(2, 3);
  write("Result: ");
  write(result);
}