FreeVBCode code snippet: Adding Machine