//+------------------------------------------------------------------+
//|                                                         Test.mq5 |
//|                                   Copyright 2026, Niquel Mendoza |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2026, Niquel Mendoza"
#property link      "https://www.mql5.com"
#property version   "1.00"
#property strict
#property script_show_inputs

//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
input ulong InpNumber = 0x800000000000000;

//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
#include "CLZ.mqh"

//+------------------------------------------------------------------+
//| Script program start function                                    |
//+------------------------------------------------------------------+
void OnStart()
 {
//---
  Print("Number:\n", TSN::CBitTricks::ToBitsBE(InpNumber));
  Print("CLZ: ", TSN::CBitTricks::CLZ(InpNumber));
 }
//+------------------------------------------------------------------+