42 lines
825 B
Plaintext
42 lines
825 B
Plaintext
HAI 1.3
|
|
CAN HAS STRING?
|
|
|
|
I HAS A string ITZ "::hello"
|
|
|
|
I HAS A char ITZ I IZ STRING'Z AT YR string AN YR 0 MKAY
|
|
VISIBLE char AN " - " AN "::"
|
|
|
|
BOTH SAEM char AN "::", O RLY?
|
|
YA RLY
|
|
VISIBLE "success"
|
|
NO WAI
|
|
VISIBLE "fail"
|
|
OIC
|
|
|
|
VISIBLE char AN " - " AN ":(3A)"
|
|
BOTH SAEM char AN ":(3A)", O RLY?
|
|
YA RLY
|
|
VISIBLE "success"
|
|
NO WAI
|
|
VISIBLE "fail"
|
|
OIC
|
|
|
|
I HAS A char2 ITZ I IZ STRING'Z AT YR string AN YR 1 MKAY
|
|
VISIBLE char2 AN " - " AN "h"
|
|
BOTH SAEM char2 AN "h", O RLY?
|
|
YA RLY
|
|
VISIBLE "success"
|
|
NO WAI
|
|
VISIBLE "fail"
|
|
OIC
|
|
|
|
I HAS A char3 ITZ "::"
|
|
VISIBLE char3 AN " - " AN "::"
|
|
BOTH SAEM char3 AN "::", O RLY?
|
|
YA RLY
|
|
VISIBLE "success"
|
|
NO WAI
|
|
VISIBLE "fail"
|
|
OIC
|
|
KTHXBYE
|