аЯрЁБс>ўџ ўџџџ{џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8сЙ ввв` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ^W8l-Ї$ H ?'Xџ%'8џ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџ?'Xџ%'8џ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџ?'Xџ%'8џ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџ?'Xџ%'8џ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџ?'XssetModџџџџџџџџ: objListFrmџџџџџџџџџџџџ_} __SRP_8џџџџџџџџџџџџkž__SRP_9џџџџh–Root Entryџџџџџџџџ€Љющ%Ф@VBA_ProjectџџџџА0ZƒЙФ€Љющ%ФVBA_Project_Version(џџџџџџџџџџџџVBAџџџџџџџџPЗ[ƒЙФ Lёц%Ф§џџџ  591!"#:%&'()*+,.Ё†0O234 6@8AU;<=>?I-BCDEFGHKJ/ўџџџMNQPRZSTVВWXY\[_]^o`abcdefghiўџџџklmnspqrЌtuvwxyz|§џџџ}~€ўџџџўџџџ ўџџџPQ !"#$%&'()*+ўџџџ-ўџџџ/0123456789:ўџџџ<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^ўџџџ`abcdefgЙij’lmnopqrstuvwxyz{|}ўџџџ€acadK№бН‹…бБjР№(6(H9368265E-85FE-11d1-8BE3-0000F8754DA1ssetMod Package={AC9F2F90ID="{C08665C5-2D8E-4A88-8BBF-C8296C8C048D}" Document=ThisDrawing/&H00000000 Class=ssetClass Module=ssetMod Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=objListFrm BaseClass=bedFrm BaseClass=rotFrm Name="ACADProject" HelpContextID="0" VersionCompatible32="393222000" CMG="A4A6A088E0AEE4AEE4AEE4AEE4PROJECTwmџџџџџџџџЇPROJECT$џџџџЯThisDrawing џџџџ|’__SRP_6џџџџџџџџџџџџ" DPB="C6C4C2EAC62EE92FE92FE9" GC="E8EAECEFEDEFED10" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisDrawing=44, 44, 620, 355, ssetClass=52, -14, 879, 757, ssetMod=52, 105, 806, 633, objListFrm=89, 101, 843, 629, , 0, 0, 754, 528, bedFrm=64, 0, 890, 731, Z, 142, 219, 857, 761, rotFrm=66, 66, 803, 564, , 44, 44, 781, 542, 42, awingssetClassssetClassThisDrawingThisDrawingssetClassssetClass__SRP_7 џџџџBssetClass џџџџj€4__SRP_4џџџџџџџџџџџџц@__SRP_5!џџџџйssetModssetModobjListFrmobjListFrmbedFrrU€€€~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/ џџџџџџџџџџџџ  џџџџ џџџџ  a б 1 Й  й ( ™8sset q H FromPointToPoint BasePoint RotationAngle ‰бX QсhCancel Yбx iбˆ б˜ yД€0* pH‚dф ACADProject8@е = t  н рA( J< rstdole>stdole h%^*\G{00020430-;C 0046}#2.0#0#C:\WINDOWS\Sys@tem32\e2.tlb#OLE Automation0€MSForms>SFFrms3 €ED452EE1-E08F€-101A-8-02608C4 D0BB4EFM20.DLL#MicrosoftŠ ‚: €^ ObЎ Libraryш/;D1€„uˆˆ00}#0‚#€k0  € ‚РA4AA96D88-3AB2-4276-BA8F4DA2 5F581ˆ6DOKUME~1\Harry\LOKALTemp\VBE\ФS.exd`;!€с.E р….`PŒM ДІ‚ŸM€SComctlGЈ>€ M@hCРemcŽlLhib@j|Р3831FDD16-0C5C-11D@2-A9FCLFx875Р4‰3OMCTL.OCXШ/Windows" @#mon€ntrols 6.0Р (SP6)Пmщ;(0­Р;Ф<306FD806-30DA-4C05-A152-886BAF55B6ќEDЋp†.Ь8о @нƒ\ вЉќјuMЁEс9ТŠтЖтThisD€rawingGт; T@€i`oDraw ;ngЊ2˜‚HЂ‚1тв"E,":2""+Ђ рssetClassGVСрe LC€“am`sрЪ2д/6R./зХ#(@ хa’сModGеb’sЄM ^d 62o# ­| !Њ  objListFrmGЖсkjlaДF2ЖmР+26яЗрЩэ1Aq aФbedk"ЁЧb`УdГСВЛ"ШЃ2"ШЉЏА@Щ­pњЕroуЁњr.tЊЃЃЉЏR~p.еRЏр,€€ /Б rU€€€ џџџџџџџџD$ `”џџџџџџџџniљџџrU€€€ АAiбщq‘Йс џџџџi4бёљџџџџџџџџџџџџњџџџ`  џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8сЙ бббџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ^ XE'Xџ%'8џ%:џ%(јў#%xџ! xџahџ§ѓфўфўў )xџфў5hџE'Xџ%'8џ%:џ%(јў2%xџ! xџahџ§ѓфўфўў )xџфў5hџE'Xџ%'8џ%:џ%(јў2%xџ! xџahџ§ѓфўфўў )xџфў5hџE'Xџ%'8џ%:џ%(јў2%xџ! xџahџ§ѓфўфўў )xџфў5hџ4˜$( xџфўhџ4X633рф„(xЖеRџџˆЖџџџџџџџџ@џџиiЖСЈтOЕžи| [r9оХ^Мˆ]OŽЄ&—~ЯŽ„щW§ŸвI…{o—['1ЈuАНўO„QБ,гч‘(џџџџџџџџџџџџxЈuАНўO„QБ,гч‘(иiЖСЈтOЕžи| [r9џџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPSPџџџџSџџџџSџџџџSџџџџ6"џџџџ<џџџџ<џџ<џџџџš0{5E0FC5DE-88BC-4F5D-8EA4-261E977ECF8E}{57E90084-9FFD-49D2-857B-6F97125B2731}а |џџџџ`џџџџџџџџџџџџфўJџџџџџџџџ”” €ўџpџџhџџ@џџџџџџџџ%ўџџџџџџџџџ˜џџpџџџџџџџџ %џџџџƒўџџџџџџџаџџџџџџџџџџџџџџ%‚ Іџџџџўџџџџџўџџџџџџџџџџџ%џџџџИџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈџџџџџџџџ`аœџџџџџџџџxџџџ џџ и}™@ўџhџџџ џџ @ўџXџџџ џџ ј@ўџHџџџ џџ АА@ўџ8џџџ џџ АА@ўџ(џџџ џџ `А@ўџџџџ џџ ``@ўџџџџ џџ €€@ўџјўџџ џџ p@@ўџшўџџ џџ `pџџџџфўџџ џџ ``џџџџ0џџџџџџџџ@џџџџџџџџџџџџџџџџpџџџџџџџџџџџџиЈD˜”џџџџџџџџџџџџџџџџџџџџџџ н рA$*\Rffff*0?41e00b74пџџџџ4б8ўЪ € џџџџ€ џџџџ"  E E(EH Eh€ џџџџˆџџџџ˜–ааЖWinkelЌ# ~!€B@pааЖBreiteЌ2 ~!€B@pааЖHіheЌ2 ~!€B@pџџааЖFlфcheЌ2 ~!€B@poџџpџџџџhџџџџ_БAttribute VB_Name = "rot@Frm" шBast0{5E0FC5DE-88BC-4F5D-8EA4-261E977ECF8E}{57E90084-9FFD-49D2-857B-6F97125B2731} ШGlobalˆSpacoFalse ŠCreatablPredeclaIdбTru BExpo se0TemplateDeriv–Customiz‹D P Sub UserForm_Initialize() ListView1.ColumnHeaders.Add ,€"Winkel", 35 Breite€D50 HіhІFlфcF End5  E E(Иф„; U Б Ж1AџџˆЖџџbedFrm џџџџLѓ!rotFrmџџџџџџџџџџџџ;с__SRP_aџџџџџџџџџџџџ.:objListFrmџџџџ aд 'ФсIƒ˜DТ‚„…†‡ˆ‰Š‹ŒŽ‘’“”•–—˜™š›œžŸ ЁЂЃЄЅІЇЈЉЊЋЌ­ЎЏАБВГДЕЖЗИўџџџКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзи'клмнопрстуфхўџџџчшщъыьэюя№ёђѓєѕіїјљњћќ§ўџџ%'8џ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџ?'Xџ%'8џ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџ?'Xџ%'8џ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџcXџ%xџ! xџ,xџcXџ%xџ! xџ,ў§џџxџcXџ%xџ! xџ,xџx $( xџџhџ84PџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџrU€€€ и9)9Q9y9џџџџй84бIљџџџџџџџџџџџџњџџџ` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8сЙ бббџџџџџџџџџџџџџџџџџџrU€€€ џџџџџџџџD$`”џџџџџџџџnI q a p y2YЉщ QР ‰б15Y55џџџџ 5 8Й ссссЈ§џџ`Сџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ<бщљџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ @Й с бббЈ§џџ`Сџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ DЙ ‰ вввЈ§џџ`Aџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ HЙ Б дддЈ§џџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџaEyЯOЯ4x_L(,џћ”џ_L§†5џ ќc=xџFџ:,џ_Lћяџ§ўџџ$ Фџ ,lџ=tџ/џ)џџ5џ ў €'џ%',џ%tџ Tltџ§œџxџ$ $џ@'Рў'рў'џxџVќјџџM,џ @4$ lџ=xџџ6џрўРўџxџ$ ,5џX',џ%'№ў%_L§“ @џ $  џaџ§ѓ џџўЂрў§ѓќќ ў)џџ6џрўG(№ў%'Аў%(,џ%џxџ$ \џўЏрў§“ @ ўџ=pў§Ÿў˜6џрўpўG(№ў%'Аў%(,џ%џxџ$ `џўЏрў§“ @ ўџ=pў§Ÿў˜6џрўpўG(№ў%'Аў%(,џ%џxџ$ \џўЏрў§“ @ ўџ=pў§Ÿў˜6џрўpўG(№ў%'Аў%(,џ%џxџ$ `џўЏрў§“ @ ўџ=pў§Ÿў˜6џрўpўi(Аў%'€ў%(,џ%џxџ$ `џўЎРў(№ў%рўxџ$ \рўўЎpўћœ`ў% ўџ= ў§Ÿў˜6 џрўРўpў ўi(Аў%'€ў%(,џ%џxџ$ `џўЎРў(№ў%рўxџ$ \рўўЎpўћœ`ў% ўџ= ў§Ÿў˜6 џрўРўpў ў:,џ_Lћяџџџ  5џ ќc=tџ ў €\xˆœptџ\џ"’ ў@џџџ€ ’xџ4 џџџџрўРўpў`ў0ў ўD|_L(ќўћ”ьў_L§†5ьў ќc=xџFрў:ќў_Lћяьў§ўфўшў$ Фшў ,lрў=tџ/фў)шўрў5ьў ў €'аў%'ќў%tџ Tltџ§œшўxџ$ $шўьўxџ$ ,5ьўUьўxџ$ <ьўРўxџ$ 4РўћœАў(ќўћМ ўўxџ$ 4ўћ”€ўBtџ6ьўРўў€ўUьўxџ$ PьўРўxџ$ 8РўћœАў(ќўћМ ўўxџ$ 8ўћ”€ўBt џ6ьўРўў€ўoџѕ\џІo џѕ\џІєыѕ\џІ#pў(ќўћ”ьўќіPўPўpў(`ўДўh0ў@ьўxџ$ ,5ьў3ьўxџ$ <ьўРўxџ$ 4РўћœАўBt,џ6ьўРў3ьўxџ$ PьўРўxџ$ 8РўћœАўBt$џ6ьўРў o,џo$џГtџ pўBt4џ m4џџџ S'ќў%'`ў%4џ§“@шў$ шўaьў§ѓ рўрўўЂРў§ѓќќў)шўрў6ьўРў'(ќў%'`ў%,џ§“@ўџ=Рў§Ÿў˜5Рў'(ќў%'`ў%$џ§“@ўџ=Рў§Ÿў˜5Рў'(ќў%'`ў%џ§“@ўџ=Рў§Ÿў˜5Рў!ьў4џ\џYќ§Mќў`xџ$ X5ьў pўў~0ўБ tџ Xѕ$ $$ў € ў €€|˜€ Pў@ў0ўpўtџ\џџџ@4’loў@џџџџџиŸClos’texџ0 фўшўрўьўРўАў ўў€ў0 ќЦ   ˆL_L (lџћ”\џ_L§† 5\џ&'џ'<џ'\џѕ_L 6\џ<џџst`L$ \џ<џџ0 ќЦ  џџџџџџ@џџRЌCЩШQ[LЌе @E9л47"­"‚EЊЯ}bћо?дcЬ2H]I•ПЏМa–j?аёя”c‚N–k[шОT1џџџџџџџџџџџџx?аёя”c‚N–k[шОT1RЌCЩШQ[LЌе @E9лџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPSPџџџџSџџџџSџџџџSџџџџ6"џџџџџџџџџџџџLџџџџџџš0{B94ECD08-471A-46C0-8494-DEB2F3C067D8}{18CrU€€€ ˜ Ёq7б AyБщ™7С7 818џџџџq74бrU€€€ џџџџџџџџD( `”џџџџџџџџй&$A `˜џџџџџџџџn9џџџџ™4б™љџџџџџџџџџџџџњџџџ`Iџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ4 @HD8!џџC63D4-4832-495D-95BF-AFBC1E61966A}Ј x``џџџџџџџџџџџџ|џ @џџџџ””iƒzџџџџ џџџџџџџџ€ A |џџџџ`џџџџџџџџpџkџџџџџџџџ˜ ” €ўџаџџШџџ џџџџџџџџ%ўџџџџџџџџџјџџаџџџџџџџџ %џџџџ`џџџџƒўџџџџџџџ8џџџџџџџџџџџџџџ%‚ vџџџџўџџџhџџўџџџџџџџџџџџ%џџџџџџџџџџџџџџ/(  `Qџџџџџџџџџџџџџџ/0I ` Uџџџџџџџџџџ9џџџџ///0‰` YџџџџџџџџџџQqџџџџ/+/(Щh]џџџџџџџџџџџџџџ/( haџџџџџџџџџџџџџџ/ сџџџџ@љ4n_Ÿп0 ќЦrU€€ №q yQ0 ))Q)y)С щ й џџџџ™ @pС9џџџџџџџџџџџџџџџџџџџџ /MЯOЯOЯ_Ÿп0 ќЦ  Ќ`џ.4џ(8џ%X4 Q4џќќ$џ+HџўЭXџўЭ4џ(8џ%X4 4џ Ј4џ!(8џ%XџўЎџBѕ<І5џ!(8џ%XџўЎџBѕ<І5џ!(8џ%HџўЎџBѕXІ5џ!(8џ%HџўЎџBѕXІ5џ%єjџџX4 lџѕЎфўcќўW,HџўЭXџўЭ4џkjџD8џ%X4 4џ Ј4џ*(8џ%XџўЎџѕ<Ё§kьў]ћg5џl!(8џ%XџўЎџBѕ<І5џ*(8џ%XџўЎџѕ<Ё§kьў]ћg5џЗ!(8џ%XџўЎџBѕ<І5џ*(8џ%HџўЎџѕXЁ§kьў]ћt5џ!(8џ%HџўЎџBѕXІ5џ*(8џ%HџўЎџѕXЁ§kьў]ћt5џM!(8џ%HџўЎџBѕXІ5џ jџdќўѕџ/  `4lџ$џXџHџ4џџмўАDџ.ѕ<ЁѕPџІѕ<ЁѕPџІѕXЁѕPџІѕ<ЁѕPџІѕXЁѕPџІѕXЁѕPџІѕ<ЁѕPџІѕXЁѕPџІѕ<Ÿџџ ѕ<Ÿџџ 44џPџM8џ %Hџ$ Hџ Ьl4џ=hџ)Hџ4џ єџhџ  hџ Є ќc=hџџ/ HDX@lџhџPџtџn ’Hџ4џ8иџ.ѕ<ЁѕTџІѕ<ЁѕTџІѕXЁѕTџІѕ<ЁѕTџІ“K*mџџџџrU€€€€~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~E ЩСЉ4­ЧжF†,NеŽзИ§  фџџџџƒŠa ) џџџџџџщ€a Сџџџџё 1Yy™Ййщ )IaЁџџ џџџџџџџџџџџџџџџџџџџџ)ƒ€a 9џџџџЉ џџAƒџџџџџџџџџџџџLaƒ€a 9џџџџ џџy1  щС ACADProject ThisDrawing ssetClassssetMod objListFrmbedFrmrotFrmяРF /C:\PROGRA~1\GEMEIN~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA ‘џџџџ Й!`тС”РЦWв…у  Ц&C:\Programme\MDT6\ACAD.TLBAutoCAD ‰џџџџБёp0РFC:\WINDOWS\System32\stdole2.tlbstdole PrintPoint5 aџџџџ‰б€с.E р….`ŒM ДC:\WINDOWS\System32\FM20.DLLMSForms aa‰бˆmЉJВ:vBК†Кєк%ѕ /C:\DOKUME~1\Harry\LOKALE~1\Temp\VBE\MSForms.exd Aaiб нƒ\ вЉќјuMЁ  C:\WINDOWS\System32\MSCOMCTL.OCX MSComctlLib ))QЁАиo0к0LЁRˆkЏUЖэ 3C:\DOKUME~1\Harry\LOKALE~1\Temp\VBE\MSComctlLib.exd )AЁРƒza/уFЊЇЁПJћŠцl.аuн…FG†г} ›ъLЋм–:яJЈž˜Ѓ„л$%ёъX-ЇC_ЅNCzЮъіЛц ЬJЃ"ІхЩKШ[qJ—І eР‹UserForm%Tm>—(NЬZТџх F3Dynamic  џџџџ џџџџA аС{lЏЮŸFЊWJOCommandButton1!ш-ЌЂ6Я€SЊ` њ џџџџџџџџбрCommandButton2CommandButton4CommandButton1_ClickCommandButton4_ClickCommandButton2_ClickCommandButton3_Click LЃhяЫvзЧ@Ж<ЖVMP­> TestSSйuŽ!=в…Ф  Ц&ьs‚ъдѕEЖjIAдоbйuŽ!=в…Ф  Ц&›ф€ hжDИ…uјЙЄ:хсXh—{ а‰п€_ТћК AcadDocument @~aЁ!ћбЂШ мcš’~aЁ!ћбЂШ мcš+=ћќњ hЇ8+3qЕTnCoEеХJ€bє(4К#Ж*=ћќњ hЇ8+3qЕ!=ћќњ hЇ8+3qЕClassP№gv№Э›3+3o VBInternal Qџџџџ џџџџyPCountGetBoundingBoxDrawBoundingBox PrintPoint0 PrintPoint1 PrintPoint2 PrintPoint3 PrintPoint4 PrintPoint6 PrintPoint7ssMovessRotateminPointmaxPoint hh|4<Dб”`m”’X„ъмъ’oZуlZУE‹_WГ›АеЃK$Ў˜yСO’œ80“v‘ УDгПЬ*Nœ€~2.В7ЁcЇЦмЖFƒhh_œƒ vХ\Œа0\ LЋЌпPRОђ”UљъеHЅ “‘ рIb aџџџџ џџџџA J№бН‹…бБjР№(6( ListView1uы,#GVOОˆrŠўз№ )џџџџџџџџЁ ListView1_BeforeLabelEditUserForm_Initialize DL№бН‹…бБjР№(6(N№бН‹…бБjР№(6(ListSubItemsAdd Œ Test_dkjS …#›/[OЌ–g%ї^ БD`ˆ}Ьo/M‰ўџНч‹Yы€ƒЧХB˜Dу3ЏF‹iYD~œмЭHЄЂА:–куj7ŠK1wdJЖЩЎЛ7Hг ššЭшЙ-FЉ3~8шК  1џџџџ џџџџA рVBE6.DLL БџџџџS № 0 ЂюW[šЪбЖ`А‡т5 BauteilP№бН‹…бБjР№(6( minPnt x maxPnt x minPnt y maxPnt y Breite Hіhe Winkel FlфcheX]!a+OІ=eЊWуW.ћL'Jт[cIБŠ ЌgBьфT)ZьЖFšАйЏўЇTљэЛйoKЉeь`еgчШ’ЊвaBЇж|…Й\‚ž Aџџџџ џџџџA @7љ3vdьЧKЅа€ПWЂ|пœкFŠя)UЋO:a’bŒхЄ„O Л}Яl^q| БDлКћO†XНЧb>ИШчnЬ…П FžЧцv@ЖVЊ8dirџџџџџџџџџџџџ__SRP_0 #џџџџ$c&__SRP_1џџџџ)џџџџн__SRP_3" џџџџƒ~ :ЋLІ!nо€%=%БыЋROЋ_бшм@Ц{GЏЂОХFДј•Ъ _  Бџџџџ џџџџA €ЛЌг"š?FЂаžXмlЅ}tOіJЌI­Є;tV5yЋЕ/ТdxAЙыДˆс]5`22*|IE…х2kˆŒЕСЙхnлйMŒеŠРKv?•3†іK˜}’иЇdСьН‰H—ГћhКЅ Qџџџџ џџџџA РЇZ№ё‘їE‚ЬUЅvtВUСV"ЏJШЊG˜=6]е?MŒ+ъЧ УI›tСъ‡@УйКњ†› CЖ†ћиџwЩ6TiјKŽт[!QЁЧ“”#œxыП2LПаŒУЈуƒ‹ ™џџџџ џџџџA ЙTс@*€’Jœ8ŽPЛщ“qБЭƒа>9BЋёи=mи6ыЋгт-єб[VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} bedFrm Caption = "bedFrm" ClientHeight = 1080 ClientLeft = 45 ClientTop = 330 ClientWidth = 6705 StartUpPosition = 1 'Fenstermitte TypeInfoVer = 30 End џџџџџџџ^W8ўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9Вqxџahџ§ѓџџў ) (€Objekte wфhlenь Nu€ЅTahoma (€Liste anzeigenь Nu€ЅTahoma((€Objekte optimal drehenтOu€ЅTahoma (€Test CollectionтNu€ЅTahomaE75D913-3D21-11D2-85C4-08000  }3.qФ„,х€@CommandButton1nЇЇ,х€@CommandButton2n: Ї,х€HCommandButton4nЂ,х€@CommandButton5nЂOџ?'Xџ%'8џ%:џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(@џџџџXџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ~ААААААА@ўџшxџџџ џџ АА@ўџџџџџhџџџ џџ @@@ўџpXџџџ џџ ``@ўџˆHџџџ џџ  p@ўџ 8џџџ џџ P€@ўџИ(џџџ џџ ``@ўџаџџџ џџ ``@ўџџџџџџџџ џџ ``@ўџџџџџџџџ џџ @Pџџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџXџџџџџџџџ џџџџџџџџ`џџџџџџџџаџџџџџџџџџџџџ@Dœ”џџџџџџџџџџџџџџџџџџџџџџн рA$*\Rffff*0>41e00b74&*\G{232CEB75-5647-4F05-BE88-728AFED7F020}#2.0#0#..\Application Data\Microsoft\Forms\MSComctlLib.exd#Microsoft Windows Common Controls 6.0 (SP4)*#54&*\G{232CEB75-5647-4F05-BE88-728AFED7F020}#2.0#0#..\Application Data\Microsoft\Forms\MSComctlLib.exd#Microsoft Windows Common Controls 6.0 (SP4)*#4dпџџџџ4в8ўЪ€ џџџџ"  € џџџџ€ џџџџ"??8?X?x?˜?И?и јrU€€€ џџџџџџџџ|(yh)џџџџџџџџџџџџџџ&(Й`-џџџџџџџџџџџџџџ/(љ`1џџџџџџџџџџџџџџ/(9`5џџџџџџџџџџџџџџ/(y`9џџџџџџџџџџџџџџ/(Й`=џџџџџџџџџџџџџџ/(љ`Aџџџџџџџџџџџџџџ/(9 `Eџџџџџџџџџџџџџџ/(y `Iџџџџџџџџџџџџџџ/(Й `Mfџџџџџџџџџџџџ0Цoџџџџ.bCompObjџџџџџџџџ"aVBFrameџџџџџџџџџџџџ(__SRP_bџџџџџџџџ,gbedFrmm2а0_Ÿ^BТ@эЄёц%ФPROJECTlkџџџџџџџџџџџџffџџџџџџџџџџџџLђЬamџ  фњ*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~1\GEMEIN~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For ApplicationsЮ*\G{C094C1E2-57C6-11D2-85E3-080009A0C626}#1.1#0#C:\Programme\MDT6\ACAD.TLB#AutoCAD 2002-TypenbibliothekМ*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\System32\stdole2.tlb#OLE Automationо*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\System32\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{4AA96D88-3AB2-4276-BA86-BAF4D     Wўџџџ$ !ўџџџ#ўџџџ%&ўџџџ()*+,-4/ўџџџ123ўџџџ56789ўџџџ;<=>?]ABCDўџџџFўџџџHIJKўџџџMNOўџџџўџџџRSTUV˜XYZ[\ўџџџ^_`abcdefghijklmnopqrstuvwxyz{ўџџџ}~€ѕXЁѕTџІѕXЁѕTџІѕ<ЁѕTџІѕXЁѕTџІѕTџЁ§k@џќіlџџ/ <иT<lџTџ’ 8иџ.ѕ<ЁѕTџІѕ<ЁѕTџІѕXЁѕTџІѕ<ЁѕTџІѕXЁѕTџІѕXЁѕTџІѕ<ЁѕTџІѕXЁѕTџІѕTџЁ§k@џќіlџџ/ џ<иT<lџTџ€’ 8иџ.ѕ<ЁѕTџІѕ<ЁѕTџІѕXЁѕTџІѕ<ЁѕTџІѕXЁѕTџІѕXЁѕTџІѕ<ЁѕTџІѕXЁѕTџІѕTџЁ§k@џќіlџџ/ <иT<lџTџ’ 0 ќЦ  0 ќЦА  0 ќЦH  0 ќЦр  8иџ.ѕ<ЁѕTџІѕ<ЁѕTџІѕXЁѕTџІѕ<ЁѕTџІѕXЁѕTџІѕXЁѕTџІѕ<ЁѕTџІѕXЁѕTџІѕTџЁ§k@џќіlџџ/ €<иT<lџTџџџџџ€’џџ 0 ќЦ  Ф€џ.+((џ\џXџX4 lXџѕЎ§i8џўhџx>ƒњz‹ќњ! @Гњ€f@Ж9§ Hџ%џќэ\џX4 џ Œџ \џў~џ/џ/x€rU€€€ џџџџџџџџ@np1(0 To 2)FDoubleх2ro +|„= NothingЇ“}= Th@isDrawrU€€€  a ‰ Б џџџџ9 4й Ё VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} objListFrm Caption = "Objektliste" ClientHeight = 3225 ClientLeft = 45 ClientTop = 330 ClientWidth = 11280 StartUpPosition = 1 'Fenstermitte TypeInfoVer = 3 End XPх €ўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџV`5Pp2, €' dјrehT MР(Ц|A @n.Clear € End Ќ   € џџџџ(џџџџ8–oџџp–`ааЖBauteil ~!€B@pааЖminPnt x ~!€B@pааЖmaxPnt x ~!€B@pааЖminPnt y ~!€B@pmааЖmaxPnt y ~!€B@psааЖBreite ~!€B@pDoааЖHіhe ~!€B@pll,-21З ~(‚lbјЗ ~(„BoundiЗ ~(†tion+oџџаџџџџШџџџџТБAttribute VB_Name = "objListFrm"D „Bas„0{B94ECD08-471A-46C0-!C4>KN}ы>KяЭЋe€€€оьНаФ!oџџџџGCompObjџџџџџџџџEaVBFrameџџџџџџџџџџџџ@_VBA_PROJECTџџџџџџџџџџџџ7щA25F581}#2.0#0#C:\DOKUME~1\Harry\LOKALE~1\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Libraryс.E р….`ŒM Дј*\G{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0#C:\WINDOWS\System32\MSCOMCTL.OCX#Microsoft Windows Common Controls 6.0 (SP6)*\G{306FD806-30DA-4C05-A152-886BAF55B6ED}#2.0#0#C:\DOKUME~1\Harry\LOKALE~1\Temp\VBE\MSComctlLib.exd#Microsoft Windows Common Controls 6.0 (SP6)нƒ\ вЉќјuMЁ  џџџџџџџџн рAџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЖThisDrawing0@41dfffdbџџThisDrawingџџ:2вџџssetClass0?41dfffdbџџssetClassџџзХџџџџ6.џџssetMod0841dfffa8џџ`ssetModџџ|0#џџobjListFrm0>41e00b74џџwobjListFrmџџ1AHЗ џџ bedFrm0t41e00cc1џџ‰ bedFrmџџpњ`Аџџ rotFrm0?41e00b74џџЇ rotFrmџџеRx~џџџџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџуС‘ГrœCИoT$иdГ“џџџџ!ря в D—R,CќEџџџџx„R™ŸЃ:Ešл[ОЇ |џџџџ№ўЭэ[=EЄ й1дДЃ@џџџџЗђf зкЕJ”ЮPѓxJNџџџџ“ Щ5фwM‹@ї)7№<Бџџџџџџџџh€rwџД5 €џAs{€џmeЄ€џSetГ€џtoAutoCAD"јVBAїтWin16С~Win32MacГВVBA6­# ACADProjectІдstdole“`MSFormsC MSComctlLibлm ThisDrawingЙ5 €џџџ_Evaluateй ssetClassсоsset/.AcadSelectionSetЫЩMinPt bMaxPt,jCount0vGetBoundingBox˜Yi`tmpMinїВtmpMaxйБtmpObjЂМDrawBoundingBoxaюplineObjCЅAcadLWPolylineбpoints ModelSpace_жAddLightWeightPolylineƒClosed,љ PrintPoint0A  PrintPoint1B  PrintPoint2C  PrintPoint3D  PrintPoint4E  PrintPoint5F  PrintPoint6G  PrintPoint7H ssMoveCУ FromPointK\ToPointkюMove>yssRotateXљ BasePointч@ RotationAngleБ5RotateminPoint]maxPoint4ssetModьНTest4ЋtestSetЙбssetObjУЦp1–^p2—^roў^ SelectionSetsгAddїrSelectOnScreenЛClearуЭ objListFrm/ListView1_BeforeLabelEditНCancelё˜UserForm_Initialize5c ListView19ц ColumnHeadersdAllowColumnReorder>ЌEnabledлЊ FullRowSelect~пbedFrmѕ"CommandButton1_ClickфС BauteilNr4.Hide9zlv'^ ListItemsЅњ ListSubItemsс,DeleteИxShowѕCommandButton4_ClickVyBreiteаaHoehevљFlaechehцMitteXуMitteYрrotFrmњ›Regen ўacActiveViewportrNCommandButton2_ClickєљCommandButton3_ClickFAzahl$6MsgBox—RUserFormNCommandButton1|дCommandButton2}дCommandButton4д AcadDocumentZ€џClickŠуClassЛ€џBeforeLabelEdit1Ÿ €џџџInitializeгN €џџџ_B_var_lvЯђ€џџџ_B_var_i ЂItemзz €џџџ_B_var_tmpObj 7 BauteilSetsэЪ CollectionщWCommandButton5€дCommandButton5_ClickчР €џџџ_B_var_ForjLBauteilCollectionЛ€џџџ_B_var_BauteilCollection”ѕ €џџџ_B_var_SetnocheintestSetЖ„€џџџ_B_var_CollectionSЦ€џUpdateвќ SelectionSetў џџџџџџwЇ  }ЙM9<kaK№бН‹…бБjР№(6(J№бН‹…бБjР№(6(I№бН‹…бБjР№(6(XPх €b€$€ListView1iдд9368265E-85FE-11d1-8BE3-0000F8754DA1CommandButton1{Ї,х€@Comman8494-DEB2F3C067D8}{18CC63D4-4832-495D-95BF-AFBC1E61966A} dGlobalŒSpacAoFalse ŠC€reatablPredecla‰IdеTru BРExpose0Template Deriv–Cu@stomiz‹D P Sub ІView1_BeforeLabelEdit(Cancel As Integer) End #UserForm_Initialize(€†..ColumnHeaders@.Add ,€"dBa€яilГm€inPnt xт laxч Уyшт B reiteaHі‚hЫ AllowCLpReor€L‰‡IEnСu‡GFullRowSelectFШnte №TдАџџџџ]Ж|џџЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‰џџџџџџџџџџџџџџџџџџџџџџa џџџџџџџџџџџџџџџџџџ џџџџџџlЈ и X6А6ш6x6H&Mh&M € Ш€ џџџџ€ џџџџ€ џџџџ"ј€€€€ €РфtЋЪЊЖpњџџˆЖџџџџџџLџџџџ&уeр…ИŒO“LЬкк‡лW“ZvгкIН[ТœЪX–oџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџXџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@SPџџџџSџџџџSџџџџSџџџџ<џџ<<џџа<`џџ<џџ< џџ<$џџ<(џџ<,џџ<0џџ<4џџ<8џџ<<џџ<@џџ(2h2 *и$€ џџџџ8 @€ џџџџPџџџџ`–]ђ@]ђ`]ЌЌђ€]ЌЌђИ]ђ№эА.dэЖ TestSddfghzS !n%p.fр< Objekte zu TestSS hinzufќgen fB@rр Objekte auswфhlen˜рhier an die klasse ќbergeben:э f d/ dB@$р&selbst definierte BoundingBox Funktion+р8 testSet.DrawBoundingBox 'selbst definierte mal FunktionўЌЌ+hFЌЌ+hFЌЌ+henЌЌ+jFЌЌ+jFЌЌ+jrmitte h j dB@Lр sset verschiebenBјЌX'l j l dB@Tр sset drehenэА.d fB@tџџ џџoџџЈџџџџ џџџџчБAttribute VB_Name = "ssetMod" Sub Test() Dim t,Set As New  ClaŒss:Obj:AcadSele`ctionb@p1(0 To 2)FDoubleх2ro +|„= NothingЇ“}= Th@isDraw. „s.Add("аSddfghz@S") ' €YekzuvSS €*zufќgen „+„$OnScreenauswфhl'hier an die kŒe ќbergeben:;ƒ‚ƒ„…†‡ˆ‰Š‹ŒŽўџџџ‘ўџџџ“”•–—›™šЅœžŸ ЁЂЃЄўџџџІЇЈЉўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџёђѓєўџџџіўџџџјўџџџњћќўџџџџџџџџџџџџџџџS_.+€Ж/ … GetBound€^Box 'selbst de8fin€.€S FuDnkБ '…Ю.У}!mal СeЂ)Р"0: €1‡j= 0 p€gЩE2(2(5Move@, p2РH9versc@FР@ Рs= 6†0Ч RotaР5Pp2, €' dјrehT MР(Ц|A @n.Clear € End Ќ j l dB@Tр sset drehenэА.d f<фjxЬЖ:2џџ#ˆЖџџџџџџџџ<џџьs‚ъдѕEЖjIAдоbйuŽ!=в…Ф  Ц&›ф€ hжDИ…uјЙЄ:хџџџџџџџџџџџџx›ф€ hжDИ…uјЙЄ:хьs‚ъдѕEЖjIAдоbџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ6"џџџџџџN0{8E75D913-3D21-11D2-85C4-080009A0C626} џџџџ €ўџџџџџџџ(џџџџџџџџџџ%џџџџHƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ џџџџўџџџџџўџџџџџџџџџџџ %џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh8@ttџџџџџџџџџџџџџџџџџџџџџџ0н рA$*\Rffff*0@41dfffdbпџџџџ4ўЪџџџџџџџџxџџџџМАAttribute VB_Name = "ThisDrawingˆ" ˆBasˆ0{8E75D913-3D21-11D2-85C4-080009€A0C626} |@GlobalЮSpac’False dCreatablPredeHclaIdАTru BExposeTempla€teDeriv’BustomizD2Hƒўџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ^0 ќЦ ( 4Xџџџџџџџџџџџџџџџџџџ0н рA)љџџџџџџџџџџџџњџџџ`I џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8сЙ ввв`  џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ^ W 0 ќЦ  H ?'Xџ%'8%рџџџџџџџџџџџџџџџџ (,џџџ џџ ˜џџџџ( Єоџџџџxџџџ№џџџџ%џџџџАPџџџ џџ џџџџџџџџи* Яџџџџ4 €@џџџџџџџџџџџџPџџџџ`№џџџџ€рџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№џџџџш РЮv˜№џџш Јџџџ џџ џџџџрџџџџџ џџџџ@ўџџџџ џџ џџџџ@ўџџџџ џџ џџџџ@ўџ№ўџџ џџ џџџџАрўџџ џџ @ўџаўџџ џџ џџрРўџџ џџ џџ@ўџАўџџ џџ џџ( ўџџ џџ џџ@ўџўџџ џџ џџ@ўџ€ўџџ џџ џџˆ(pўџџ џџ џџ@ўџ`ўџџ џџ џџ@ўџPўџџ џџ џџ@ўџ@ўџџ џџ џџш (0ўџџ џџ џџџџ@ўџ ўџџ џџ џџџџx ˜џџџџXˆџџџџ(P @HџџџџџџџџџџџџџџџџјџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџˆР ш 0ќўџџ џџ  ьўџџ бx ‘/бˆ 1б˜ !2бЈ i3бИ 4бШ б5биџ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџ?'Xџ%'8џ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџ?'Xџ%'8џ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџ?'Xџ%'8џ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџ?'Xџ%'8џ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџ?'Xџ%'8џ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџ?'Xџ%'8џ%:џ%xџ! xџahџ§ѓџџў )xџџ5hџcXџ%xџ! xџ,xџcXџ%xџ! xџ,ў§џџxџcXџ%xџ! xџ,xџx $( xџџhџ84PўЪџџџџ 7бш 8бј Щ9б щ:б 1<б( =б8 љ>бH Y@бX сAбh )Cбx71-11D2-85C4-08000VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} bedFrm Caption = "bedFrm" ClientHeight = 1080 ClientLeft = 45 ClientTop = 330 ClientWidth = 6705 StartUpPosition = 1 'Fenstermitte TypeInfoVer = 29 End џџџџџџџџџџџџџџџџџџџџџ0сЙЊ>ўџ џџџџMicrosoft Forms 2.0 FormEmbџџ џџџџџџІЊ˜џџ џџа шўџџ џџ џџx фўџџџџ џџ@ўџрўџџ џџ џџ@ўџаўџџ џџ џџP ˆРўџџ џџ џџ@ўџАўџџ џџ џџ@ўџ ўџџ џџ џџ@ўџўџџ џџ џџ@ўџ€ўџџ џџ џџP pўџџ џџ џџ@ўџ`ўџџ џџ @ўџPўџџ џџ ш ј @ўџџ џџ  џџX 0ўџ џџ € ш X ўџџ џџ @ўџўџџ џџ ш ўџџ џџ˜@ўџќ§џџџџ џџџџџџџџ%џџџџџџџџџџ˜џџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ` џџџџИ plџџџ џџ  \џџџ џџ џџџџ<џџџ џџ И (Lџџџ џџ  а <џџџ џџ јџџџџ№џџџџЈ џџџџА џџџџ(8џџџџџџџџџџџџ(hџџџџџџџџџџџџшИTР џџџџџџџџџџџџџџџџџџџџџџ ˆн рAпўЪi€.p€ џџџџ"€ џџџџ€€€€(ˆ8@ PHX X"h€ "€ џџџџ€ џџџџИ€ џџџџ@@Ј€ џџџџ Ш Xи"G˜"GР"Gј"G 2iш2ipР€ ј€ H ш€ џџџџ€ џџџџ€ џџџџј"€€€€(€8€ @€ џџџџ€ џџџџˆ`h xLF€ а"р€ "0 @*UP*U€2*А€ џџџџ€ џџџџ#ш€ џџџџ€ џџџџ 33( @ P X Sh'ˆ' 'И!а ш ј  (8" @ HX€ џџџџ€ џџџџ"`ˆhp€ џџџџ &€€ џџџџ" H€Ј и(X#А @HPX  ` 0PџџџџЈ–]ђ@]ђ`]ЌЌђ€]ЌЌђИ]€ђ№ ŒЌ 'ŒџџэА.d џџB@Ž fB@rр Objekte auswфhlenрhier an die klasse ќbergebenџџэ f d/t dB@$Uэаа Œ v!~!’%p.ЌаЌ d%\ !”B@pЌаЌ d%^ !”B@p!> –oџ &ўЌ Ю!"’MЌаЌ d%^Ќ d%\ !”B@p!J ]ђиэ &$Ю.о[йЖTestSS Œж џџB@Ž џџB@˜oџџА–]ђH]ђh]ЌЌђˆ]ЌЌђР]ђј]ђђ(ђ@ђXђp]€ђˆ ŒЌ 'ŒэА.dэЖ Test_dkjS Œ !n%p.fрE Objekte zu TestSS hinzufќgen џџB@Ž fB@rр Objekte auswфhlenрhier an die klasse ќbergebenэ f d/ dB@$ d!@ d!< Ќ d!< 'Ђ d!J d!> Ќ d!> 'Є ЂЌ+hF ЄЌ+hFЌЌ+hџ &ў &Ќ ЌД’ dB@$ d!@ d!< 'œ d!J d!> 'ž œ ž'  &'l[й lжэаа l І!~!’%p.Ќа œ !”B@pЌа ž !”B@pЌа   !”B@p h l dB@Tџ &ўШ fB@– Њ B@Ј ІB@˜ џџB@˜oџџp–  vB@˜oџџP–р]€ђ  АЌ 'А АA@ВoџџЌаЌ d%\ !”B@pЌаЌ d%^ !”B@pЌаЌ d%^Ќ d%\ !”B@pџ &ўШЮB@p џџB@˜ufќgen оѕC@$C@.qџџ8эА.оџџџџ(] ђ(р$ ################################ufџџџџ˜ d ЮB@pр,############################################џџџџ џџџџ€рssetObj.DeleteDRрASet ssetObj = Nothing '##########################################эЖTestSS Œ !n%p.fрB Objekte zu TestSS hinzufќgenџџџџ˜џџџџ?ЕAttribute VB_Name = "bed@Frm" шBast0{F11104C6-39B8-40E8-B28D-6C5BA6A9F27B}{3BE40AC9-9ED5-4257-9706-5FD053F35242} ШGlobalˆSpacoFalse ŠCreatablPredeclaIdбTru BExpo se0TemplateDeriv–Customiz‹DPublic Ba€ЊilSets As New Collection '#С P>B Sub€mmandButtonˆ1_C1k()Dim test€44ssetCl`ass ObjAcadSe„B€p1(0@ To 2)СDNo@0РKp2QStat‡8Nr D;Nr@[Ч+ 1 С%Х'= No`thingƒ&= ThisDra w€.Щ's.Add("TС7S" &…UNr) ' ‰5ekРЎzu C Рzufќgen Me.Hid2„OnScreeР`Цauswфhl 'hier an die kСPe ќbрergeb\4ў.€џџџџџџџџџџџџxЃhяЫvзЧ@Ж<ЖVMP­>TnCoEеХJ€bє(4К#ЖџџMEџџџџџџџџџџпџџ8џџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ SџџџџS џџџџS”џџџџ8џџ џџ2>"џџџџPџџџџLџџџџLџџџџš"џџџџLџџџџLџџџџPџџџџLџџџџ<<џџ<џџџџџџN0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}Ш%P џџџџ %H$џџџџ џџ џџne’8@$ lџџџ џџng’p,!"№hџџџџџџџџџџџџ аџџ(Мiƒўџџџџџџџџџџџџџџџ  $˜`џџџџџџџџА мўk0 џџ, Мiƒўџџџџџџџџџ џџџџџџ џџџџ`„&џџџџjџџџџџџџџџ`„(џџџџXџџџ џџџџџџ`„*џџџџHџџџ џџџџџџ .P`џџџџџџџџp4џkи џџ0"Мiƒўџџџџџџџџџ џџџџџџ џџџџ „1џџџџhџџџ% „4џџџџPџџџH’0 <ш`џџџџџџџџЈ @џ+ џџ43Мiƒўџџџџџџџџџ џџџџџџ „4џџџџTџџџр’Ш >€`џџџџџџџџш@џ+( џџ8;Мiƒўџџџџџџџџџ џџџџџџ „4џџџџTџџџx’` @`џџџџџџџџШ @џ+Р џџ<CМiƒўџџџџџџџџџ џџџџџџ „4џџџџTџџџ’ј BА`џџџџџџџџџџџџ X џџ@KМiƒўџџџџџџџџџ џџџџџџ „4џџџџџџџџЈ DH `џџџџџџџџџџџџ № џџDSМiƒўџџџџџџџџџ џџџџџџ „4џџџџџџџџ@( Fр `џџџџџџџџџџџџ ˆ џџH[Мiƒўџџџџџџџџџ џџџџџџ „4џџџџџџџџиР Hx `џџџџџџџџџџџџ  џџL cМiƒўџџџџџџџџџ џџџџџџ „4џџџџџџџџpX J `џџџџџџџџ@џ+И џџP kМiƒўџџџџџџџџџ џџџџџџ „4џџџџTџџџ’№ LА `џџџџџџџџџџџџ P џџT vМiƒNџџџџџџџџ џџp€edded Objectє9ВqўЪџџџџ (€Objekte wфhlenь Nu€ЅTahoma (€Liste anzeigenь Nu€ЅTahoma((€Objekte optimal drehenтOu€ЅTahomatomizD2*#121*\R1*#11d*\R1*#  }3.q”ƒ,х€@CommandButton1ЇЇ,х€@CommandButton2: Ї,х€HCommandButton4ЂдWidth = 8040 StartUpPosition = 1 'Fenstermitte mbedFrmrotFrmrotFrmЈ€ >2*рўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqџџАџџџџ– (€Objekte wфhlenь Nu€ЅTahoma (€Liste anzeigenь Nu€ЅTahoma(€zфhlenь Ou€ЅTahoma((€Objekte optimal drehenтOu€ЅTahoma€H€,E„5€ЅTahoma( €ObjektanzahlqЇ5€ЅTahoma( €MaterialartlЪЇ5€ЅTahomaA€H€,ь O5€ЅTahomaA€H€,ь O5€ЅTahoma(€Stфrke"Ї5€ЅTahoma8FР€€€€€к {0Б"Objekte drehen5€ЅTahoma@FР€€€€€{0Б"objekte autom. anordnen5€ЅTahoma<FР€€€€€{0Б"Bez. autom. vergeben5€ЅTahoman „(„!On@Screena@uswф  }f7 L,х€@CommandButton1Ї‰,х€@CommandButton2: ‰,х€8CommandButton3Ё‰,х€HCommandButton45%‰$х€4TextBox1ь {(ѕ€2<Label1x1ЇO(ѕ€2<Label2x1ЇE(х € iƒPџџџџџџџџ џџ€iƒўџџџџџџџџџ џџџџџџ TP`џџџџџџџџ(џk№ џџX |МiƒVџџџџ џџ џџ€iƒXџџџџџџџџ0€iƒўџџџџџџџџџ џџџџџџ ,!\Аhџџџџџџџџ \џ+ џџ\ ‚Мiƒўџџџџџџџџџ џџџџџџ ,!^џџџџhџџџџџџџџ@\џ+№ џџ`…Мiƒўџџџџџџџџџ џџџџџџ €ўџџџџџџџ8 џџ џџџџџџџџ%*€h 4@џџџџџџџџ"€ <џџP@џџџџџџџџ"€ џџџџXџџˆ@џџџџџџџџџџџџџџџџџџџџџџџџ№Pш€АHрx˜P@ h џџџџА џџџџџџџџАџџџџџџџџџџџџƒўџџџџџџџџџџџџџџџџџџџџџџџџџX@џџџџџџџџџџџџ џџџџ$џџ„€џџџџџџџџџџџџ€џџџџPџџџџИ џџџџџџџџџџџџџџџџhX€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ  ш џџџџˆ џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџXp P ` X0 џџџџ @ўџа 8џџџ џџ @ўџџџџџ4џџџ џџ @,џџџџ$џџџ џџ@ўџh џџџ џџ @ўџ€ џџџ џџ @ўџџџџџџџџџџ @ўџ@ ўўџџџџ X  @ўџџџџџќўџџџ ˜ @ @ўџџџџџьўџџ џџ @ўџџџџџмўџџ џџ џџџџ@ џџџџ` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџАџџџџџџџџџџџџџџџџџџџџА џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ` ˜ x H<џџџџ џџ џџ@<H lџџџ џџˆ ` џџџџH џџџџ @ўџџџџџ@џџџ џџ џџџџџџџџџџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрџџџџџџџџџџџџџџџџџџџџаџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€И˜H@џџџџ џџ џџ@@hlџџџ џџЈ€џџџџhџџџџ @ўџџџџџ@џџџ џџ џџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџџџџџџџџџџџџџ№џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ иИH>џџџџ џџ џџ@>ˆlџџџ џџШ џџџџˆџџџџ @ўџџџџџ@џџџ џџ јџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРџџџџџџџџџџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРјиHJџџџџ џџ џџf(@JЈlџџџ џџdbшРmf(џџџџЈ[Q~џџџџ 'b9VZq(@ўџџџџџ@џџџ џџ w.џџџџџџџџџџџџџџџџџџџџ№рџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџјџџџџџџџџ`џџџџHџџџџџџџџџџџџџџџџџџџџЈџџџџџџџџџџџџџџџџџџџџџџџџџџџџр0јHTџџџџџџ џџKy@TШlџџџ џџ1QрNiWРШ5uk@&џџџџ\џџџ џџ*yџџџџx?4u}p-@ўџџџџџXџџџџџ 2O@ўџxHџџџ џџ E?@ўџ8џџџ џџ yP@ўџџџџџ(џџџ џџ +6@ўџаџџџ џџ =HшЈsX`@ўџџџџџџџ џџ F%аt=h@ўџџџџџџџџ џџ i^џџџџа70Kџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџи№h\џџџџ џџ џџ-3`\Рlџџџ џџc+иV2LџџџџРCRVџџџџy+0NSSd@ўџџџџџ\џџџ џџ vfџџџџџџџџџџџџџџџџјџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџј0h^џџџџ џџ џџ1?`^рlџџџ џџ9T јJu8џџџџрBw6џџџџ cIA^wFA@ўџџџџџ\џџџ џџ 0{џџџџ˜ џџџџ`џџџџ(џџџџјџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(`@H.џџџџ џџ џџ @.lџџџ џџP(џџџџџџџџџџџџ џџџџ@ўџЈHџџџ џџ @ўџџџџџ8џџџ џџ @ўџџџџџ4џџџ џџ џџџџџџџџџџџџ@  џџџџџџџџАџџџџ  џџџџџџџџџџџџџџџџ( |dџџџџџџџџџџџџџџџџџџџџџџDИ н рA*\R1*#10f$*\R‚ƒ„…‹‡ˆ‰Š‘ŒŽўџџџ’“ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЂўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ­ЎЏАБўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџffff*0?41dfffdb*\R1*#d1*\R1*#10b*\R1*#10b*\R1*#5c$*\Rffff*0@41dfffdb*\R1*#59*\R1*#5b*\R1*#72*\R1*#72пџџџџpўЪ‰€„„€ џџџџBЁ ($0€ џџџџX€ џџџџB <`€ €Ј€А€ џџџџИ6+Ш,B,B0<%`, € џџџџ€ "И0Kр0K€ џџџџ€ џџџџ€ џџџџ0K@0Kp€ џџџџ€ џџџџ  А€ џџџџB И€Р€Ш,.и,.,.8,.h€ џџџџ˜Ј€ џџџџ4И а p  рш€ џџџџB №€ј,.,.8,.h,.˜ШиB р€ш,.ј,.(,.X,.ˆИШB а€и,.ш,.,.H,.xЈИB  Р€Ш,и,,8,h˜ЈB  А€И,Ш,ј,(,Xˆ˜B   €Ј,И,ш, ,H x ˆ B   €˜ ,Ј ,и , ,8 h x B € €ˆ ,.˜ ,.Ш ,.ј ,.( X h € џџџџ€ џџџџ€ џџџџB  p x ˜  А Р € џџџџB Ш +а 0>№  0 € џџџџBЁ8 @ H BЁP X ` € џџџџџџџџˆ ] ђ@ ]ЌЌђh ]ЌЌђ – !"'"рnur zum verstehenltmџџ –№р!/ die BoundingBox erstellen und variablen fќllen]ђP]ђh]ђ€эЌ$., ( *Ќ$B@$р& ersten eintrag abrufenЌ$(Ќ+FЌ$(Ќ+Ќ$*Ќ+ FЌ$*Ќ+ џ &ўЌ !"Ќ ’рab zweiten eintrag starten ( * &$B@$рmin und max punkte ermittelnЌ$(Ќ$ ›GЌ$(Ќ+jЌ$(Ќ$ ›GЌ$(Ќ+jЌ$*Ќ$  ›GЌ$*Ќ+ jЌ$*Ќ$  ›GЌ$*Ќ+ jџ &ўШ8iџџH–˜]ђј]ЌЌђЌ$Ќ+4FЌ$Ќ+4fЌ$ Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$ Ќ+4Ќ$Ќ+4FЌ$ Ќ+4[йЌ$ж[йЌ$жэ 4 !6%8.0З 0(:эА.0iџџ–P]ЌЌђАЌ$Ќ+4FЌ$Ќ+4rmЌ$ Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$ Ќ+4Ќ$Ќ+4FЌ$ Ќ+4Ќ$4'<iџџ –ш]ЌЌђHЌ$Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$ Ќ+4 Ќ$Ќ+4FЌ$ Ќ+4Ќ$4'>iџџ0–€]ЌЌђрЌ$Ќ+4FЌ$Ќ+4TeЌ$ Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$ Ќ+4Ќ$Ќ+4FЌ$ Ќ+4Ќ$4'@iџџ@–]ЌЌђxЌ$Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$ Ќ+4Ќ$Ќ+4FЌ$ Ќ+4pЌ$4'BiџџP–А]ЌЌђЌ$Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$ Ќ+4Ќ$Ќ+4FЌ$ Ќ+4Ќ$4'Diџџ`–H]ЌЌђЈЌ$Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$ Ќ+4@Ќ$Ќ+4FЌ$ Ќ+4фЌ$4'Fiџџp–р]ЌЌђ@Ќ$Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$ Ќ+4Ќ$Ќ+4FЌ$ Ќ+4Ќ$4'Hiџџ€–x]ЌЌђиЌ$Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$Ќ+4Ќ$ Ќ+4FЌ$ Ќ+4џЌ$Ќ+4FЌ$ Ќ+4Ќ$4'Jiџџ–џ &ўЌ !"Ќ ’ N P &$B@Rџ &ўШiџџ8–Аџ &ўЌ !"Ќ ’ V XДz‹ќњ! @Д€f@ &$B@Zџ &ўШiџџШ–P '\mџџА–АJ„с6Jјй…-Cе8HД—d§лCоv@тЦWрNŽ)'нЇ48CommandButton5 йџџџџ џџџџA @€gФЄŸIЛxЊ8<ЛCommandButton5_Click T4­'мF—рNЈXŒ2ЎiХЃА~vю QHHЏЇZд@ЯЌјп'ЌFžDpа6№Ч‰я\ШШмFk5vЏv–™f_Љ"KPB‰‘j-:]ь R*VйphNЃ)…Rƒ\ Б!џџџџ џџџџA €gФЄŸIЛxЊ8<Л1"a џџџџРƒQјдNFdИJD• ъЌ8ИeTЇMЎ№цФ КчiWVчхKeтJhƒyVъ >6d WA‚ћ5TнЯўїэhЮ2“HМДЁGч !#џџџџ џџџџA Р TestS3М4BSЊЙ„C™OїЈЛ+ЯСpmа{KЁ55dЎЅФмфк\†ЉKŽKДѕ, b‹o3&ЪХ„ˆЕvLЊэx$VЛ‹Fвћю^]BKƒё В $џџџџ џџџџA  TestS4^ŽљШѓ!uJ‰|Д™е„ь^ZџШ№F„ &)а`гcшŒ8bIПХЛg[)ўQщЈSHДEqLGrzёМ”‡J=нЭS›?GБЅђMNз,”sн€N!ЯˆGЛї6s*1ќIЁ‘yzўКNЁбХВI`ЃЂчЃxHАк"ZТџ77Б§bц‚A 2ж?ъцg№'ђ 7sHœаЦ4m„FI 'џџџџ џџџџA ˆAз[~wƒІ@ЪГ]ыЭaыЕƒћѕ?QI‘ЭНђhЕjVЩ6•XJ‚m^}іeSЦBчПDЖцќoКуz zŽЇ]yJJВP0ЫYcещнžт;ярGЏнхфшV (џџџџ џџџџA ШЃЧ_­ЧУLˆƒ\фК2…ЙЂЙ(вЖx`А‡т5ˆ%“^чџбЖI`А‡т5Ид()“ЪбЖ`А‡т5Їѕ1šі<ЈC­РлjєгЋ@ЊгœікН13mY^Љ7yK“ЫТАу-JКІјфЃCЉš\к {ш_T,›>DЎС‡)НР i/џџџџ џџџџA  TestS6MЙc“ˆM†]I`Н‡a+›д6‡Ь}AПН!эъеcЊЮ%и.LЋ™x*„lsђк0Ё€~KК‡г„A ]у*аSиЦ–рGЊcФСЊ“7p й0џџџџ џџџџA H p—мFCхEЃ4ЦlТьOЖsНЈ6FMІОTE}ЦŽ ьU~OEšшИNј}змЊї‹%ДфAОw%Ъх ‘Ћ^€ќ0ŠA€єAхсfhм љ1џџџџ џџџџA ˆzESю HЈx,q{`@Ъг”GИNŒTђЇŒ№LК™ЎјЉ•хFЖГj>Tє/ˆ| N‰ЪC?;<№И‘Z '^mџџ˜џџџџ 0B@тџџџџX џџџџlЕAttribute VB_Name = "ssetClass" " €Bas€0{FCFB3D2A-A0FA-1068-A738-08002B33 71B5} |GlobalЪSpa‚c’False dCreatablPredecl2aIdЎCExposeTemplateDeriv–Customiz EPublic ‘ As AcadSelectionSet Dim MinPt(0 ToШ 2)DotIax .Property Get Count(‚"Integрer ‚ D.'nur zum vers tehen End * †3XFun‚[СB€d@ingBox'  die Ш B@llen uvariСEn fќ;ƒ=i:)С:tmжpРBVA nФGЄaxŠ @O ObjD5(0) v 7.€B‰#AiTn, M@'У'n eintragР abrufС?„bЎ)РУ :h1Hž1Р@AfEaxУ ТkЦ @С For i1yШ`- 1 'ab zwe it@K$starчРУn5i)5ƒ C('mi^m;punkьermitˆtely IfC$in- <… ) іT€G= CЧ Х@Ш ЦA УЃЄ"& > )џЃ^Ъ*Э` Х@Ш ƒф.СWNext iУZeXбZDrawˆF(@<Rpli neСLфwLWPoLlyУXpo€Hs=Уw7Ъw%AK: ПЄ"ЃЁ$Єр=ц!эf3'h4ЂЄ%fЖ5Їh6ЂуŒ)fРЅ aЁ,Debu№g.Pr`Ц@Ђ/]A р:!q†$= HisA) ƒ.ModelЂЗ.AddLi`ghtWeЁE((Gу@-%.CldБTŒru` цUpd€А‡… jNoth@ ып;bP50F;_7 џ_7@_7Ё#_7g_7џ`ˆ „IЂaЙ‡^$Ця М@b"1"І ?„s(я,nts(?џQя,Q?Qя,Q?їQь,717A+? zЩ?t2?o @€@ћz?0ч5?Q ?Qџ?Q?Q?Q?QЉ?nt272$w??Б+3??ђ00џ/G!?Q ?Q?Qџ?Q?Q?Q?4:373?Ѓœ"t4џ???fX?Q ?Qџ?Q?Q?Q?Qы?4474??d^5????t E ў t6?Б ?Q?Q?Q?Q?Х 75ї??d6????џ?%”Ж? ?Q?ПQ?Q?Х 76?ћ?d7?????џ?Ia`4%?q?Qп?Q?Х 77>!ЈПеssMove(АFrombZXЯ,АУ=PЅХђуЋХ‚›Тч(›рУ †ж ВoPТП ssзАRotate(BasePoint As Vari ant, рio@nAngledDouble) For i = 0 To sse t.Couz- 01 &(i4).О О Ј* 3.141592 / 180# Next i End Funct P{ic Property Get minЖ()ИзЅM%tP=љNax' '' nkьermitˆtely IfC$in- <… ) іT€G= CЧ Х@Ш ЦA УЃЄ"& > )џЃ^Ъ*Э` Х@Ш ƒф.СWNext iУZeXбZDrawˆF(@<Rpli neСLфwLWPoLlyУXpo€Hs=Уw7Ъw%AK: ПЄ"ЃЁ$Єр=ц!эf3'h4ЂЄ%fЖ5Їh6ЂуŒ)fРЅ aЁ,Debu№g.Pr`Ц@Ђ/]A р:!q†$= HisA) ƒ.ModelЂЗ.AddLi`ghtWeЁE((Gу@-%.CldБTŒru` цUpd€А‡… jNoth@ ып;bP50F;_7 џ_7@_7Ё#_7g_7џ`ˆ „IЂaЙ‡^$Ця М@b"1"mЮf ё6џџџџ џџџџA ˆŠ}ЊїггL”Žщ1ЖмЇRЌCЩШQ[LЌе @E9л47"­"‚EЊЯ}bћо?дcЬ2H]I•ПЏМa–j?аёя”c‚N–k[шОT1DŠKУчH„ZљУc/ї Y8џџџџ џџџџA Ш6Qœ%Є6„џ:xУ l #KЎŠ›ЂŒ3ЌŠNБ-Vš LЃ$m€[ж€1HДbЃ‰г‰_б A3џџџџ џџџџA Шў?H`JЌўс%+‰X_ƒ(.ћkЪ9IНалVѓ ЙЏ’.—Ых™DЄSЮSщфГЂлџp)]GЁЄ"њщєўЏ Y4џџџџ џџџџA  TestS88šƒВёшА%M˜вЏЈЕдйІФ‹iйвIЌ‚юВXПтЭйŠƒЩПxчJИšTМА7М…~(Z~(oB€ѕ™%Зy hгнq{MNš7Гї9ŽX Љ5џџџџ џџџџA HЄ ЕhЕ?NЇЬŽ;дtСУї>BЖ-\B›s№ѕАџІдЋM.IЙ№оЏоњЙЩ ф;еžWB—_аSѓRB;fФ>њO‚@ўќЈœБ„-Wџџџџ џџџџA  Бш`H/AЁ<"ЅyіЁгтй ђ2@Д-ŽЧ|cТѓ–ЯэуFtў[=BѕOзџNЬ§MІМГю!…сИЁyWJ‡%уE’ƒuўў…YыЈHŸ.mєh2j 1@џџџџ џџџџA H  TestSS2 @ 0Џˆs/}*\R1*#121$*\Rffff*183ea9b066*\R1*#da*\R1*#5f*\R1*#11d*\R1*#5f*\R1*#11d*\R1*#77*\R1*#77*\R1*#5e*\R1*#5c$*\Rffff*0V3ea5fedb*\R1*#5f*\R1*#11d*\R1*#11dпџџџџpўЪˆ€„„€ џџџџBЁ ($0€ џџџџX€ џџџџB <`€ €Ј€А€ џџџџИ6+Ш,B,B0<%`, € џџџџ€ "И0Kр0K€ џџџџ€ џџџџ€ џџџџ0K@0Kp€ џџџџ€ џџџџ  А€ џџџџB ˜€€ ,.0,.`,.И,.ш€ џџџџИЈ€ џџџџ4 0 @H€ џџџџB и€р,.№,. ,.P,.€АРB и€р,.№,. ,.P,.€АРB Ш€а,.р,.,.@,.p АB  И€Р,а,,0,` B  Ј€А,Р,№, ,P €  B  ˜ €  ,А ,р , ,@ p € B  ˆ € ,  ,а , ,0 ` p B x €€ ,. ,.Р ,.№ ,. P ` € џџџџ€ џџџџ€ џџџџB P+X-x  € џџџџB Ј+А0>p  ар€ џџџџBЁ ш№јBЁ € џџџџџџџџЈ ] ђ€]ЌЌђЈ]ЌЌђа–  !'рnur zum verstehenАmџџ –№р!/ die BoundingBox erstellen und variablen fќllen]ђP]ђh]ђ€эЌ$.( $ &Ќ$B@ р& ersten eintrag abrufen(Ќ$$Ќ+FЌ$$Ќ+Ќ$&Ќ+FЌ$&Ќ+˜Фџ "ўЌ !Ќ ’ |џџџџџџџџA Р|šцЋ§LДrиВСhоќ@жŒТЉF€АbЯgшжЅqйђLŒГ’НŸ‹гђЦož=ЙBћE‡’‰++nџ™›ЕШї‡яO‡ю.БЄњ sРqH4ЋЪDŽ }О9—Ќ Q}џџџџџџџџA  @ 0 TesthhssMinX TestHH TestH Testccv TestdwfHP5#њОPG‰кeЕ[эŠуХF{CE˜щŠЫl’=4K> qNˆШoyБхЙуL™РьнeC˜\Ч„/‹ђЏОЉLєFˆ–њ‘v§№^"d~HЕП_§сkKМ ЙџџџџџџџџA @љ:љХ3ЅAЅђЏ|}:AЙ TestsdfdwfHŸи'@"И HЈ§х ѕ§ј hh|4<џџџџџџ@’nSXAdd(estHH"’ h…%xŠ тA­†•ЉŸŒя4BT’EŒѓС›нЯuР hh|4<џџџџџџD’8X0A005’c>ЂЫ~‡LДџДо—ЏsїO5єC)ьBЖх•Ћ7‘хoЁаyJЖlFІ`ухЗ*‰ј&р›ЭEЂњЂчV]А1rnеС|DЂ,~[ntљhГ;ЇхDƒ@BпуЂ{Э`AШЪ9ЧqСЙ ЙƒџџџџџџџџA јšЩЊxђЗЄDЄ—k*!џž‚tё„ I ^Еь@ОрАLќ џюJ‹I…Л*"љЮ€Kюnь3[ОAœцRQь0]Ад­KO‹рёЪ2Nk$§.ZлSLЂћP 1ю )…џџџџџџџџA 8р№ХуёŽMГrn[‹ъœ5щ1 @ыx@”Кў}9ЖР•7ё]jЈB’і{,6ЊуwGЃbBБнxлєлqŠH 5 “DМќШ0иeY I†џџџџџџџџA Ј‚Wј@ЂƒDОp}ŽКЂОŸVUзЧK–ЪОЕnМP† hh|4<to1’XАxШ’t[д#ЕиNЖšар'J!@ Ё\о~уњJ‡™6йf“ЋщƒŠь›л›ЂDИW"ХЦzc’СЉ7ЯJ›vвx)Єђƒ ˆџџџџџџџџA ‰KˆЏx•Nž#"хцњyз:BqЎdHœRWqНнŠЧ PrintMinPt hh|4<.tbe’XАx!Ш’#-Ј€Žx<MП`ENЇ €`pts--7C›ДFЅb{VўEpВBЁ?ЏЏЛќ{н‘ъъ#фD…іM Ў;IХ-œpиНOЁЩіѓ`ЫЩЯЌT…ов@žНЙ-ўЯкш A‹џџџџџџџџA XЃе•IИЈJЏ8:ЭGфМ PrintPoint2гЭддTœMЕИУЈй PrintMinPtX PrintMinPtY hh|4<џџџџџџH’8X0A005’c]q-<Ћ–K€+€Т јEе  €аЏ<%˜.LВ}Лс+§ј,ѕVи|ЯП>J‡Мjuї˜|нlЅыQ\AЋ_ъьw.jgе ћ7=ЖЉFЃў8 ЂN˜ГРYлHVKžТ# њ!$a AŽџџџџџџџџA ј X-ЬROЊš4"РЦ?кцћ>š.AЏ4Fяэ hh|4<t’X$њ$’ PrintPoint1lšЦЗPoCi5%*1пŸ Р А points(0)= points(1)= points(2)= points(3)= points(4)= points(5)= points(6)= points(7)=}ћJ1ЕY{HЄэtЛ|ЦЮ-*л’цrЈ@И(pАіЭyџ™OЯоьQNЕоš#‘Tvшэˆaxb№Oœ<‡ ђ ˆA‹2HNЁMёw dX “џџџџџџџџA ˜jЈjžи;BUŠ|Ъ пџM$(Z4­B›œЂЭП PrintPoirotFrmm1џџџџџџџџ&А…;4EТ,н*;EТfџџџџџџџџџџџџљЦo%'џџџџїbCompObjџџџџ(џџџџѕaVBFrameџџџџџџџџџџџџ№__SRP_2џџџџџџџџџџџџ~т__SRP_cџџџџџџџџџџџџўџџџ:__SRP_dџџџџџџџџџџџџўџџџgрab zweiten eintrag starten1. $ & "$B@ рmin und max punkte ermittelnineЌ$$Ќ$ ›GЌ$$Ќ+jЌ$$Ќ$ ›GЌ$$Ќ+jЌ$&Ќ$ ›GЌ$&Ќ+jЌ$&Ќ$ ›GЌ$&Ќ+jџ "ўШiџџHЌ$Ќ+0FЌ$Ќ+0t(1)Ќ$Ќ+0FЌ$Ќ+0t(1)э 0 !2%4.,З ,(6(7) = эА.,ih–Pџ "ўЌ !Ќ ’ : < "$B@>џ "ўШiџџи–№џ "ўЌ !Ќ ’џ "ўШiџџ€– 'Hmџџh–№ 'JmџџP]ђ ]ЌЌђXЌ$Ќ+0FЌ$Ќ+0PolyЌ$Ќ+0FЌ$Ќ+0џџџџ€–аџџџџ@[йЌ$ж[йЌ$жџџџџxџџџџ –`]ЌЌђјЌ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$0'BiџџИџџџџАџџџџp–@]ЌЌђЌ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$0'Diџџ–0]ЌЌђрЌ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0$Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0$Ќ$0'Fiџџ–Ш]ЌЌђ€Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$0'Hiџџ –ˆ]ЌЌђаЌ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$0'Jiџџ0– ]ЌЌђАЌ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$0'Liџџ@–И ]ЌЌђШЌ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0Ќ$0'NiџџP–h ]ЌЌђ Ќ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0eЌ$Ќ+0FЌ$Ќ+0Ќ$Ќ+0FЌ$Ќ+0adЌ$0'Ptiџџ@ џџџџ8 B DДz‹ќњ! @Д€f@ "$B@Fџџџџh џџџџcЕAttribute VB_Name = "ssetClass" " €Bas€0{FCFB3D2A-A0FA-1068-A738-08002B33 71B5} |GlobalЪSpa‚c’False dCreatablPredecl2aIdЎCExposeTemplateDeriv–Customiz EPublic ‘ As AcadSelectionSet Dim MinPt(0 ToШ 2)DotIax .Property Get Count(‚"Integрer ‚ D.'nur zum vers tehen End * †3XFun‚[СB€d@ingBox'  die Ш B@llen uvariСEn fќ;ƒ=i:)С:tmжpРBVA nФGЄaxŠ @O ObjD5(0) v 7.€B‰#AiTn, M@'У'n eintragР abrufС?„bЎ)РУ :h1Hž1Р@AfEaxУ ТkЦ @С For i1yШ`- 1 'ab zwe it@K$starчРУn5i)5ƒ C('mi^m;punkьermitˆtely IfC$in- <… ) іT€G= CЧ Х@Ш ЦA УЃЄ"& > )џЃ^Ъ*Э` Х@Ш ƒф.СWNext iУZeXбZDrawˆF(@<Rpli neСLфwLWPoLlyУXpo€Hs=Уw7Ъw%AK: ПЄ"ЃЁ$Єр=ц!эf3'h4ЂЄ%fЖ5Їh6ЂуŒ)fРЅ aЁ,Debu№g.Pr`Ц@Ђ/]A р:!q†$= HisA) ƒ.ModelЂЗ.AddLi`ghtWeЁE((Gу@-%.CldБT ru` Ќ Nothз П9BPa30&9?5џ@t?5т=?5#?5gџ?5`ˆ dGсŸAЗg\пФ€К@b"1"І " Д?nts(џп+Q?Qп+Q?Qћм+7171*?y?фt2?o @p?y§?0з4=Q ?Q?џQ?Q?Q?Q?дnt272$?Л?Б+3??ђ00FџА?Q ?Q?Q?Q?Q?Q?4373?“›"t4?џ??VW?Q ?Q?џQ?Q?Q?Q?u4474??d5Я????t(!;џDџx6? ?Q?Q?яQ?Х 75??dў6?????“Жџ? ?Q?Q?Qw?Х 76??d7џ??????I8%џ?q?Q?Q?Х 77>ЇЏдssMove(FromћbZHЮ, Т=P•ФттЗ›ФršВц(аТ †iж џАo@СП sаsRotpя(qќ“бАAs Variant, RotationAngle ШDouble) For i = 0 To sset.Count - 1 &(i).„e BasePoiЈ* 3.141592 / 180# Next i En@d Func  P{ic Property Get minљV()žИЅ:M%tP=NaxN '' 8ComboBox1tto q(х € 8ComboBox2ttoњq(ѕ€ 28 Label3x1иE(х € X CheckBox1tto &{(х €` CheckBox2tto &E(х €\ CheckBox3tto &іџџџџџџmbedFrmrotFrmrotFrmџџџ6"џџџџџџN0{8E75D913-3D21-11D2-85C4-080009A0C626} џџџџ €ўџџџџџџџ(џџџџџџџџџџ%џџџџƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ џџџџўџџџџџўџџџџџџџџџџџ %џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh8@||џџџџџџџџџџџџџџџџџџџџџџ0сЙЊ>$*\Rffff*0V3ea5fedbпџџџџ4ўЪџџџџџџџџxџџџџМАAttribute VB_Name = "ThisDrawingˆ" ˆBasˆ0{8E75D913-3D21-11D2-85C4-080009€A0C626} |@GlobalЮSpac’False dCreatablPredeHclaIdАTru BExposeTempla€teDeriv’BustomizD2VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} bedFrm Caption = "bedFrm" ClientHeight = 2055 ClientLeft = 45 ClientTop = 330 ClientWidth = 7290 StartUpPosition = 1 'Fenstermitte TypeInfoVer = 4 End ўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9Вq (€Objekte wфhlenь "u€ЅTahoma (€Liste anzeigenь "u€ЅTahoma(€zфhlenь Ou€ЅTahoma((€Objekte optimal drehenт"u€ЅTahoma  };2)Ф„,х€@CommandButton1{Ї,х€@CommandButton2Ї,х€8CommandButton3u{,х€HCommandButton4{qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} rotFrm Caption = "rotFrm" ClientHeight = 3225 ClientLeft = 45 ClientTop = 330 ClientWidth = 8955 StartUpPosition = 1 'Fenstermitte TypeInfoVer = 1 End ўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9Вq!C4Д:иN}ыД:яЭЋe€€€оьН№њп  }Д=9<kaK№бН‹…бБjР№(6(J№бН‹…бБjР№(6(I№бН‹…бБjР№(6(XоPх €b€$€ListView1ttoЇд9368265E-85FE-11d1-8BE3-0000F8754DA1F’ Дpџ.+((џ\џXџX4 lXџѕЎ§i8џўhџg-§(џ%§ Hџ%џќэ\џX4 џ ˆџ \џў~џ/џ/ˆp4џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ