DEL 16/11 ;12C1 MOVEI T1,.TFKTP ;TAPOP. FUNCTION FOR CONTROLLER TYPE MOVE T3,[2,,T1] ;AC FOR TAPOP. TAPOP. T3, ;READ THE CONTROLLER TYPE $STOP (CDK,Can't Determine Kontroller type) STORE T3,TCB.CH(B),TC.KTY ;Save in TCB for later use CAIE T3,.TFKD2 ;TX02/DX20 CONTROLLER ??? CAIN T3,.TFKTX ;TX01/DX10 CONTROLLER ??? $RETT ;YES,,CONTROLLER AUTO DENSITY SET SUM 49720