API tools faq
paste
yosoysupercholo

programa texto grande

yosoysupercholo
May 20th, 2012
83
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Batch 10.31 KB | None | 0 0
raw download clone embed print report
  1. @Echo off&SETLOCAL
  2. IF [%1] NEQ [] goto s_start
  3. Echo   Syntax  
  4. Echo       BIGTEXT string
  5. Echo           Where string is the text or numbers to be displayed
  6. Echo:
  7. GOTO :eof
  8.    :s_start
  9.       SET _length=0
  10.       SET _sentence=%*
  11.  
  12.       :: Get the length of the sentence
  13.       SET _substring=%_sentence%
  14.    :s_loop
  15.       IF not defined _substring GOTO :s_result
  16.      ::remove the first char from _substring (until it is null)
  17.       SET _substring=%_substring:~1%
  18.       SET /A _length+=1
  19.       GOTO s_loop
  20.      
  21.    :s_result
  22.       SET /A _length-=1
  23.  
  24.       :: Truncate text to fit the window size
  25.      :: assuming average char is 6 digits wide
  26.       for /f "tokens=2" %%G in ('mode ^|find "Columns"') do set/a _window=%%G/6
  27.       IF %_length% GTR %_window% set _length=%_window%
  28.  
  29.       :: Step through each digit of the sentence and store in a set of variables
  30.       FOR /L %%G IN (0,1,%_length%) DO call :s_build %%G
  31.      
  32.    :: Now Echo all the variables
  33.    Echo:
  34.    Echo %_1%
  35.    Echo %_2%
  36.    Echo %_3%
  37.    Echo %_4%
  38.    Echo %_5%
  39.    Echo %_6%
  40.    Echo %_7%
  41.    Echo:
  42.    GOTO :EOF
  43.  
  44.    :s_build
  45.      :: get the next character
  46.       CALL SET _digit=%%_sentence:~%1,1%%%
  47.      :: Add the graphics for this digit to the variables
  48.       IF "%_digit%"==" " (CALL :s_space) ELSE (CALL :s_%_digit%)
  49.    GOTO :EOF
  50.  
  51.    ::  Pad digits to -->
  52.    :s_0
  53.       (SET _1=%_1% ####)
  54.       (SET _2=%_2% #  #)
  55.       (SET _3=%_3% #  #)
  56.       (SET _4=%_4% #  #)
  57.       (SET _5=%_5% #  #)
  58.       (SET _6=%_6% #  #)
  59.       (SET _7=%_7% ####)
  60.    GOTO :EOF
  61.    
  62.    :s_1
  63.   ::  Pad digits to -->
  64.       (SET _1=%_1%  ## )
  65.       (SET _2=%_2%   # )
  66.       (SET _3=%_3%   # )
  67.       (SET _4=%_4%   # )
  68.       (SET _5=%_5%   # )
  69.       (SET _6=%_6%   # )
  70.       (SET _7=%_7% ####)
  71.    GOTO :EOF
  72.    
  73.    :s_2
  74.   ::  Pad digits to -->
  75.       (SET _1=%_1% ####)
  76.       (SET _2=%_2% #  #)
  77.       (SET _3=%_3%    #)
  78.       (SET _4=%_4% ####)
  79.       (SET _5=%_5% #   )
  80.       (SET _6=%_6% #  #)
  81.       (SET _7=%_7% ####)
  82.    GOTO :EOF
  83.    
  84.    :s_3
  85.   ::  Pad digits to -->
  86.       (SET _1=%_1% ####)
  87.       (SET _2=%_2%    #)
  88.       (SET _3=%_3%    #)
  89.       (SET _4=%_4% ####)
  90.       (SET _5=%_5%    #)
  91.       (SET _6=%_6%    #)
  92.       (SET _7=%_7% ####)
  93.    GOTO :EOF
  94.    
  95.    :s_4
  96.   ::  Pad digits to -->
  97.       (SET _1=%_1% #  #)
  98.       (SET _2=%_2% #  #)
  99.       (SET _3=%_3% #  #)
  100.       (SET _4=%_4% ####)
  101.       (SET _5=%_5%    #)
  102.       (SET _6=%_6%    #)
  103.       (SET _7=%_7%    #)
  104.    GOTO :EOF
  105.    
  106.    :s_5
  107.   ::  Pad digits to -->
  108.       (SET _1=%_1% ####)
  109.       (SET _2=%_2% #   )
  110.       (SET _3=%_3% #   )
  111.       (SET _4=%_4% ####)
  112.       (SET _5=%_5%    #)
  113.       (SET _6=%_6% #  #)
  114.       (SET _7=%_7% ####)
  115.    GOTO :EOF
  116.    
  117.    :s_6
  118.   ::  Pad digits to -->
  119.       (SET _1=%_1% ##  )
  120.       (SET _2=%_2% #   )
  121.       (SET _3=%_3% #   )
  122.       (SET _4=%_4% ####)
  123.       (SET _5=%_5% #  #)
  124.       (SET _6=%_6% #  #)
  125.       (SET _7=%_7% ####)
  126.    GOTO :EOF
  127.    
  128.    :s_7
  129.   ::  Pad digits to -->
  130.       (SET _1=%_1% ####)
  131.       (SET _2=%_2% #  #)
  132.       (SET _3=%_3%    #)
  133.       (SET _4=%_4%   ##)
  134.       (SET _5=%_5%   # )
  135.       (SET _6=%_6%   # )
  136.       (SET _7=%_7%   # )
  137.    GOTO :EOF
  138.    
  139.    :s_8
  140.   ::  Pad digits to -->
  141.       (SET _1=%_1% ####)
  142.       (SET _2=%_2% #  #)
  143.       (SET _3=%_3% #  #)
  144.       (SET _4=%_4% ####)
  145.       (SET _5=%_5% #  #)
  146.       (SET _6=%_6% #  #)
  147.       (SET _7=%_7% ####)
  148.    GOTO :EOF
  149.    
  150.    :s_9
  151.   ::  Pad digits to -->
  152.       (SET _1=%_1% ####)
  153.       (SET _2=%_2% #  #)
  154.       (SET _3=%_3% #  #)
  155.       (SET _4=%_4% ####)
  156.       (SET _5=%_5%    #)
  157.       (SET _6=%_6%    #)
  158.       (SET _7=%_7%    #)
  159.    GOTO :EOF
  160.    
  161.    :s_-
  162.   ::  Pad digits to -->
  163.       (SET _1=%_1%     )
  164.       (SET _2=%_2%     )
  165.       (SET _3=%_3%     )
  166.       (SET _4=%_4% ####)
  167.       (SET _5=%_5%     )
  168.       (SET _6=%_6%     )
  169.       (SET _7=%_7%     )
  170.    GOTO :EOF
  171.    
  172.    :s_.
  173.   ::  Pad digits to -->
  174.       (SET _1=%_1%     )
  175.       (SET _2=%_2%     )
  176.       (SET _3=%_3%     )
  177.       (SET _4=%_4%     )
  178.       (SET _5=%_5%     )
  179.       (SET _6=%_6%     )
  180.       (SET _7=%_7%  #  )
  181.    GOTO :EOF
  182.    
  183.    :s_a
  184.   ::  Pad digits to -->
  185.       (SET _1=%_1%  ## )
  186.       (SET _2=%_2% #  #)
  187.       (SET _3=%_3% #  #)
  188.       (SET _4=%_4% ####)
  189.       (SET _5=%_5% #  #)
  190.       (SET _6=%_6% #  #)
  191.       (SET _7=%_7% #  #)
  192.    GOTO :EOF
  193.    
  194.    :s_b
  195.   ::  Pad digits to -->
  196.       (SET _1=%_1% ### )
  197.       (SET _2=%_2% #  #)
  198.       (SET _3=%_3% #  #)
  199.       (SET _4=%_4% ####)
  200.       (SET _5=%_5% #  #)
  201.       (SET _6=%_6% #  #)
  202.       (SET _7=%_7% ### )
  203.    GOTO :EOF
  204.    
  205.    :s_c
  206.   ::  Pad digits to -->
  207.       (SET _1=%_1%  ## )
  208.       (SET _2=%_2% #  #)
  209.       (SET _3=%_3% #   )
  210.       (SET _4=%_4% #   )
  211.       (SET _5=%_5% #   )
  212.       (SET _6=%_6% #  #)
  213.       (SET _7=%_7%  ## )
  214.    GOTO :EOF
  215.    
  216.    :s_d
  217.   ::  Pad digits to -->
  218.       (SET _1=%_1% ### )
  219.       (SET _2=%_2% #  #)
  220.       (SET _3=%_3% #  #)
  221.       (SET _4=%_4% #  #)
  222.       (SET _5=%_5% #  #)
  223.       (SET _6=%_6% #  #)
  224.       (SET _7=%_7% ### )
  225.    GOTO :EOF
  226.    
  227.    :s_e
  228.   ::  Pad digits to -->
  229.       (SET _1=%_1% ####)
  230.       (SET _2=%_2% #   )
  231.       (SET _3=%_3% #   )
  232.       (SET _4=%_4% ### )
  233.       (SET _5=%_5% #   )
  234.       (SET _6=%_6% #   )
  235.       (SET _7=%_7% ####)
  236.    GOTO :EOF
  237.    
  238.    :s_f
  239.   ::  Pad digits to -->
  240.       (SET _1=%_1% ####)
  241.       (SET _2=%_2% #   )
  242.       (SET _3=%_3% #   )
  243.       (SET _4=%_4% ### )
  244.       (SET _5=%_5% #   )
  245.       (SET _6=%_6% #   )
  246.       (SET _7=%_7% #   )
  247.    GOTO :EOF
  248.  
  249.    :s_g
  250.   ::  Pad digits to -->
  251.       (SET _1=%_1%  ## )
  252.       (SET _2=%_2% #  #)
  253.       (SET _3=%_3% #   )
  254.       (SET _4=%_4% #   )
  255.       (SET _5=%_5% # ##)
  256.       (SET _6=%_6% #  #)
  257.       (SET _7=%_7%  ## )
  258.    GOTO :EOF
  259.  
  260.    :s_h
  261.   ::  Pad digits to -->
  262.       (SET _1=%_1% #  #)
  263.       (SET _2=%_2% #  #)
  264.       (SET _3=%_3% #  #)
  265.       (SET _4=%_4% ####)
  266.       (SET _5=%_5% #  #)
  267.       (SET _6=%_6% #  #)
  268.       (SET _7=%_7% #  #)
  269.    GOTO :EOF
  270.  
  271.    :s_i
  272.   ::  Pad digits to -->
  273.       (SET _1=%_1%  # )
  274.       (SET _2=%_2%  # )
  275.       (SET _3=%_3%  # )
  276.       (SET _4=%_4%  # )
  277.       (SET _5=%_5%  # )
  278.       (SET _6=%_6%  # )
  279.       (SET _7=%_7%  # )
  280.    GOTO :EOF
  281.  
  282.    :s_j
  283.   ::  Pad digits to -->
  284.       (SET _1=%_1% ####)
  285.       (SET _2=%_2%   # )
  286.       (SET _3=%_3%   # )
  287.       (SET _4=%_4%   # )
  288.       (SET _5=%_5%   # )
  289.       (SET _6=%_6%   # )
  290.       (SET _7=%_7% ##  )
  291.    GOTO :EOF
  292.  
  293.    :s_k
  294.   ::  Pad digits to -->
  295.       (SET _1=%_1% #   )
  296.       (SET _2=%_2% #  #)
  297.       (SET _3=%_3% # # )
  298.       (SET _4=%_4% ##  )
  299.       (SET _5=%_5% ##  )
  300.       (SET _6=%_6% # # )
  301.       (SET _7=%_7% #  #)
  302.    GOTO :EOF
  303.  
  304.    :s_l
  305.   ::  Pad digits to -->
  306.       (SET _1=%_1% #   )
  307.       (SET _2=%_2% #   )
  308.       (SET _3=%_3% #   )
  309.       (SET _4=%_4% #   )
  310.       (SET _5=%_5% #   )
  311.       (SET _6=%_6% #   )
  312.       (SET _7=%_7% ####)
  313.    GOTO :EOF
  314.  
  315.    :s_m
  316.   ::  Pad digits to --->
  317.       (SET _1=%_1% #   #)
  318.       (SET _2=%_2% ## ##)
  319.       (SET _3=%_3% # # #)
  320.       (SET _4=%_4% # # #)
  321.       (SET _5=%_5% #   #)
  322.       (SET _6=%_6% #   #)
  323.       (SET _7=%_7% #   #)
  324.    GOTO :EOF
  325.  
  326.    :s_n
  327.   ::  Pad digits to --->
  328.       (SET _1=%_1% #   #)
  329.       (SET _2=%_2% ##  #)
  330.       (SET _3=%_3% ##  #)
  331.       (SET _4=%_4% # # #)
  332.       (SET _5=%_5% #  ##)
  333.       (SET _6=%_6% #  ##)
  334.       (SET _7=%_7% #   #)
  335.    GOTO :EOF
  336.  
  337.    :s_o
  338.   ::  Pad digits to -->
  339.       (SET _1=%_1%  ## )
  340.       (SET _2=%_2% #  #)
  341.       (SET _3=%_3% #  #)
  342.       (SET _4=%_4% #  #)
  343.       (SET _5=%_5% #  #)
  344.       (SET _6=%_6% #  #)
  345.       (SET _7=%_7%  ## )
  346.    GOTO :EOF
  347.  
  348.    :s_p
  349.   ::  Pad digits to -->
  350.       (SET _1=%_1% ### )
  351.       (SET _2=%_2% #  #)
  352.       (SET _3=%_3% #  #)
  353.       (SET _4=%_4% ### )
  354.       (SET _5=%_5% #   )
  355.       (SET _6=%_6% #   )
  356.       (SET _7=%_7% #   )
  357.    GOTO :EOF
  358.  
  359.    :s_q
  360.   ::  Pad digits to -->
  361.       (SET _1=%_1%  ## )
  362.       (SET _2=%_2% #  #)
  363.       (SET _3=%_3% #  #)
  364.       (SET _4=%_4% #  #)
  365.       (SET _5=%_5% #  #)
  366.       (SET _6=%_6% # ##)
  367.       (SET _7=%_7%  # #)
  368.    GOTO :EOF
  369.  
  370.    :s_r
  371.   ::  Pad digits to -->
  372.       (SET _1=%_1% ### )
  373.       (SET _2=%_2% #  #)
  374.       (SET _3=%_3% #  #)
  375.       (SET _4=%_4% ### )
  376.       (SET _5=%_5% # # )
  377.       (SET _6=%_6% #  #)
  378.       (SET _7=%_7% #  #)
  379.    GOTO :EOF
  380.  
  381.    :s_s
  382.   ::  Pad digits to -->
  383.       (SET _1=%_1%  ###)
  384.       (SET _2=%_2% #   )
  385.       (SET _3=%_3% #   )
  386.       (SET _4=%_4%  ## )
  387.       (SET _5=%_5%    #)
  388.       (SET _6=%_6%    #)
  389.       (SET _7=%_7% ### )
  390.    GOTO :EOF
  391.  
  392.    :s_t
  393.   ::  Pad digits to -->
  394.       (SET _1=%_1% ###)
  395.       (SET _2=%_2%  # )
  396.       (SET _3=%_3%  # )
  397.       (SET _4=%_4%  # )
  398.       (SET _5=%_5%  # )
  399.       (SET _6=%_6%  # )
  400.       (SET _7=%_7%  # )
  401.    GOTO :EOF
  402.  
  403.    :s_u
  404.   ::  Pad digits to -->
  405.       (SET _1=%_1% #  #)
  406.       (SET _2=%_2% #  #)
  407.       (SET _3=%_3% #  #)
  408.       (SET _4=%_4% #  #)
  409.       (SET _5=%_5% #  #)
  410.       (SET _6=%_6% #  #)
  411.       (SET _7=%_7%  ## )
  412.    GOTO :EOF
  413.  
  414.    :s_v
  415.   ::  Pad digits to --->
  416.       (SET _1=%_1% #   #)
  417.       (SET _2=%_2% #   #)
  418.       (SET _3=%_3% #   #)
  419.       (SET _4=%_4% #   #)
  420.       (SET _5=%_5% #   #)
  421.       (SET _6=%_6%  # # )
  422.       (SET _7=%_7%   #  )
  423.    GOTO :EOF
  424.  
  425.    :s_w
  426.   ::  Pad digits to ----->
  427.       (SET _1=%_1% #  #  #)
  428.       (SET _2=%_2% #  #  #)
  429.       (SET _3=%_3% #  #  #)
  430.       (SET _4=%_4% #  #  #)
  431.       (SET _5=%_5% #  #  #)
  432.       (SET _6=%_6% #  #  #)
  433.       (SET _7=%_7%  ## ## )
  434.    GOTO :EOF
  435.  
  436.    :s_x
  437.   ::  Pad digits to -->
  438.       (SET _1=%_1%      )
  439.       (SET _2=%_2% #   #)
  440.       (SET _3=%_3%  # # )
  441.       (SET _4=%_4%   #  )
  442.       (SET _5=%_5%   #  )
  443.       (SET _6=%_6%  # # )
  444.       (SET _7=%_7% #   #)
  445.    GOTO :EOF
  446.  
  447.    :s_y
  448.   ::  Pad digits to --->
  449.       (SET _1=%_1% #   #)
  450.       (SET _2=%_2%  # # )
  451.       (SET _3=%_3%   #  )
  452.       (SET _4=%_4%   #  )
  453.       (SET _5=%_5%   #  )
  454.       (SET _6=%_6%   #  )
  455.       (SET _7=%_7%   #  )
  456.    GOTO :EOF
  457.  
  458.    :s_z
  459.   ::  Pad digits to --->
  460.       (SET _1=%_1% #####)
  461.       (SET _2=%_2%     #)
  462.       (SET _3=%_3%    # )
  463.       (SET _4=%_4%   #  )
  464.       (SET _5=%_5%  #   )
  465.       (SET _6=%_6% #    )
  466.       (SET _7=%_7% #####)
  467.    GOTO :EOF
  468.  
  469.    :s_space
  470.   ::  Pad digits to --->
  471.       (SET _1=%_1%      )
  472.       (SET _2=%_2%      )
  473.       (SET _3=%_3%      )
  474.       (SET _4=%_4%      )
  475.       (SET _5=%_5%      )
  476.       (SET _6=%_6%      )
  477.       (SET _7=%_7%      )
  478.    GOTO :EOF
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!