00401F87 . 50 PUSH EAX
00401F88 . FF15 40104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaVarTs>; MSVBVM60.__vbaVarTstEq
00401F8E . 8D4D E4 LEA ECX,DWORD PTR SS:[EBP-1C]
00401F91 . 8BF0 MOV ESI,EAX
00401F93 . FF15 94104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaFreeO>; MSVBVM60.__vbaFreeObj
00401F99 . 8D8D 34FFFFFF LEA ECX,DWORD PTR SS:[EBP-CC]
00401F9F . FF15 0C104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaFreeV>; MSVBVM60.__vbaFreeVar
00401FA5 . B9 04000280 MOV ECX,80020004
00401FAA . B8 0A000000 MOV EAX,0A
00401FAF . 66:3BF3 CMP SI,BX
00401FB2 . 894D AC MOV DWORD PTR SS:[EBP-54],ECX
00401FB5 . 8945 A4 MOV DWORD PTR SS:[EBP-5C],EAX
00401FB8 . 894D BC MOV DWORD PTR SS:[EBP-44],ECX
00401FBB . 8B35 80104000 MOV ESI,DWORD PTR DS:[<&MSVBVM60.__vbaVa>; MSVBVM60.__vbaVarDup
00401FC1 . BF 08000000 MOV EDI,8
00401FC6 . 8945 B4 MOV DWORD PTR SS:[EBP-4C],EAX
00401FC9 . C785 0CFFFFFF >MOV DWORD PTR SS:[EBP-F4],habo3unp.00401>; UNICODE "Habo 3"
00401FD3 . 89BD 04FFFFFF MOV DWORD PTR SS:[EBP-FC],EDI
00401FD9 . 8D95 04FFFFFF LEA EDX,DWORD PTR SS:[EBP-FC]
00401FDF . 8D4D C4 LEA ECX,DWORD PTR SS:[EBP-3C]
00401FE2 . 74 46 JE SHORT habo3unp.0040202A
00401FE4 . FFD6 CALL ESI ; <&MSVBVM60.__vbaVarDup>
00401FE6 . 8D95 14FFFFFF LEA EDX,DWORD PTR SS:[EBP-EC]
00401FEC . 8D4D D4 LEA ECX,DWORD PTR SS:[EBP-2C]
00401FEF . C785 1CFFFFFF >MOV DWORD PTR SS:[EBP-E4],habo3unp.00401>; 180
00401FF9 . 89BD 14FFFFFF MOV DWORD PTR SS:[EBP-EC],EDI
00401FFF . FFD6 CALL ESI ; <&MSVBVM60.__vbaVarDup>
00402001 . 8D4D A4 LEA ECX,DWORD PTR SS:[EBP-5C]
00402004 . 8D55 B4 LEA EDX,DWORD PTR SS:[EBP-4C]
00402007 . 51 PUSH ECX
00402008 . 8D45 C4 LEA EAX,DWORD PTR SS:[EBP-3C]
0040200B . 52 PUSH EDX
0040200C . 50 PUSH EAX
0040200D . 8D4D D4 LEA ECX,DWORD PTR SS:[EBP-2C]
00402010 . 53 PUSH EBX
00402011 . 51 PUSH ECX
00402012 . FF15 28104000 CALL DWORD PTR DS:[<&MSVBVM60.#595>] ; MSVBVM60.rtcMsgBox
00402018 . 8D55 A4 LEA EDX,DWORD PTR SS:[EBP-5C]
0040201B . 8D45 B4 LEA EAX,DWORD PTR SS:[EBP-4C]
0040201E . 52 PUSH EDX
0040201F . 8D4D C4 LEA ECX,DWORD PTR SS:[EBP-3C]
00402022 . 50 PUSH EAX
00402023 . 8D55 D4 LEA EDX,DWORD PTR SS:[EBP-2C]
00402026 . 51 PUSH ECX
00402027 . 52 PUSH EDX
00402028 . EB 44 JMP SHORT habo3unp.0040206E
0040202A > FFD6 CALL ESI
0040202C . 8D95 14FFFFFF LEA EDX,DWORD PTR SS:[EBP-EC]
00402032 . 8D4D D4 LEA ECX,DWORD PTR SS:[EBP-2C]
00402035 . C785 1CFFFFFF >MOV DWORD PTR SS:[EBP-E4],habo3unp.00401>; 180
0040203F . 89BD 14FFFFFF MOV DWORD PTR SS:[EBP-EC],EDI
00402045 . FFD6 CALL ESI
00402047 . 8D45 A4 LEA EAX,DWORD PTR SS:[EBP-5C]
0040204A . 8D4D B4 LEA ECX,DWORD PTR SS:[EBP-4C]
0040204D . 50 PUSH EAX
0040204E . 8D55 C4 LEA EDX,DWORD PTR SS:[EBP-3C]
00402051 . 51 PUSH ECX
00402052 . 52 PUSH EDX
00402053 . 8D45 D4 LEA EAX,DWORD PTR SS:[EBP-2C]
00402056 . 53 PUSH EBX
00402057 . 50 PUSH EAX
00402058 . FF15 28104000 CALL DWORD PTR DS:[<&MSVBVM60.#595>] ; MSVBVM60.rtcMsgBox
0040205E . 8D4D A4 LEA ECX,DWORD PTR SS:[EBP-5C]
00402061 . 8D55 B4 LEA EDX,DWORD PTR SS:[EBP-4C]
00402064 . 51 PUSH ECX
00402065 . 8D45 C4 LEA EAX,DWORD PTR SS:[EBP-3C]
00402068 . 52 PUSH EDX
00402069 . 8D4D D4 LEA ECX,DWORD PTR SS:[EBP-2C]
0040206C . 50 PUSH EAX