;@Extension.Container.Version.1 ;-- DO NOT CHANGE THE LINE ABOVE -- IF (VERSION.BUILD.BASE()<138311.) ( PRINTF %ERROR "%s: Software too old, please contact support@lauterbach.com." "QXK" ENDDO ) PMACRO.EXPLICIT PRIVATE &sParamline &sPpf &sCmd &sParameters &sAccess &sAccessSpaces &sAccessMachine &sOptionAccess &sOptionAccessMisc &sName &sMachine &sArguments &nVariant PRIVATE &bTaskConfig &bExtLoad &bCleanup ENTRY &sCmd %LINE &sParamline &sParameters=STRing.SCANAndExtract("&sParamline","PARAMETERS=","") &sAccess=STRing.SCANAndExtract("&sParamline","ACCESS=","") &sAccessSpaces=STRing.SCANAndExtract("&sParamline","ACCESSSPACES=","") &sAccessMachine=STRing.SCANAndExtract("&sParamline","ACCESSMACHINE=","") &sName=STRing.SCANAndExtract("&sParamline","NAME=","") &sMachine=STRing.SCANAndExtract("&sParamline","MACHINE=","") &sArguments=STRing.SCANAndExtract("&sParamline","ARGUMENTS=","") &sParameters=STRing.Replace("&sParameters","""","",0.) IF ("&sArguments"!="") &sArguments=&sArguments IF ("&sAccess"!="") &sOptionAccess="/ACCESS &sAccess" IF ("&sAccessSpaces"!="") &sOptionAccessMisc="/ACCESSSPACES &sAccessSpaces" IF ("&sAccessMachine"!="") &sOptionAccessMisc="&(sOptionAccessMisc) /ACCESSMACHINE &sAccessMachine" &sName=STRing.Replace("&sName","""","",0.) &bTaskConfig=STRing.SCAN("task.config,ext.config",STRing.LoWeR("&sCmd"),0.)>=0. &bExtLoad=STRing.SCAN("ext.load",STRing.LoWeR("&sCmd"),0.)>=0. &bCleanup=STRing.SCAN("task.res,ext.res,ext.delete",STRing.LoWeR("&sCmd"),0.)>=0. &sPpf=OS.PresentPracticeFile() IF (&bTaskConfig||&bExtLoad) ( IF ("&nVariant"!="32.")&&("&nVariant"!="64.") ( IF CPUIS64BIT() &nVariant="64." ELSE &nVariant="32." ) IF STRing.ComPare("&sArguments","*32BIT*") &nVariant="32." ELSE IF STRing.ComPare("&sArguments","*64BIT*") &nVariant="64." ) IF (&bTaskConfig) ( PRIVATE &sMachineName &sMachineName="QXK" TASK.RESet IF (&nVariant==32.) ( GOSUB extension_32bit "&sParameters" "&sOptionAccess" IF !STRing.Compare("&sArguments","*MENU=NONE*") GOSUB menu_32bit "&sMachineName" "" GOSUB autoload_32bit "" ) ELSE IF (&nVariant==64.) ( PRINTF %ERROR "%s: No support for %ubit, please contact support@lauterbach.com." "QXK" &nVariant ) ) ELSE IF (&bExtLoad) ( PRIVATE &sMachineName &sInfix &sOptionName &sOptionMachine &sInfix="" &sMachineName="QXK" IF ("&sName"!="") ( &sInfix=STRing.UPpeR("&(sName).") &sMachineName="&(sName)" &sOptionName="/NAME &sMachineName" ) ELSE IF PRACTICE.FUNCtion.AVAILable(SYStem.Option.MACHINESPACES) ( IF SYStem.Option.MACHINESPACES() &sInfix=TASK.TRANSPOSE.INFIX(OS.FILE.BASENAME("&sPpf",".**"))+"." ) IF ("&sMachine"!="") ( &sOptionMachine="/MACHINE &sMachine" ) IF (&nVariant==32.) ( GOSUB extension_32bit "&sParameters" "&sOptionAccess &sOptionAccessMisc &sOptionName &sOptionMachine" IF !STRing.Compare("&sArguments","*MENU=NONE*") GOSUB menu_32bit "&sMachineName" "&sInfix" GOSUB autoload_32bit "&sOptionMachine" ) ELSE IF (&nVariant==64.) ( PRINTF %ERROR "%s: No support for %ubit, please contact support@lauterbach.com." "QXK" &nVariant ) ) ELSE IF (&bCleanup) ( PRIVATE &sMachineName &sOptionMachine &sMachineName="QXK" IF ("&sName"!="") ( &sMachineName="&(sName)" ) IF ("&sMachine"!="") ( &sOptionMachine="/MACHINE &sMachine" ) IF STRing.SCAN(HELP.FILTER(),"rtosqxk",0.)>=0. HELP.FILTER.Delete rtosqxk GOSUB menu_delete "&sMachineName" GOSUB autoload_delete "&sOptionMachine" ) ENDDO extension_32bit: ; (options) ( PARAMETERS &sParameters &sOptions EXTension.LOAD &sParameters &sOptions ( VDMyTQAwMDMuMDAxQCgjKVRSQUNFMzIgY29uZmlndXJhdGlvbiBmaWxlIFYwMDMuMDAxIDogYXJt L3F4awAAAAAAAAAAAAAAdGwAADBAZGwAAANgZGEABAAAZXAAAAAkaHMABAc0AABURVhUAAECAwAA JMwAACdsAAAAAAAAAAAAAAAAAAAAAAAAAABOgAAglCH/8HwIAqaQAQAUPGAAADhjHChIACNpPGAA ADhjHMBIACMhPGAAADhjHGRIACMhPGAAADhjHRhIACMhSAAMtUgAD71IABV1SAASUUgAGk1IABuJ PGAAADhjHhhIACMJPGAAADhjIQhIACMJSAAe0UgAH7VIACFdSAAh/TxgAAQ4YwAASAAkGYABABR8 CAOmOCEAEE6AACCUIf/wfAgCppABABSTwQAIk+EADDxgAAA4YydwSAAi1T0gAASQaQcIP+AAADv/ J3x/4/t4SAAivT0gAASQaQcEf+P7eEgAIrl8YxZwfGMBlD0gAASQaQcAPGAAADhjJ4hIACKRPSAA BJBpBvw8YAAAOGMnlEgAIn09IAAEkGkG+DxgAAA4YyegSAAimTxgAAA4YyesSAAigT0gAASQaQb0 PGAAADhjJ7RIACJtPSAABJBpBvA9IAAEgSkHDCwJAABAggAgPSAABIEpBwg9QAAEgUoG9H0pUhQ9 QAAEkSoHDDxgAAA4YyfASAAiOTxgAAA4YyfMSAAiIT0gAASQaQbsPGAAADhjJ9RIACINPSAABJBp Bug8YAAAOGMn4EgAIgUsA///QYIDUD/gAAA7/yfMf+P7eEgAIeE9IAAEkGkG5DxgAAA4Yyf4SAAh zT0gAASQaQbgPGAAADhjKABIACG5PSAABJBpBtw8YAAAOGMoDEgAIaU9IAAEkGkG2DxgAAA4YygU SAAhkT0gAASQaQbUPGAAADhjKCBIACGJPGAAADhjKDBIACFxPSAABJBpBtA8YAAAOGMoPEgAIV09 IAAEkGkGzDxgAAA4YyhESAAhST0gAASQaQbIPGAAADhjKExIACE1PSAABJBpBsQ8YAAAOGMoVEgA ISE9IAAEkGkGwDxgAAA4YyhcSAAhDT0gAASQaQa8PGAAADhjKGRIACD5PSAABJBpBrg/wAAAO94o bH/D83hIACDVPSAABJBpBrR/w/N4SAAg3TxgAAA4Yyh0SAAgxT0gAASQaQawPGAAADhjKHxIACCx PSAABJBpBqw8YAAAOGMoiEgAIJ09IAAEkGkGqDxgAAA4YyiUSAAglX/j+3hIACCBPSAABJBpBqQ8 YAAAOGMopEgAIG09IAAEkGkGoDxgAAA4YyisSAAgWT0gAASQaQacPGAAADhjKLRIACBFPSAABJBp Bpg8YAAAOGMovEgAIDE9IAAEkGkGlDxgAAA4YyjISAAgKTxgAAA4YyjQSAAgET0gAASQaQaEPGAA ADhjKNxIAB/9PSAABJBpBpAsA///QYIBXDxgAAA4Yyj0SAAf4T0gAASQaQaILAP//0GCAVg8YAAA OGMpDEgAH9E8YAAAOGMpGEgAH7k9IAAEkGkGgDxgAAA4YyjQSAAfpT0gAASQaQZ8PGAAADhjKSBI AB+RPSAABJBpBng/4AAAO/8pLH/j+3hIAB9tPSAABJBpBnR/4/t4SAAfdTxgAAA4Yyk0SAAfXT0g AASQaQZwPGAAADhjKERIAB9JPSAABJBpBmw8YAAAOGMpPEgAHzU9IAAEkGkGaDxgAAA4YylISAAf IT0gAASQaQZkPGAAADhjKFxIAB8NPSAABJBpBmA8YAAAOGMoZEgAHvk9IAAEkGkGXDxgAAA4YylQ SAAe8TxgAAA4YylYSAAe2T0gAASQaQZYPSAABIBpBww4YwABfGMANFRj2X6AAQAUfAgDpoPBAAiD 4QAMOCEAEE6AACA8YAAAOGMn8EgAHqVL//yoPGAAADhjKOhIAB6JPSAABJBpBpBL//6UPGAAADhj KQBIAB5xPSAABJBpBohL//6YlCH/4JPhABw9IAAEgSkHACwJAABBggDEfAgCppABACSTQQAIk2EA DJOBABCToQAUk8EAGHx7G3g7wAAAP6AABD9AAAQ/gAAESAAAFDveAAGBPAcAfAnwQECBAFBXyRA6 gH0HBHxpGhRIAB4pfH8beUGC/9yAegbYfH8aFEgAHf18A9gAQIL/yINBAAiDYQAMg4EAEIOhABSD wQAYgAEAJHwIA6ZIAAAkO+D//4NBAAiDYQAMg4EAEIOhABSDwQAYgAEAJHwIA6Z/4/t4g+EAHDgh ACBOgAAgO+D//0v//+w9IAAEgSkHACwJAABNggAglCH/4HwIAqaQAQAkk0EACJNhAAyTgQAQk6EA FJPBABiT4QAcfHsbeDvAAAA/gAAEP0AABD+gAARIAAAUO94AAYE9BwB8CfBAQIEAQFfJEDqAfAcE fGkaFEgAHUl8fxt5QYL/3IB6Bth8fxoUSAAdHXwD2ABAgv/IOIAAIH/j+3hIAB05S///uIABACR8 CAOmg0EACINhAAyDgQAQg6EAFIPBABiD4QAcOCEAIE6AACCUIf/wfAgCppABABSTwQAIk+EADHx+ G3h8nyN4OGAAekgAHQ08YAAAOGMpYEgAHNE4YAAASAAc+Xwe+EBBggBsPSAABIBpBuQ9IAAEgSkG WHxjShR8Y/IUSAAcmXxpG3lBggBsPUAABIPKBuB/3khQP+AAADv/KdR/4/t4SAAcgX/E83g8YAAA OGMphEgAHHE4gAAgf8PzeEgAHHF/4/t4SAAcXUgAABA8YAAAOGMpeEgAHE2AAQAUfAgDpoPBAAiD 4QAMOCEAEE6AACA9IAAEgGkHCD0gAASBKQbwfGNKFEgAHBF8fxt4PSAABIBpBthIABvpOGP//3// HDBz6QABQYIAFDxgAAA4YymYSAAb8Uv//6Q8YAAAOGMppEgAG+FL//+UlCH/8HwIAqaQAQAUPSAA BIEpBtB8Y0oUSAAbtSwDAABAggAcPGAAADhjKbSAAQAUfAgDpjghABBOgAAgPGAAADhjKbBL///o lCH/wHwIAqaQAQBEk2EALJOBADCToQA0k8EAOJPhADw9IAAEgSkG4H+jShQ4YAB6SAAbkTxgAAA4 Yym8SAAbVThgAH5IABt9PGAAADhjKcRIABtBOGAAAEgAG2l/o+t4S///WXxkG3g8YAAAOGMp0EgA GyE4YAB6SAAbSTxgAAA4YynYSAAbDThgAABIABs1PSAABIBpBsh8fRoUSAAa0Xx/G3g9IAAEgGkG xHx9GhRIABq9fH4beD0gAASAaQbAfH0aFEgAGql8fBt4PSAABIBpBrx8fRoUSAAalXx7G3g9IAAE gGkGuHx9GhRIABqBfGgbeH9n23h/huN4f8XzeH/k+3g8YAAAOGMp/EgAGoU9IAAEgGkG0Hx9GhRI ABppLAMAAECCACiAAQBEfAgDpoNhACyDgQAwg6EANIPBADiD4QA8OCEAQE6AACCTIQAkOGAAekgA Gm08YAAAOGMqIEgAGjE4YAB+SAAaWTxgAAA4YyosSAAaHThgAABIABpFPGAAADhjKdRIABoJPSAA BIBpBsh8fRoUSAAZ1Xx/G3g9IAAEgGkGxHx9GhRIABnBfGkHdH//B3Q7////fAn4AEGCAMR9OUt4 fB9IAECBAMCSoQAUksEAGJLhAByTAQAgk0EAKD6gAAQ+wAAEPuAABD8AAAQ/QAAAO1oqTIB1Bsx8 fRoUSAAZgVfpEDp8aRoUSAAZdXx+G3iAdgawfH4aFEgAGVl8fBt4gHcGrHx+GhRIABk9fHsbeIB4 Bqh8fhoUSAAZLXxnG3h/Ztt4f4XjeH/k+3h/Q9N4SAAZOTv///98H8gAQIL/mIKhABSCwQAYguEA HIMBACCDIQAkg0EAKEv//qg5IP//S///PIMhACRL//6YlCH/4HwIAqaQAQAkk2EADJOBABCToQAU k8EAGJPhABw9IAAEgSkG6H/jShQ9IAAEg8kGpH/f8hQ4YAB6SAAY8TxgAAA4YypsSAAYtThgAH5I ABjdPGAAADhjKnxIABihPSAABIBpBrB8fhoUSAAYeXx9G3g9IAAEgGkGrHx+GhRIABhZfHwbeD0g AASAaQaofH4aFEgAGEV8fht4PSAABIBpBph8fxoUSAAYPXx7G3g9IAAEgGkGlHx/GhRIABgpfGgb eH9n23h/xvN4f4XjeH+k63g8YAAAOGMqoEgAGCGAAQAkfAgDpoNhAAyDgQAQg6EAFIPBABiD4QAc OCEAIE6AACCUIf/wfAgCppABABQ8oAAAOKUvuDiAAB88YAAEOGMHFEgAGC09IAAEkGkHEDxgAAA4 YwxYgAEAFHwIA6Y4IQAQToAAIJQh//B8CAKmkAEAFEv/9Fk9IAAEgSkG3CwJ//9BggB0PSAABIEp BxAsCf//QYIAgCwJAABBggAsPSAABIEpBtQ8YAAEOGMAECwJ//9BggBQPGAABDhjABA4YwBASAAA QD0gAASBKQbULAn//0GCABQ8YAAEOGMAEDhjABBIAAAgPGAABDhjABA4YwBQSAAAEDxgAAQ4YwAQ OGMAIIABABR8CAOmOCEAEE6AACA8YAAEOGMAEDhjADBL///klCH/8HwIAqaQAQAUPGAABDhjABA4 YwBgSAAWCYABABR8CAOmOCEAEE6AACCUIf/wfAgCppABABST4QAMfH8beHwDIABBggCUf+T7eDxg AAA4YyrESAAXETxgAAA4YyrYSAAXEX/k+3g8YAAAOGMq5EgAFolIABbBPSAABIBpBtQsA///QIIA YD0gAASAaQbYfH8aFEgAFkF8ZBt4PGAAADhjKvBIABZVSAAWjTiAACB/4/t4SAAWaTxgAAA4YynU SAAWOYABABR8CAOmg+EADDghABBOgAAgOGAAAkgAFk1L//9ofGP6FEgAFe18ZBt4PGAAADhjKuhI ABYBSAAWOUv//4iUIf/gfAgCppABACSTYQAMPSAABIBpBwxIABXRfHsbeEv/8oU9IAAEgSkHACwJ AABBggCMk0EACJOBABCToQAUk8EAGJPhABw7wAAAP4AABD9AAAQ/oAAESAAAFDveAAGBPQcAfAnw QECBAEBXyRA6gHwHBHxpGhRIABVxfH8beUGC/9yAegbcfH8aFEgAFV0sAwAAQYL/yH9k23h/4/t4 S//+iUv//7iDQQAIg4EAEIOhABSDwQAYg+EAHIABACR8CAOmg2EADDghACBOgAAglCH/4HwIAqaQ AQAkk6EAFJPBABiT4QAcPSAABIPJBxA9IAAEgGkHDEgAFPF8fRt4fGQbeH/D83hL//4hP+AAADv/ KdR/4/t4SAAU3X+k63h/w/N4S//31X/j+3hIABTJf8PzeEv/+8V/4/t4SAAUuX/D83hL//khgAEA JHwIA6aDoQAUg8EAGIPhABw4IQAgToAAIJQh//B8CAKmkAEAFDygAAA4pSmsOIAAHzxgAAQ4YwcU SAAUxT0gAASQaQcQPGAAADhjD8CAAQAUfAgDpjghABBOgAAglCH/8HwIAqaQAQAUS//w8T0gAASB KQcQLAn//0GCADQ8YAAEOGMAqCwJAABAggAUgAEAFHwIA6Y4IQAQToAAIDxgAAQ4YwCoOGMAIEv/ /+Q8YAAEOGMAqDhjABBL///UlCH/8HwIAqaQAQAUPGAABDhjAKg4YwAwSAAS/YABABR8CAOmOCEA EE6AACCUIf/wfAgCppABABST4QAMfH8beHwDIABBggCEf+T7eDxgAAA4Yyu0SAAUBTxgAAA4YyvI SAAUBX/k+3g8YAAAOGMq5EgAE31IABO1PSAABIBpBth8fxoUSAATRXxkG3g8YAAAOGMq8EgAE1lI ABOROIAAIH/j+3hIABNVPGAAADhjKdRIABM9gAEAFHwIA6aD4QAMOCEAEE6AACA4YAACSAATUUv/ /3iUIf/gfAgCppABACSTgQAQPSAABIBpBwxIABL1fHwbeEv/76k9IAAEgSkHACwJAABBggBgk6EA FJPBABiT4QAcO+AAAD+gAAQ/wAAESAAAHH+E43hL//8FO/8AAYE+BwB8CfhAQIEAIFfpEDqAfQcE fGkaFEgAEpksAwAAQYL/3Ev//9CDoQAUg8EAGIPhAByAAQAkfAgDpoOBABA4IQAgToAAIJQh//B8 CAKmkAEAFJPhAAw9IAAEg+kHED0gAASAaQcMSAASSXxkG3h/4/t4S//+iTxgAAA4YynUSAASPT0g AASAaQbULAP//0CCACB/4/t4S//2lYABABR8CAOmg+EADDghABBOgAAgfGP6FEgAEeV8ZBt4PGAA ADhjK9BIABH5S///zJQh//B8CAKmkAEAFDxgAAA4Yyw8SAASJT0gAASQaQcQPGAAADhjElSAAQAU fAgDpjghABBOgAAglCH/8HwIAqaQAQAUS//uXT0gAASBKQcQLAkAAEGCADw9IAAEgSkGhDxgAAQ4 YwD8LAn//0GCABSAAQAUfAgDpjghABBOgAAgPGAABDhjAPw4YwAgS///5DxgAAQ4YwD8OGMAEEv/ /9SUIf/wfAgCppABABQ8YAAEOGMA/DhjADBIABBhgAEAFHwIA6Y4IQAQToAAIJQh//B8CAKmkAEA FJPhAAx8fxt4fGQbeDxgAAA4YyxESAARcTxgAAA4YyxUSAARcX/k+3g8YAAAOGMq5EgAEOlIABEh OIAAIH/j+3hIABDlSAARET0gAASAaQaELAP//0CCAIA9IAAEgGkGiHx/GhRIABCRfH8beHxkG3g8 YAAAOGMsaEgAEQ08YAAAOGMq2EgAEQ1/4/t4S//x8XxkG3g8YAAAOGMq5EgAEH08YAAAOGMu3EgA EHF/4/t4S//yrTxgAAA4YynUSAAQXYABABR8CAOmg+EADDghABBOgAAgfGP6FEgAEDV8aBt4OUD/ /ziAAAA5IAAgfSkDpn0JVDBVKQf+fIRKFDlKAAFCAP/wPGAAADhjLGBIABANSAAQRUv//0SUIf/Q fAgCppABADST4QAsPSAABIPpBxB/4/t4S//+wTxgAAA4YynUSAAP2T0gAASBKQaELAn//0CCABiA AQA0fAgDpoPhACw4IQAwToAAIJMhABSTQQAYk2EAHJOBACCToQAkk8EAKDhgAHpIAA/FPGAAADhj LHxIAA+JOGAAAEgAD7E9IAAEgGkGhHx/GhRIAA9lfH4beDvgAAA/IAAAOzkqxD9AAAA7WirYP2AA ADt7KuQ/gAAAO5wu3D+gAAA7vSnUSAAAUH/k+3h/I8t4SAAPnX9D03hIAA+hf+P7eEv/8IV8ZBt4 f2PbeEgADxV/g+N4SAAPDX/j+3hL//FJf6PreEgADv07/wABLB8AH0GCABg5P///f8lMMHEpAAFB gv/oS///pDxgAAA4YynUSAAO0YMhABSDQQAYg2EAHIOBACCDoQAkg8EAKEv//vCUIf/wfAgCppAB ABQ8YAAAOGMtBEgADuU9IAAEkGkHEDxgAAA4YxWUgAEAFHwIA6Y4IQAQToAAIJQh//B8CAKmkAEA FEv/6x09IAAEgSkHEDxgAAQ4YwFkLAkAAEGCABSAAQAUfAgDpjghABBOgAAgPGAABDhjAWQ4YwAQ S///5JQh//B8CAKmkAEAFDxgAAQ4YwFkOGMAIEgADUGAAQAUfAgDpjghABBOgAAglCH/8HwIAqaQ AQAUk+EADHx/G3h8ZBt4PGAAADhjLERIAA5RPGAAADhjLRBIAA5Rf+T7eDxgAAA4YyrkSAANyUgA DgE4gAAgf+P7eEgADcVIAA3xPSAABIBpBoB8fxoUSAANgXxkG3g8YAAAOGMtHEgADZVIAA3NPSAA BIBpBnx8fxoUSAANdTlA//84gAAAOSAAIH0pA6Z8aVQwVSkH/nyEShQ5SgABQgD/8DxgAAA4Yyxg SAANUTxgAAA4YynUSAANRYABABR8CAOmg+EADDghABBOgAAglCH/0HwIAqaQAQA0kyEAFJNBABiT YQAck4EAIJOhACSTwQAok+EALD0gAASD6QcQf+P7eEv//vU8YAAAOGMp1EgADO04YAB6SAANFTxg AAA4Yyx8SAAM2ThgAABIAA0BPSAABIBpBnx8fxoUSAAMtXx+G3g74AAAPyAAADs5KsQ/QAAAO1oq 2D9gAAA7eyrkP4AAADucLtw/oAAAO70p1EgAAFB/5Pt4fyPLeEgADO1/Q9N4SAAM8X/j+3hL/+3V fGQbeH9j23hIAAxlf4PjeEgADF1/4/t4S//umX+j63hIAAxNO/8AASwfACBBggAYOT///3/JTDBx KQABQYL/6Ev//6Q8YAAAOGMp1EgADCGAAQA0fAgDpoMhABSDQQAYg2EAHIOBACCDoQAkg8EAKIPh ACw4IQAwToAAIDxgAAA4YxgoToAAIJQh//B8CAKmkAEAFEv/6Ik9IAAEgSkG/DxgAAQ4YwGsLAn/ /0GCABSAAQAUfAgDpjghABBOgAAgPGAABDhjAaw4YwAQS///5JQh/7B8CAKmkAEAVJMhADQ9IAAE gGkG+EgAC2F8eRt5QYICGJHBAAiR4QAMkgEAEJIhABSSQQAYkmEAHJKBACCSoQAkksEAKJLhACyT AQAwk0EAOJNhADyTgQBAk6EARJPBAEiT4QBMO2AAAD3AAAQ94AAEPkAAADpSLEQ+YAAAOnMtnD+A AAA7nCrkPgAABD9AAAA7Wi2oPiAABD6AAAA6lC2wPqAAADq1LbQ+wAAAOtYtHD7gAAA69yrwPwAA ADsYKdSD7gZ0f/v51oEvBvx//0oUf+T7eH5Dk3hIAAstfmObeEgACzF/5Pt4f4PjeEgACq1IAArl gHAGcHx/GhRIAAqRfH4beHxkG3h/Q9N4SAAK+X/E83h/g+N4SAAKgUgACrmAcQZsfH8aFEgACmV8 fRt4fGQbeH9D03hIAArNf6TreH+D43hIAApVSAAKjXye6FB/g+N4SAAKRUgACn09IAAEgGkGaHx/ GhRIAAoZfGQbeH6Do3hIAAolSAAKXT0gAASAaQZkfH8aFEgACfl8ZBt4fqOreEgACgVIAAo9PSAA BIBpBmB8fxoUSAAJ2XxkG3h+w7N4SAAJ5UgACh09IAAEgGkGXHx/GhRIAAmtfGQbeH7ju3hIAAnF SAAJ/X8Dw3hIAAm5O3sAAXwZ2ABAgv7UgcEACIHhAAyCAQAQgiEAFIJBABiCYQAcgoEAIIKhACSC wQAoguEALIMBADCDQQA4g2EAPIOBAECDoQBEg8EASIPhAEyAAQBUfAgDpoMhADQ4IQBQToAAIJQh //B8CAKmkAEAFDxgAAQ4YwGsOGMAIEgACGGAAQAUfAgDpjghABBOgAAgPGAAADhjGvROgAAglCH/ 8HwIAqaQAQAUS//lvTxgAAQ4YwIEgAEAFHwIA6Y4IQAQToAAIJQh//B8CAKmkAEAFJPBAAiT4QAM PSAAADkpJOQ9QAAEOUoAAIEJACSA6QAogMkALICqAAiAigAEPGAAADhjLmBIAAixP+AABIPfBwx/ w/N4SAAIlXxlG3h/xPN4PGAAADhjLpRIAAiNOIAAIIB/BwxIAAiNP+AAADv/KdR/4/t4SAAIcT/A AASAngcEPGAAADhjLrBIAAhdOIAAIIB+BwRIAAhdf+P7eEgACEk9IAAEgIkHADxgAAA4Yy7ISAAI NX/j+3hIAAgtgAEAFHwIA6aDwQAIg+EADDghABBOgAAglCH/8HwIAqaQAQAUPGAABDhjAgQ4YwAQ SAAHIYABABR8CAOmOCEAEE6AACCUIf/wfAgCppABABRL/+SJPSAABDhpA2A9QAAEgUoHDJFJA2A5 IAAEkSMABIABABR8CAOmOCEAEE6AACCUIf/wfAgCppABABSTwQAIk+EADHx/G3hL/+RBP8AABDig ACB/5Pt4OH4DcEgAB5WJPgNwOGAAACwJAABBggAIOH4DcIABABR8CAOmg8EACIPhAAw4IQAQToAA IJQh//B8CAKmkAEAFJPhAAx8fxt4S//j6T0gAASAaQbULAP//0GCACB8Y/oUSAAG/YABABR8CAOm g+EADDghABBOgAAgPSAABIBpBth8fxoUSAAG2Uv//9yUIf/QfAgCppABADSToQAkS//jlT0gAASB KQbcO6AAACwJ//9BggCsPSAABIEpBwAsCQAAQYIAxJMhABSTQQAYk2EAHJOBACCTwQAok+EALDvA AAA/YAAEPyAABD9AAAQ7WgOQP4AABEgAABQ73gABgTwHAHwJ8EBAgQBAV8MQOoE7BwR8Y0oUSAAG YXx/G3lBgv/cgHkG3Hx/GhRIAAZNLAMAAEGC/8hXqRA6f/pJLju9AAFL//+4gyEAFINBABiDYQAc g4EAIIPBACiD4QAsPGAABDhjA5BXvRA6OSAAAH0j6S6AAQA0fAgDpoOhACQ4IQAwToAAIDugAABL ///UlCH/8HwIAqaQAQAUk8EACJPhAAx8fxt4S//ijT0gAAQ7yQUgk+kFID0gAASAaQbcfH8aFEgA BbWQfgAMf8PzeIABABR8CAOmg8EACIPhAAw4IQAQToAAIJQh//B8CAKmkAEAFEv/4kE8YAAEOGMC KIABABR8CAOmOCEAEE6AACCUIf/wfAgCppABABQ4YAAASAAF6TkgAAAsAwACQYIAIDxgAASRIwUw OGMFMIABABR8CAOmOCEAEE6AACA4YAABSAAFuT0gAASBKQcMfSkaeH0pADRVKdl+S///yJQh//B8 CAKmkAEAFJPhAAw4YAAESAAFiXx/G3h8ZBt4PGAAADhjLxRIAATxPSAABIBpBtR8fxoUSAAEyXxk G3g8YAAAOGMvLEgABNE8YAAAOGMvQEgABMWAAQAUfAgDpoPhAAw4IQAQToAAIJQh//B8CAKmkAEA FDxgAAQ4YwIoOGMACEgAA9WAAQAUfAgDpjghABBOgAAglCH/8HwIAqaQAQAUS//hJT0gAAQ4aQU4 OUAABJFJBTg9IAAEgSkHDJEjAAyRIwAIkSMABD0gAAA5KR/ckSMAEIABABR8CAOmOCEAEE6AACCU If/wfAgCppABABST4QAMOGAAAEgABKE74AAALAMAAkGCABx/4/t4gAEAFHwIA6aD4QAMOCEAEE6A ACA4YAABSAAEdT0gAASBKQcMfANIAECC/9Q4YAAESAAEXXx/G3g4YAAASAAEXUv//7yUIf/wfAgC ppABABQ8YAAEOGMCOEgAAv2AAQAUfAgDpjghABBOgAAglCH/8HwIAqaQAQAUk+EADD0gAASBKQbc fGNKFEgAA3V8fxt5QIIAIDxgAAQ4YwVMgAEAFHwIA6aD4QAMOCEAEE6AACA4fwAESAADSSwD//1B ggBAPSAABDkpAkA5KQAEf+r7eDkAABB9CQOmkUkAADlKAAQ5KQAMQgD/9DxgAAQ4YwJAO/8ASJPj AMRL//+kO/8ACEv//8CUIf/wfAgCppABABST4QAMfH8beEv/36E9IAAEgGkHDEgAAtl8A/gAQYIA IH/j+3hL//85gAEAFHwIA6aD4QAMOCEAEE6AACA8YAAEOGMCQDhjANhL///glCH/8HwIAqaQAQAU k+EADHx/G3h8ZRt4fGQbeDxgAAA4Yy/ASAADJUv/3zU8gAAAOIQv2H/j+3hIAAEpLAMAAEGCAEg8 gAAAOIQv4H/j+3hIAAERfGkbeDhgAAQsCQAAQYIAFDxgAAA4Yy/sSAACoThgAACAAQAUfAgDpoPh AAw4IQAQToAAID0gAASAaQcMS///5JQh//B8CAKmkAEAFDxgAAQ4YwMwSAABOYABABR8CAOmOCEA EE6AACCUIf/wfAgCppABABST4QAMS//ekT0gAAQ76QVYOUAAAJlJBVg4gAAHf+P7eEgAAm18ZBt4 f+X7eDxgAAA4YzAcSAACTTiAAFx/4/t4SAAAjSwDAABBggAMOUAAAJlDAAA8YAAEOGMFWIABABR8 CAOmg+EADDghABBOgAAglCH/8HwIAqaQAQAUPGAABDhjA0hIAACVgAEAFHwIA6Y4IQAQToAAIIlD AAAsCgAAQYIAIIkkAAB8CVAAQIIAFDiEAAGNQwABLAoAAECC/+iIZAAAfGNQUE6AACB8aht4iSMA ACwJAABBggAsOGAAAFSEBj5IAAAQjSoAASwJAABNggAgfARIAECC//B9Q1N4S///6DhgAABOgAAg OEABAXyCEAhOgAAgOEABAnyCEAhOgAAgOEABA3yCEAhOgAAgOEABBHyCEAhOgAAgOEABBnyCEAhO gAAgOEABB3yCEAhOgAAgOEABCHyCEAhOgAAgOEABCXyCEAhOgAAgOEABDHyCEAhOgAAgOEABDnyC EAhOgAAgOEACAXyCEAhOgAAgOEACAnyCEAhOgAAgOEACA3yCEAhOgAAgOEACBHyCEAhOgAAgOEAC BnyCEAhOgAAgOEADAXyCEAhOgAAgOEADAnyCEAhOgAAgOEADA3yCEAhOgAAgOEAEAHyCEAhOgAAg OEAEMXyCEAhOgAAgOEAENHyCEAhOgAAgOEAEQXyCEAhOgAAgOEAEUnyCEAhOgAAgOEAEU3yCEAhO gAAgOEAFEXyCEAhOgAAgOEAFE3yCEAhOgAAgOEAFIXyCEAhOgAAgOEAHAXyCEAhOgAAgOEAHBHyC EAhOgAAgOEAIAXyCEAhOgAAgOEAIAnyCEAhOgAAgOEAKAXyCEAhOgAAgOEAKE3yCEAhOgAAgOEAK FHyCEAhOgAAgvgIDBAAAAAUAQFZFUlNJT04tSU5GT0AAMTAxOTQAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAACfSAAAH6AAAAAYAAAANAAAAAAAAAAAAAAAAaHR0cHM6Ly9zdm4uaW50ZXJuLmxh dXRlcmJhY2guY29tL3N2bi9rZXJuZWxzcmMvYnJhbmNoZXMvbmlnaHRseQAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABodHRwczov L3N2bi5pbnRlcm4ubGF1dGVyYmFjaC5jb20vc3ZuL2tlcm5lbHNyYwAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAGJhdW1laXN0ZXIAAAAAAABlZGstbGludXg2NGJpdC03AAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAR0NDIDkuNS4wAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAfoAAAABgAAAA0A AABOAAAn0gAAB+gAAAAGAAAAAAAAAAAAAAAAAAAAAAAAAAAAAUGVUVhLAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAA AFFYS19hdHRyXwAAAFFGX2FjdGl2ZV8AAFFGX3Bvb2xfAAAAAFFGX21heFBvb2xfAFFYS19BdHRy AAAAAC5jdXJyAAAALnJlYWR5U2V0AAAAUVhUaHJlYWQAAAAALnN1cGVyAAAudGltZUV2dAAAAABz dHJ1Y3QgUUFjdGl2ZQAAUUFjdGl2ZQAuZVF1ZXVlAC5vc09iamVjdAAAAC5wcmlvAAAALnN0YXJ0 UHJpbwAAc3RydWN0IFFFUXVldWUAAC5mcm9udEV2dAAAAC5yaW5nAAAALmVuZAAAAAAuaGVhZAAA AC50YWlsAAAALm5GcmVlAAAubk1pbgAAAFFFdnQAAAAALnNpZwAAAAAucG9vbElkXwAAAAAucmVm Q3RyXwAAAABzdHJ1Y3QgUVRpbWVFdnQALm5leHQAAAAuYWN0AAAAAC5jdHIAAAAALmludGVydmFs AAAAUVhNdXRleAAud2FpdFNldAAAAAAubG9ja1ByaW8AAAAuY2VpbGluZwAAAAAucHJldkhvbGRl cgAuaG9sZGVyUHJpbwBRWFNlbWFwaG9yZQAuY291bnQAAC5tYXhfY291bnQAAFFNUG9vbAAALnN0 YXJ0AAAuYmxvY2tTaXplAAAublRvdAAAAFFIc20AAAAALnRlbXAAAABFeHRlbmRlZCBUaHJlYWQg U3RhdGU6AAAgIHJ1bm5pbmcgCgBibG9ja2VkIG9uICU4eCB8IAAAACAgcmVhZHkgCgAAACAtLS0t LSAKAAAAAG5vdF9lbXB0eQAAAFF1ZXVlOgoAc3RhdGUgOiAAAAAAJXMgCgoAAABlbmQgICBoZWFk ICAgdGFpbCAgIG5GcmVlICAgbk1pbgoAAAAlMmQuICAgJTNkLiAgICUzZC4gICAlNGQuICAgJTNk LgoAAABldmVudHM6CgAAAABoZWFkICAgIHNpZyAgICBwb29saWQgICAgcmVmY3RyACUzZC4gICAg JTJkLiAgICAlNWQuICAgICU1ZC4gCgAAVGltZSBldmVudDoKAAAAAHNpZyBwb29saWQgcmVmY3Ry IGN0ciBpbnRlcnZhbCAKAAAAACUyZC4gJTVkLiAlNWQuICUyZC4gJTdkLiAKAABRWEsAQVJNAFRB U0suRVh0VEhSZWFkICV4AAAAVEFTSy5FWFRIUgAAJTh4ACU1ZC4AAAAAJTNkLgAAAABtYWdpYyAg ICAAAABwcmlvAAAAAHN5bWJvbCAgAAAAAHMucHJpbwAAU29ycnk6IGV4dGVuZGVkIHRocmVhZCBu b3QgZm91bmQuAAAAUGxlYXNlIHNldCB0aGUgY29uZmlndXJhdGlvbiA6IFFGX09TX09CSkVDVF9U WVBFAAAAAEVYVFRIUkVBRAAAAEVYVEhSAAAARVh0VEhSZWFkAAAAQCg9KV9fUlRPU19RWEtfX1RB U0tfRVhUSFIAAFRBU0suQWN0aXZlT2JqICV4AAAAVEFTSy5BTwBTdGFydCBQcmlvcml0eTogJWQu IAoKAABTb3JyeTogYWN0aXZlIG9iamVjdCBub3QgZm91bmQuAEFDVElWRU9CSgAAAEFPAABBY3Rp dmVPYmoAAABAKD0pX19SVE9TX1FYS19fVEFTS19BTwBtdXRleAAAAERhdGEuRHVtcCAleAAAAABU QVNLLk1UWAAAAAAlN2QuAAAAAFRBU0suRXh0VEhSZWFkICV4AAAAd2FpdGluZyB0YXNrcwoAAG1h Z2ljICAAd2FpdGluZwBvd25lciAgICAAAABQbGVhc2Ugc3BlY2lmeSBhIE11dGV4IGFkZHJlc3Mg b3IgdmFyaWFibGUuAE1VVEVYAAAATVRYAE11VGVYAAAAQCg9KV9fUlRPU19RWEtfX1RBU0tfTVRY AAAAAHNlbWFwaG9yZQAAAFRBU0suU0VNAAAAACU0ZC4AAAAAc3ltYm9sIABjb3VudAAAAFBsZWFz ZSBzcGVjaWZ5IGEgU2VtYXBob3JlIGFkZHJlc3Mgb3IgdmFyaWFibGUuAFNFTUFQSE9SRQAAAFNF TQBTRU1hcGhvcmUAAABAKD0pX19SVE9TX1FYS19fVEFTS19TRU0AAAAAVEFTSy5NRU1QAAAAZCAl eAAAAAAlNHgAJTJkLgAAAABzdGFydCAgICAAAABlbmQgICAgICAAAABzaXplICAgICAAAABibG9j a3NpemUAAABuVG90AAAAAG5GcmVlAAAAbk1pbgAAAABTb3JyeTogbWVtb3J5IGNvbXBvbmVudCBz eW1ib2xzIG1pc3NpbmcATUVNUE9PTABNRU1QAAAAAE1FTVBvb2wAQCg9KV9fUlRPU19RWEtfX1RB U0tfTUVNUAAAACVAY01URCBWZXJzaW9uICAlcyAgJXMgICUwMmQuJTAyZC4lMDRkIChCdWlsZCAl cykKCgBtYWdpYyAgICAgICAgICAgICU4eCAgJTh4ICAAUUZfYWN0aXZlICAgICAgICAlOHggIAAA QU9fbnVtICAgICAgICAgICAlZC4gIAAAVEVTVAAAAABhcmd1bWVudCAgICAgICAgIHZhbHVlICAg ICBjb250ZW50ICAgc3ltYm9sAC0tLSAgVEFTSyAgbWFnaWMgPSAlOHgAACAgc3RhcnQgcHJpbyA9 ICVkLgAAICAtLS0AAABfX1JUT1NfUVhLX19BTAAAX19SVE9TX1FYS19fQVMAAHI0AAByNQAAcjYA AHI3AAByOAAAcjkAAHIxMAByMTEAcjAAAHIxAAByMgAAcjMAAHIxMgByMTQAcGMAAHhwc3IAAAAA cjEzAGhhcmR3YXJldGhyZWFkAABwYXJhbWV0ZXIgMTogMHglOHggPSAlcwBtYWdpYwAAAG1hZ2lj c2l6ZQAAAHVua25vd24gdG9waWMAAABUQVNLLkNPTkZJRwBfX1JUT1NfUVhLX19GVU5DAAAAAEZj dEV4dERpciBleHRzdHJbJWRdPSVzAFRBU0suR0VURElSAERBVEEAACmsAAAqvAAAKsAAAAAAAAAA AxkoAAAABACEAAAO6AAAAAMZKAAAAAQAlAAADhgAAAACAAAAAAAAK0QAAAAAAAAAAgAAAAAAACsg AAAAAAAAAAMZKAAAAAQAlAAADugAAAADGSgAAAAEAIQAAA4YAAAreAAAK4QAACuMAAArmAAADBQA ACr4AAArBAAAKwwAAAAAAAAq+AAAKxgAACsEAAArDAAAAAAAAAADGSgAAAAEAOwAABD0AAAAAgAA AAAAACvoAAAAAAAAAAMZKAAAAAQA7AAAEZgAACwIAAAsFAAALBgAACwkAAAPfAAAKvgAACsEAAAr DAAAAAAAAAADADIAAAAEAUAAABQMAAAAAgAAAAAAACyoAAAAAAAAAAMAMgAAAAQBVAAAFAwAACzU AAAs3AAALOAAACzoAAASHAAALIwAACsMAAAslAAALJwAAAAAAAAsjAAAKwwAACycAAAAAAAAAAMA KAAAAAQBmAAAFuAAAAACAAAAAAAALTQAAAAAAAAtZAAALXAAAC10AAAtgAAAFVwAACr4AAAtJAAA LSwAACyUAAAAAAAAAAMPRgAAAAQB4AAAGHAAAAACAAAAAAAALgQAAAAAAAAuLAAALjQAAC48AAAu RAAAGBwAACr4AAAtvAAALcgAAC3UAAAt4AAALewAAC30AAAt/AAAAAAAAAABADwAAAAALugAABsc AAAu4AAALuAAACmsAAAprAAAGugAAB6YAAAe9AAAL0gAAB5wAAAvWAAAH4wAAC9oAAAAAAAAAAQA AC9sAAAAAAAAAAQAAC9wAAAAAAAAAAQAAC90AAAAAAAAAAQAAC94AAAAAAAAAAQAAC98AAAAAAAA AAQAAC+AAAAAAAAAAAQAAC+EAAAAAAAAAAQAAC+IAAAAAAAAAAQAAC+MAAAAAAAAAAQAAC+QAAAA AAAAAAQAAC+UAAAAAAAAAAQAAC+YAAAAAAAAAAQAAC+cAAAAAAAAAAQAAC+gAAAAAAAAAAQAAC+k AAAAAAAAAAQAAC+sAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC+wAAAAAAAAAAAAAAAAAAAAAAAAAAAA AC/8AAAAAwAAABcAAAAAAAAwCAAAIWAAADA0AAAABwAAAAAAAAAAAAAwCAAAIhxUMzJF ) HELP.FILTER.Add rtosqxk RETURN ) menu_32bit: ;(header, infix) ( PMACRO.LOCK ( PRIVATE &sHeader &sInfix &sMenuName PARAMETERS &sHeader &sInfix &sMenuName=TASK.TRANSPOSE.INFIX("&sHeader") IF MENU.EXIST("TASK.&(sMenuName)") MENU.Delete.NAME TASK.&(sMenuName) IF MENU.EXIST("EXT.&(sMenuName)") MENU.Delete.NAME EXT.&(sMenuName) MENU.ReProgram (&+ ; -------------------------------------------------------------------------------- ; @Title: QXK specific menu ; @Description: - ; @Author: DIE YDA ; @Copyright: (c) 1989-2017 Lauterbach GmbH, licensed for use with TRACE32(R) only ; -------------------------------------------------------------------------------- ; $Id: qxk.m 7861 2022-07-29 13:45:42Z amerkle $ NAME "TASK.&(sMenuName)" IF !MENU.EXIST("TASK.&(sMenuName)") ( add menu ( POPUP "&(sHeader)" ( default menuitem "Display &Active Objects" "TASK.&(sInfix)ActiveObj" separator menuitem "Display &Extended Threads" "TASK.&(sInfix)EXtTHRead" menuitem "Display &Mutex" ( PRIVATE &dir &command &dir=TASK.&(sInfix)GETDIR() &command="&dir"+"\objdialog.cmm Mutex MuTeX" Do &command ) menuitem "Display &Semaphore" ( PRIVATE &dir &command &dir=TASK.&(sInfix)GETDIR() &command="&dir"+"\objdialog.cmm Semaphore SEMaphore" Do &command ) menuitem "Display Memory &Pools" "TASK.&(sInfix)MEMPool" separator popup "&Stack Coverage" ( menuitem "&List Stacks" "TASK.&(sInfix)STacK.view" menuitem "Add Task" "TASK.&(sInfix)STacK.ADD" menuitem "Remove Task" "TASK.&(sInfix)STacK.RM" menuitem "Reset Coverage" ( PRIVATE &yes DIALOG.YESNO "Overwrite unused stack space" "with stack fill pattern?" ENTRY &yes IF !&yes ENDDO TASK.&(sInfix)STacK.Init ) ) ) popup "Trace" ( popup "[:alist]List" ( separator menuitem "&Task Switches" "Trace.List List.TASK" menuitem "&Default and Tasks" "Trace.List List.TASK DEFault" ) ) popup "Perf" ( separator popup "&Task Runtime" ( menuitem "&Prepare" ( if t.method.analyzer() ( Analyzer.AutoInit on ) if a.mode.flow() ( Break.Delete /TraceEnable Break.Set C:0x1F:::task.&(sInfix)config(magic) /TraceEnable ) ) menuitem "[:perf]Show &Numerical" "Trace.STATistic.TASK" menuitem "[:achart]Show as &Timing" "Trace.CHART.TASK" menuitem "[:achart]Tracking with Trace &List" ( Trace.List List.TASK DEFault /Track Trace.CHART.TASK /Track ) ) popup "Task &Function Runtime" ( menuitem "&Prepare" ( if t.method.analyzer() ( Analyzer.AutoInit on Analyzer.STATistic.PreFetch on ) if a.mode.flow() ( Break.Delete /TraceData Break.Set C:0x1F:::task.&(sInfix)config(magic) /TraceData ) ) menuitem "[:perf]Show &Numerical" "Trace.STATistic.TASKFUNC" menuitem "[:perf]Show as &Tree" "Trace.STATistic.TASKTREE" menuitem "[:perf]Show &Detailed Tree" "Trace.STATistic.TASKTREE ALL" menuitem "[:achart]Show as &Timing" "Trace.CHART.TASKFUNC" menuitem "[:alist]Show N&esting" "Trace.List List.TASK FUNC TI.FUNC" ) ) popup "&Help" ( MENUITEM "[:manual]OS Awareness Manual QXK" "HELP __RTOS_QXK_" ) ) menu "task.&(sInfix)exthr" ( default menuitem "Display task struct" ( PRIVATE &address &address=track.address() Var.View %Open %String (QXThread *)(&address) ) separator menuitem "Display Stack Frame" ( PRIVATE &address &address=address.offset(track.address()) Var.Frame /Locals /Caller /Task &address ) menuitem "Display Registers" ( PRIVATE &address &address=address.offset(track.address()) Register /Task &address ) menuitem "Switch Context" "Register.TASK address.offset(track.address())" separator menuitem "Dump task entry" ( PRIVATE &address &address=address.offset(track.address()) Data.dump &address /l /dialog ) ) menu "task.&(sInfix)sem" ( default menuitem "Display Semaphore struct" ( PRIVATE &address &address=track.address() Var.View %Open %String (QXSemaphore *)(&address) ) separator menuitem "Dump Semaphore entry" ( PRIVATE &address &address=address.offset(track.address()) Data.dump &address /l /dialog ) ) menu "task.&(sInfix)mtx" ( default menuitem "Display Mutex struct" ( PRIVATE &address &address=track.address() Var.View %Open %String (QXMutex *)(&address) ) separator menuitem "Dump Mutex entry" ( PRIVATE &address &address=address.offset(track.address()) Data.dump &address /l /dialog ) ) menu "task.&(sInfix)ao" ( default menuitem "Display Active Object struct" ( PRIVATE &address &address=track.address() Var.View %Open %String (QActive *)(&address) ) separator menuitem "Dump Active Object entry" ( PRIVATE &address &address=address.offset(track.address()) Data.dump &address /l /dialog ) ) menu "task.&(sInfix)memp" ( default menuitem "View mem pool struct" ( PRIVATE &magic &magic=address.offset(track.address()) Var.View %Open (QMPool)*&magic ) menuitem "Dump mem pool struct" ( PRIVATE &magic &magic=address.offset(track.address()) Data.dump &magic /Long /dialog ) ) ) ) ) PMACRO.UNLOCK RETURN ) autoload_32bit: ;(options) ( PARAMETERS &sOptions RETURN ) menu_delete: ;(header) ( PRIVATE &sHeader &sMenuName PARAMETERS &sHeader &sMenuName=TASK.TRANSPOSE.INFIX("&sHeader") IF MENU.EXIST("TASK.&(sMenuName)") MENU.Delete.NAME TASK.&(sMenuName) IF MENU.EXIST("EXT.&(sMenuName)") MENU.Delete.NAME EXT.&(sMenuName) RETURN ) autoload_delete: ;(options) ( PARAMETERS &sOptionMachine RETURN )