Wacky_rubia

longsum

Jan 16th, 2014
146
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Batch 1.32 KB | None | 0 0
  1. @echo off
  2. setlocal EnableDelayedExpansion
  3. set Number1=%1
  4. set Number2=%2
  5. set /A length1=0
  6. set /A length2=0
  7. :l1
  8. set /A length1=!length1!+1
  9. if NOT "!Number1:~%length1%,1!" == "" goto :l1
  10. :l2
  11. set /A length2=!length2!+1
  12. if NOT "!Number2:~%length2%,1!" == "" goto :l2
  13. if !length1! == !length2! (
  14.     set length=!length1!
  15. ) else (
  16.     if !length1! LSS !length2! (
  17.         set /A length=!length2!
  18.         :m1
  19.         set /A length1=!length1!+1
  20.         set Number1=0!Number1!
  21.         if !length1! LSS !length! goto :m1
  22.     ) else (
  23.         set /A length=!length1!
  24.         :m2
  25.         set /A length2=!length2!+1
  26.         set Number2=0!Number2!
  27.         if !length2! LSS !length! goto :m2
  28.     )
  29. )
  30. set /A remainder=0
  31. set /A curn=0
  32. set /A length=!length!-1
  33. set /A curn=!Number1:~%length%,1!+!Number2:~%length%,1!
  34. set /A curn=!curn!+!remainder!
  35. if !curn! LSS 10 (
  36.     set ans=!curn!
  37.     set /A remainder=0
  38. ) else (
  39.     set ans=!curn:~2,1!
  40.     set /A remainder=1
  41. )
  42. set /A length=!length!-1
  43. if NOT !length! LSS 0 goto :start
  44. :start
  45.     set /A curn=!Number1:~%length%,1!+!Number2:~%length%,1!
  46.     set /A curn=!curn!+!remainder!
  47.     if !curn! LSS 10 (
  48.         set ans=!curn!!ans!
  49.         set /A remainder=0
  50.     ) else (
  51.         set curn=!curn:~1,1!
  52.         set ans=!curn!!ans!
  53.         set /A remainder=1
  54.     )
  55.     set /A length=!length!-1
  56.     if NOT !length! LSS 0 goto :start
  57. set fn=!ans:~0,1!
  58. if "!fn!" == "0" set ans=!ans:~1!
  59. endlocal & set ans=%ans%
Advertisement
Add Comment
Please, Sign In to add comment