mul.via

来自「一个用VB写的很好的编译器,功能超好,不过就是代码有点多,是进一步学习编译的好」· VIA 代码 · 共 20 行

// Mul.lnl

application PE GUI;

import MessageBox ascii lib "USER32.DLL",4;

entry
    string strTmp[80];
    dword dwM1; dword dwM2;
    dword dwProduct;

    dwM1 = 2; dwM2 = $FFFFFFFF;
    dwProduct = dwM1 * dwM2;
    Format(strTmp, "Multiplicand: %ld\nMultiplier: %ld",
           dwM1, dwM2);
    MessageBox(0, strTmp, "DBug", 0);
    Format(strTmp, "Product: %ld", dwProduct);
    MessageBox(0, strTmp, "DBug", 0);
end.