16bit checksumを計算する。
checksum16 <intvar> <string> checksum16file <intvar> <filename>
引数の文字列およびファイルから加算サム(16bit)を計算する。
計算結果は intvar 変数に数値として格納される。
checksum16file でファイルが開けなかった場合は、result 変数に -1 が格納される。
str = 'this is a test string to be checksum16ed' checksum16 crc str ; Display checksum16 result asHEX sprintf '0x%08X' crc messagebox inputstr 'checksum16 = ' checksum16file crc 'foo.bin' if result = -1 then messagebox 'file open error' 'checksum16file = ' else sprintf '0x%08X' crc messagebox inputstr 'checksum16file = ' endif