我想用Viginere系统解码一个Codet文本（给出了密钥），但是我的代码在运行时给我一个错误。
错误：整数->字符：违反合同 预期：（和/ c（整数输入0＃x10FFFF）（非/ c（整数输入＃xD800 #xDFFF））） 给出：-78
如果有人可以帮助我，那就太好了，谢谢。
（定义（解码文本键） （开始（字符串->列表文本）（字符串->列表键）'（）））
（定义（开始文本键ausgabe） （cond（（null？text）（list-> string ausgabe）） （（null？键）（开始文本ausgabe）） （否则（开始（其余文本） （休息键） （追加ausgabe（列表（integer-> char（-（取模（-（+（char-> integer（第一个键）））97）（+（char-> integer（第一个文本））97））26）97）） ））））））