文字列の比較(Cランタイムライブラリ使用) | Codetter（こーどったー）

1
2
3
4
5
6
7
8
9
10
11
12
13
; http://www9.plala.or.jp/sgwr-t/lib/strcmp.html
#uselib "msvcrt.dll"
;#uselib "ntdll.dll"
#cfunc strcmp "strcmp" str, str
d@dummy = "<","=",">"
#define ctype show_cmp(%1, %2) d@dummy.(strcmp(%1, %2) + 1)
#define ctype str_cmp(%1, %2)  %1+" "+show_cmp(%1, %2)+" "+%2
mes str_cmp("ABC", "ABC")
mes str_cmp("ABC", "ABD")
mes str_cmp("ABC", "B")
mes str_cmp("ABC", "AAAA")
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX