OPK Adress Release ^^

loc_00413B40: push ebp
loc_00413B41: mov ebp, esp
loc_00413B43: sub esp, 0000000Ch
loc_00413B46: push 00401746h ; MSVBVM60.DLL.__vbaExceptHandler
loc_00413B4B: mov eax, fs: [00h]
loc_00413B51: push eax
loc_00413B52: mov fs: [00000000h] , esp
loc_00413B59: sub esp, 00000034h
loc_00413B5C: push ebx
loc_00413B5D: push esi
loc_00413B5E: push edi
loc_00413B5F: mov var_0C, esp
loc_00413B62: mov var_08, 00401528h
loc_00413B69: mov esi, arg_08
loc_00413B6C: mov eax, esi
loc_00413B6E: and eax, 00000001h
loc_00413B71: mov var_04, eax
loc_00413B74: and esi, FFFFFFFEh
loc_00413B77: push esi
loc_00413B78: mov arg_08, esi
loc_00413B7B: mov ecx, [esi]
loc_00413B7D: Call [ecx+04h]
loc_00413B80: mov edx, [esi]
loc_00413B82: xor edi, edi
loc_00413B84: push esi
loc_00413B85: mov var_18, edi
loc_00413B88: mov var_1C, edi
loc_00413B8B: mov var_20, edi
loc_00413B8E: mov var_30, edi
loc_00413B91: mov var_34, edi
loc_00413B94: mov var_38, edi
loc_00413B97: Call [edx+000003B4h]
loc_00413B9D: push eax
loc_00413B9E: lea eax, var_20
loc_00413BA1: push eax
loc_00413BA2: call [00401058h] ; Set (object)
loc_00413BA8: mov esi, eax
loc_00413BAA: push 0000FF00h
loc_00413BAF: push esi
loc_00413BB0: mov ecx, [esi]
loc_00413BB2: Call [ecx+5Ch]
loc_00413BB5: cmp eax, edi
loc_00413BB7: fclex
loc_00413BB9: jnl 413BCAh
loc_00413BBB: push 0000005Ch
loc_00413BBD: push 00403F5Ch
loc_00413BC2: push esi
loc_00413BC3: push eax
loc_00413BC4: call MSVBVM60.DLL.__vbaHresultCheckObj
loc_00413BCA: lea ecx, var_20
loc_00413BCD: call MSVBVM60.DLL.__vbaFreeObj
loc_00413BD3: mov esi, [00401104h]
loc_00413BD9: mov edx, 004044B8h
loc_00413BDE: lea ecx, var_1C
loc_00413BE1: call MSVBVM60.DLL.__vbaStrCopy
loc_00413BE3: mov edx, 00403F70h ; "WarRock"
loc_00413BE8: lea ecx, var_18
loc_00413BEB: mov var_34, 00411093h ; "ÿÿPUÌQE¸RPè\¸ "
loc_00413BF2: call MSVBVM60.DLL.__vbaStrCopy
loc_00413BF4: lea edx, var_1C
loc_00413BF7: lea eax, var_34
loc_00413BFA: push edx
loc_00413BFB: lea ecx, var_18
loc_00413BFE: push eax
loc_00413BFF: lea edx, var_30
loc_00413C02: push ecx
loc_00413C03: push edx
loc_00413C04: call 0041CC00h
loc_00413C09: lea eax, var_1C
loc_00413C0C: lea ecx, var_18
loc_00413C0F: push eax
loc_00413C10: push ecx
loc_00413C11: push 00000002h
loc_00413C13: call MSVBVM60.DLL.__vbaFreeStrList
loc_00413C19: mov edi, MSVBVM60.DLL.__vbaFreeVar
loc_00413C1F: add esp, 0000000Ch
loc_00413C22: lea ecx, var_30
loc_00413C25: Call edi
loc_00413C27: mov edx, 00403F70h ; "WarRock"
loc_00413C2C: lea ecx, var_18
loc_00413C2F: mov var_38, 24548B90h ; "MZ"
loc_00413C36: mov var_34, 00411098h ; "ÌQE¸RPè\¸"
loc_00413C3D: call MSVBVM60.DLL.__vbaStrCopy
loc_00413C3F: lea edx, var_38
loc_00413C42: lea eax, var_34
loc_00413C45: push edx
loc_00413C46: lea ecx, var_18
loc_00413C49: push eax
loc_00413C4A: lea edx, var_30
loc_00413C4D: push ecx
loc_00413C4E: push edx
loc_00413C4F: call 0041C900h
loc_00413C54: mov ebx, MSVBVM60.DLL.__vbaFreeStr
loc_00413C5A: lea ecx, var_18
loc_00413C5D: Call ebx
loc_00413C5F: lea ecx, var_30
loc_00413C62: Call edi
loc_00413C64: mov edx, 004044DCh ; "BB 00 A0 8C 45"
loc_00413C69: lea ecx, var_1C
loc_00413C6C: call MSVBVM60.DLL.__vbaStrCopy
loc_00413C6E: mov edx, 00403F70h ; "WarRock"
loc_00413C73: lea ecx, var_18
loc_00413C76: mov var_34, 0090001Ch ; "MZ"
loc_00413C7D: call MSVBVM60.DLL.__vbaStrCopy
loc_00413C7F: lea eax, var_1C
loc_00413C82: lea ecx, var_34
loc_00413C85: push eax
loc_00413C86: lea edx, var_18
loc_00413C89: push ecx
loc_00413C8A: lea eax, var_30
loc_00413C8D: push edx
loc_00413C8E: push eax
loc_00413C8F: call 0041CC00h
loc_00413C94: lea ecx, var_1C
loc_00413C97: lea edx, var_18
loc_00413C9A: push ecx
loc_00413C9B: push edx
loc_00413C9C: push 00000002h
loc_00413C9E: call MSVBVM60.DLL.__vbaFreeStrList
loc_00413CA4: add esp, 0000000Ch
loc_00413CA7: lea ecx, var_30
loc_00413CAA: Call edi
loc_00413CAC: mov edx, 00403F70h ; "WarRock"
loc_00413CB1: lea ecx, var_18
loc_00413CB4: mov var_38, 000000B8h
loc_00413CBB: mov var_34, 00900021h ; "MZ"
loc_00413CC2: call MSVBVM60.DLL.__vbaStrCopy
loc_00413CC4: lea eax, var_38
loc_00413CC7: lea ecx, var_34
loc_00413CCA: push eax
loc_00413CCB: lea edx, var_18
loc_00413CCE: push ecx
loc_00413CCF: lea eax, var_30
loc_00413CD2: push edx
loc_00413CD3: push eax
loc_00413CD4: call 0041C900h
loc_00413CD9: lea ecx, var_18
loc_00413CDC: Call ebx
loc_00413CDE: lea ecx, var_30
loc_00413CE1: Call edi
loc_00413CE3: mov edx, 00403F70h ; "WarRock"
loc_00413CE8: lea ecx, var_18
loc_00413CEB: mov var_38, 017C9989h ; "MZ"
loc_00413CF2: mov var_34, 00900026h ; "MZ"
loc_00413CF9: call MSVBVM60.DLL.__vbaStrCopy
loc_00413CFB: lea ecx, var_38
loc_00413CFE: lea edx, var_34
loc_00413D01: push ecx
loc_00413D02: lea eax, var_18
loc_00413D05: push edx
loc_00413D06: lea ecx, var_30
loc_00413D09: push eax
loc_00413D0A: push ecx
loc_00413D0B: call 0041C900h
loc_00413D10: lea ecx, var_18
loc_00413D13: Call ebx
loc_00413D15: lea ecx, var_30
loc_00413D18: Call edi
loc_00413D1A: mov edx, 00403F70h ; "WarRock"
loc_00413D1F: lea ecx, var_18
loc_00413D22: mov var_38, 01808189h ; "MZ"
loc_00413D29: mov var_34, 0090002Ch ; "MZ"
loc_00413D30: call MSVBVM60.DLL.__vbaStrCopy
loc_00413D32: lea edx, var_38
loc_00413D35: lea eax, var_34
loc_00413D38: push edx
loc_00413D39: lea ecx, var_18
loc_00413D3C: push eax
loc_00413D3D: lea edx, var_30
loc_00413D40: push ecx
loc_00413D41: push edx
loc_00413D42: call 0041C900h
loc_00413D47: lea ecx, var_18
loc_00413D4A: Call ebx
loc_00413D4C: lea ecx, var_30
loc_00413D4F: Call edi
loc_00413D51: mov edx, 00403F70h ; "WarRock"
loc_00413D56: lea ecx, var_18
loc_00413D59: mov var_38, 01849989h ; "MZ"
loc_00413D60: mov var_34, 00900032h ; "MZ"
loc_00413D67: call MSVBVM60.DLL.__vbaStrCopy
loc_00413D69: lea eax, var_38
loc_00413D6C: lea ecx, var_34
loc_00413D6F: push eax
loc_00413D70: lea edx, var_18
loc_00413D73: push ecx
loc_00413D74: lea eax, var_30
loc_00413D77: push edx
loc_00413D78: push eax
loc_00413D79: call 0041C900h
loc_00413D7E: lea ecx, var_18
loc_00413D81: Call ebx
loc_00413D83: lea ecx, var_30
loc_00413D86: Call edi
loc_00413D88: mov edx, 00404500h
loc_00413D8D: lea ecx, var_1C
loc_00413D90: call MSVBVM60.DLL.__vbaStrCopy
loc_00413D92: mov edx, 00403F70h ; "WarRock"
loc_00413D97: lea ecx, var_18
loc_00413D9A: mov var_34, 00900038h ; "MZ"
loc_00413DA1: call MSVBVM60.DLL.__vbaStrCopy
loc_00413DA3: lea ecx, var_1C
loc_00413DA6: lea edx, var_34
loc_00413DA9: push ecx
loc_00413DAA: lea eax, var_18
loc_00413DAD: push edx
loc_00413DAE: lea ecx, var_30
loc_00413DB1: push eax
loc_00413DB2: push ecx
loc_00413DB3: call 0041CC00h
loc_00413DB8: lea edx, var_1C
loc_00413DBB: lea eax, var_18
loc_00413DBE: push edx
loc_00413DBF: push eax
loc_00413DC0: push 00000002h
loc_00413DC2: call MSVBVM60.DLL.__vbaFreeStrList
loc_00413DC8: add esp, 0000000Ch
loc_00413DCB: lea ecx, var_30
loc_00413DCE: Call edi
loc_00413DD0: mov edx, 00403F70h ; "WarRock"
loc_00413DD5: lea ecx, var_18
loc_00413DD8: mov var_38, 00000090h
loc_00413DDF: mov var_34, 0090003Dh ; "MZ"
loc_00413DE6: call MSVBVM60.DLL.__vbaStrCopy
loc_00413DE8: lea ecx, var_38
loc_00413DEB: lea edx, var_34
loc_00413DEE: push ecx
loc_00413DEF: lea eax, var_18
loc_00413DF2: push edx
loc_00413DF3: lea ecx, var_30
loc_00413DF6: push eax
loc_00413DF7: push ecx
loc_00413DF8: call 0041C900h
loc_00413DFD: lea ecx, var_18
loc_00413E00: Call ebx
loc_00413E02: lea ecx, var_30
loc_00413E05: Call edi
loc_00413E07: mov var_04, 00000000h
loc_00413E0E: push 00413E3Ch
loc_00413E13: jmp 413E3Bh
loc_00413E15: lea edx, var_1C
loc_00413E18: lea eax, var_18
loc_00413E1B: push edx
loc_00413E1C: push eax
loc_00413E1D: push 00000002h
loc_00413E1F: call MSVBVM60.DLL.__vbaFreeStrList
loc_00413E25: add esp, 0000000Ch
loc_00413E28: lea ecx, var_20
loc_00413E2B: call MSVBVM60.DLL.__vbaFreeObj
loc_00413E31: lea ecx, var_30
loc_00413E34: call MSVBVM60.DLL.__vbaFreeVar
loc_00413E3A: ret

where to put this code lolz?
Is this real or fake?