Forth的控制结构有些奇怪。首先，因为它是一种反向波兰符号语言，条件在IF之前，如:

x 0 = IF

现在，要关闭条件块，使用关键字THEN:

x 0 = IF ." Equals zero!" THEN

现在真正的WTF开始了。IF所做的是编译一个有条件的前向跳转，并将跳转偏移量的地址放在堆栈上。当找到THEN时，它从堆栈中弹出该地址，计算实际偏移量，然后编译它。另一方面，ELSE编译一个条件向前跳转，从堆栈中弹出一个地址，将一个新地址压入堆栈，计算弹出地址的偏移量，然后编译该偏移量。这意味着语法是这样的:

x 0 = IF ." Equals zero!" ELSE ." Not equal to zero!" THEN

第一个和第二个语句是这样编译的:

x LITERAL 0 = (0BRANCH) LITERAL offset SLITERAL" Equals zero!" (DOTQ)
x LITERAL 0 = (0BRANCH) LITERAL offset SLITERAL" Equals zero!" (DOTQ) BRANCH LITERAL offset SLITERAL" Not equal to zero!" (DOTQ)

更奇怪的是，这种行为并不隐藏。它是该语言的ANSI规范的一部分，可以通过构造自定义流控制结构或以有趣的方式组合它们来自由利用。例如，Forth的WHILE循环:

BEGIN x 10 < WHILE x 1+ to x REPEAT

BEGIN和WHILE之间的部分是任意代码，因此实际上可以在单个控制结构中让代码在条件测试之前和之后执行。这是故意的，但下面的内容虽然是允许的，但却不允许:

BEGIN DUP 2 > WHILE DUP 5 < WHILE DUP 1+ REPEAT 123 ELSE 345 THEN 

它利用了每个控制流字的工作方式来组合两个WHILE语句，并为每个出口添加不同的后循环代码来引导。为了表明我不是在开玩笑，我只是从互联网上的一个代码中复制了这个小片段，并进行了一些小的修改来简化它。

Python for循环中的else。

来自Python文档:

for n in range(2, 10):
    for x in range(2, n):
        if n % x == 0:
            print n, 'equals', x, '*', n/x
            break
    else:
        # loop fell through without finding a factor
        print n, 'is a prime number'

输出:

2 is a prime number
3 is a prime number
4 equals 2 * 2
5 is a prime number
6 equals 2 * 3
7 is a prime number
8 equals 2 * 4
9 equals 3 * 3

这里有一大堆奇怪的C特性:http://www.steike.com/code/useless/evil-c/

哈哈！

整个语言本身。虽然不完全是WTF的事情，但我从来没有遇到过一种语言在我的脑海中以一种刺耳的卡通声音播放。我以前也从来没有看过代码并想要惊呼“啊啊啊啊可爱!”

这个程序显示数字1-10并终止

HAI
CAN HAS STDIO?
IM IN YR LOOP UPPIN YR VAR TIL BOTHSAEM VAR AN 10
    VISIBLE SUM OF VAR AN 1
IM OUTTA YR LOOP
KTHXBYE

在ruby/python/c中，你可以像这样连接字符串:

a = "foo" "bar"
print a # => "foobar"

在FoxPro中，如果我没记错的话，每个命令都可以缩写为4个字符，其他的都被忽略，所以READ, READY, READINESS都是一样的——前4个字符之后的都被忽略。向我解释的人喜欢这个功能，但我觉得它很恐怖。