@echo off&SETLOCAL

   ::
   ::       BIGTEXT string
   ::
   ::       Where string is the text or numbers to be displayed

      SET v_length=0
      SET v_digital=%*
      ver|find "NT" > nul
      if errorlevel 0 (SET v_digital=%v_digital:~1%)
         
      :: Get the length of the v_digital variable
      SET v_substring=%v_digital%
   :s_loop
      IF not defined v_substring GOTO :s_result
      ::remove the first char from v_substring (until it is null)
      SET v_substring=%v_substring:~1%
      SET /A v_length+=1
      GOTO s_loop
      :: v_substring is now empty so we have counted every char
      
   :s_result
      :: v_length now holds the length of our number
      :: echo [%v_length%]
      :: subtract 1 as we are counting from zero
      SET /A v_length-=1
      :: Step through each digit of the string and store in a set of variables
      FOR /L %%G IN (0,1,%v_length%) DO call :s_digit %%G
      
      :: Now jump to the section that ECHO's all the variables
      GOTO :s_print_big
   
   :s_digit
      :: find the next character and put in v_digit
      CALL SET v_digit=%%v_digital:~%1,1%%%
      :: Add the graphics for this digit to the 7 variables
      CALL :s_%v_digit%
   GOTO :EOF

   :: The Character Strings to be used
   SET v_1=
   SET v_2=
   SET v_3=
   SET v_4=
   SET v_5=
   SET v_6=
   SET v_7=
   
   ::  Pad digits to -->
   :s_0
      SET v_1=%v_1% ####
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #  #
      SET v_4=%v_4% #  #
      SET v_5=%v_5% #  #
      SET v_6=%v_6% #  #
      SET v_7=%v_7% ####
   GOTO :EOF
   
   :s_1
   ::  Pad digits to -->
      SET v_1=%v_1%  ## 
      SET v_2=%v_2%   # 
      SET v_3=%v_3%   # 
      SET v_4=%v_4%   # 
      SET v_5=%v_5%   # 
      SET v_6=%v_6%   # 
      SET v_7=%v_7% ####
   GOTO :EOF
   
   :s_2
   ::  Pad digits to -->
      SET v_1=%v_1% ####
      SET v_2=%v_2% #  #
      SET v_3=%v_3%    #
      SET v_4=%v_4% ####
      SET v_5=%v_5% #   
      SET v_6=%v_6% #  #
      SET v_7=%v_7% ####
   GOTO :EOF
   
   :s_3
   ::  Pad digits to -->
      SET v_1=%v_1% ####
      SET v_2=%v_2%    #
      SET v_3=%v_3%    #
      SET v_4=%v_4% ####
      SET v_5=%v_5%    #
      SET v_6=%v_6%    #
      SET v_7=%v_7% ####
   GOTO :EOF
   
   :s_4
   ::  Pad digits to -->
      SET v_1=%v_1% #  #
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #  #
      SET v_4=%v_4% ####
      SET v_5=%v_5%    #
      SET v_6=%v_6%    #
      SET v_7=%v_7%    #
   GOTO :EOF
   
   :s_5
   ::  Pad digits to -->
      SET v_1=%v_1% ####
      SET v_2=%v_2% #   
      SET v_3=%v_3% #   
      SET v_4=%v_4% ####
      SET v_5=%v_5%    #
      SET v_6=%v_6% #  #
      SET v_7=%v_7% ####
   GOTO :EOF
   
   :s_6
   ::  Pad digits to -->
      SET v_1=%v_1% ##  
      SET v_2=%v_2% #   
      SET v_3=%v_3% #   
      SET v_4=%v_4% ####
      SET v_5=%v_5% #  #
      SET v_6=%v_6% #  #
      SET v_7=%v_7% ####
   GOTO :EOF
   
   :s_7
   ::  Pad digits to -->
      SET v_1=%v_1% ####
      SET v_2=%v_2% #  #
      SET v_3=%v_3%    #
      SET v_4=%v_4%   ##
      SET v_5=%v_5%   # 
      SET v_6=%v_6%   # 
      SET v_7=%v_7%   # 
   GOTO :EOF
   
   :s_8
   ::  Pad digits to -->
      SET v_1=%v_1% ####
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #  #
      SET v_4=%v_4% ####
      SET v_5=%v_5% #  #
      SET v_6=%v_6% #  #
      SET v_7=%v_7% ####
   GOTO :EOF
   
   :s_9
   ::  Pad digits to -->
      SET v_1=%v_1% ####
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #  #
      SET v_4=%v_4% ####
      SET v_5=%v_5%    #
      SET v_6=%v_6%    #
      SET v_7=%v_7%    #
   GOTO :EOF
   
   :s_-
   ::  Pad digits to -->
      SET v_1=%v_1%     
      SET v_2=%v_2%     
      SET v_3=%v_3%     
      SET v_4=%v_4% ####
      SET v_5=%v_5%     
      SET v_6=%v_6%     
      SET v_7=%v_7%     
   GOTO :EOF
   
   :s_.
   ::  Pad digits to -->
      SET v_1=%v_1%     
      SET v_2=%v_2%     
      SET v_3=%v_3%     
      SET v_4=%v_4%     
      SET v_5=%v_5%     
      SET v_6=%v_6%     
      SET v_7=%v_7%  #  
   GOTO :EOF
   
   :s_a
   ::  Pad digits to -->
      SET v_1=%v_1% ####
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #  #
      SET v_4=%v_4% ####
      SET v_5=%v_5% #  #
      SET v_6=%v_6% #  #
      SET v_7=%v_7% #  #
   GOTO :EOF
   
   :s_b
   ::  Pad digits to -->
      SET v_1=%v_1% ### 
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #  #
      SET v_4=%v_4% ####
      SET v_5=%v_5% #  #
      SET v_6=%v_6% #  #
      SET v_7=%v_7% ### 
   GOTO :EOF
   
   :s_c
   ::  Pad digits to -->
      SET v_1=%v_1%  ## 
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #   
      SET v_4=%v_4% #   
      SET v_5=%v_5% #   
      SET v_6=%v_6% #  #
      SET v_7=%v_7%  ## 
   GOTO :EOF
   
   :s_d
   ::  Pad digits to -->
      SET v_1=%v_1% ### 
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #  #
      SET v_4=%v_4% #  #
      SET v_5=%v_5% #  #
      SET v_6=%v_6% #  #
      SET v_7=%v_7% ### 
   GOTO :EOF
   
   :s_e
   ::  Pad digits to -->
      SET v_1=%v_1% ####
      SET v_2=%v_2% #   
      SET v_3=%v_3% #   
      SET v_4=%v_4% ### 
      SET v_5=%v_5% #   
      SET v_6=%v_6% #   
      SET v_7=%v_7% ####
   GOTO :EOF
   
   :s_f
   ::  Pad digits to -->
      SET v_1=%v_1% ####
      SET v_2=%v_2% #   
      SET v_3=%v_3% #   
      SET v_4=%v_4% ### 
      SET v_5=%v_5% #   
      SET v_6=%v_6% #   
      SET v_7=%v_7% #   
   GOTO :EOF

   :s_g
   ::  Pad digits to -->
      SET v_1=%v_1%  ## 
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #   
      SET v_4=%v_4% #   
      SET v_5=%v_5% # ##
      SET v_6=%v_6% #  #
      SET v_7=%v_7%  ## 
   GOTO :EOF

   :s_h
   ::  Pad digits to -->
      SET v_1=%v_1% #  #
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #  #
      SET v_4=%v_4% ####
      SET v_5=%v_5% #  #
      SET v_6=%v_6% #  #
      SET v_7=%v_7% #  #
   GOTO :EOF

   :s_i
   ::  Pad digits to -->
      SET v_1=%v_1%  #  
      SET v_2=%v_2%  #  
      SET v_3=%v_3%  #  
      SET v_4=%v_4%  #  
      SET v_5=%v_5%  #  
      SET v_6=%v_6%  #  
      SET v_7=%v_7%  #  
   GOTO :EOF

   :s_j
   ::  Pad digits to -->
      SET v_1=%v_1% ####
      SET v_2=%v_2%   # 
      SET v_3=%v_3%   # 
      SET v_4=%v_4%   # 
      SET v_5=%v_5%   # 
      SET v_6=%v_6%   # 
      SET v_7=%v_7% ##  
   GOTO :EOF

   :s_k
   ::  Pad digits to -->
      SET v_1=%v_1% #   
      SET v_2=%v_2% #  #
      SET v_3=%v_3% # # 
      SET v_4=%v_4% ##  
      SET v_5=%v_5% ##  
      SET v_6=%v_6% # # 
      SET v_7=%v_7% #  #
   GOTO :EOF

   :s_l
   ::  Pad digits to -->
      SET v_1=%v_1% #   
      SET v_2=%v_2% #   
      SET v_3=%v_3% #   
      SET v_4=%v_4% #   
      SET v_5=%v_5% #   
      SET v_6=%v_6% #   
      SET v_7=%v_7% ####
   GOTO :EOF

   :s_m
   ::  Pad digits to --->
      SET v_1=%v_1% #   #
      SET v_2=%v_2% ## ##
      SET v_3=%v_3% # # #
      SET v_4=%v_4% # # #
      SET v_5=%v_5% #   #
      SET v_6=%v_6% #   #
      SET v_7=%v_7% #   #
   GOTO :EOF

   :s_n
   ::  Pad digits to --->
      SET v_1=%v_1% #   #
      SET v_2=%v_2% ##  #
      SET v_3=%v_3% ##  #
      SET v_4=%v_4% # # #
      SET v_5=%v_5% #  ##
      SET v_6=%v_6% #  ##
      SET v_7=%v_7% #   #
   GOTO :EOF

   :s_o
   ::  Pad digits to -->
      SET v_1=%v_1%  ## 
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #  #
      SET v_4=%v_4% #  #
      SET v_5=%v_5% #  #
      SET v_6=%v_6% #  #
      SET v_7=%v_7%  ## 
   GOTO :EOF

   :s_p
   ::  Pad digits to -->
      SET v_1=%v_1% ### 
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #  #
      SET v_4=%v_4% ### 
      SET v_5=%v_5% #   
      SET v_6=%v_6% #   
      SET v_7=%v_7% #   
   GOTO :EOF

   :s_q
   ::  Pad digits to -->
      SET v_1=%v_1%  ## 
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #  #
      SET v_4=%v_4% #  #
      SET v_5=%v_5% #  #
      SET v_6=%v_6% # ##
      SET v_7=%v_7%  # #
   GOTO :EOF

   :s_r
   ::  Pad digits to -->
      SET v_1=%v_1% ### 
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #  #
      SET v_4=%v_4% ### 
      SET v_5=%v_5% # # 
      SET v_6=%v_6% #  #
      SET v_7=%v_7% #  #
   GOTO :EOF

   :s_s
   ::  Pad digits to -->
      SET v_1=%v_1%  ###
      SET v_2=%v_2% #   
      SET v_3=%v_3% #   
      SET v_4=%v_4%  ## 
      SET v_5=%v_5%    #
      SET v_6=%v_6%    #
      SET v_7=%v_7% ### 
   GOTO :EOF

   :s_t
   ::  Pad digits to -->
      SET v_1=%v_1% ### 
      SET v_2=%v_2%  #  
      SET v_3=%v_3%  #  
      SET v_4=%v_4%  #  
      SET v_5=%v_5%  #  
      SET v_6=%v_6%  #  
      SET v_7=%v_7%  #  
   GOTO :EOF

   :s_u
   ::  Pad digits to -->
      SET v_1=%v_1% #  #
      SET v_2=%v_2% #  #
      SET v_3=%v_3% #  #
      SET v_4=%v_4% #  #
      SET v_5=%v_5% #  #
      SET v_6=%v_6% #  #
      SET v_7=%v_7%  ## 
   GOTO :EOF

   :s_v
   ::  Pad digits to --->
      SET v_1=%v_1% #   #
      SET v_2=%v_2% #   #
      SET v_3=%v_3% #   #
      SET v_4=%v_4% #   #
      SET v_5=%v_5% #   #
      SET v_6=%v_6%  # # 
      SET v_7=%v_7%   #  
   GOTO :EOF

   :s_w
   ::  Pad digits to ----->
      SET v_1=%v_1% #  #  #
      SET v_2=%v_2% #  #  #
      SET v_3=%v_3% #  #  #
      SET v_4=%v_4% #  #  #
      SET v_5=%v_5% #  #  #
      SET v_6=%v_6% #  #  #
      SET v_7=%v_7%  ## ## 
   GOTO :EOF

   :s_x
   ::  Pad digits to -->
      SET v_1=%v_1%      
      SET v_2=%v_2% #   #
      SET v_3=%v_3%  # # 
      SET v_4=%v_4%   #  
      SET v_5=%v_5%   #  
      SET v_6=%v_6%  # # 
      SET v_7=%v_7% #   #
   GOTO :EOF

   :s_y
   ::  Pad digits to --->
      SET v_1=%v_1% #   #
      SET v_2=%v_2%  # # 
      SET v_3=%v_3%   #  
      SET v_4=%v_4%   #  
      SET v_5=%v_5%   #  
      SET v_6=%v_6%   #  
      SET v_7=%v_7%   #  
   GOTO :EOF

   :s_z
   ::  Pad digits to --->
      SET v_1=%v_1% #####
      SET v_2=%v_2%     #
      SET v_3=%v_3%    # 
      SET v_4=%v_4%   #  
      SET v_5=%v_5%  #   
      SET v_6=%v_6% #    
      SET v_7=%v_7% #####
   GOTO :EOF

   :s_print_big
   ECHO.
   ECHO %v_1%
   ECHO %v_2%
   ECHO %v_3%
   ECHO %v_4%
   ECHO %v_5%
   ECHO %v_6%
   ECHO %v_7%
   ECHO.