Calculadora Batch GoScripts - Go Scripts

Go Scripts

The Computers World

domingo, 27 de janeiro de 2019

Calculadora Batch GoScripts

Calculadora BATCH GoScripts

"SIMPLES" Calculadora Batch. Clique no número que deseja e use como uma calculadora comum, me inspirei na calculadora do Windows 10, porém, com menos recursos. (pt_BR)

"SIMPLE" Calculadora Batch. Haga clic en el número que desea y utilice como una calculadora común, me inspiró en la calculadora de Windows 10, pero con menos recursos. (ES)

"SIMPLE" Batch Calculator. Click on the number you want and use as a common calculator, I was inspired by the Windows 10 calculator, but with fewer features. (EN)

"SIMPLE" Batch Calculator. Mag-click sa numero na gusto mo at gamitin bilang isang karaniwang calculator, ako ay inspirasyon ng calculator ng Windows 10, ngunit may mas kaunting mga tampok. (PH)

Kalkulator Batch "SIMPLE". Klik pada angka yang Anda inginkan dan gunakan sebagai kalkulator umum, saya terinspirasi oleh kalkulator Windows 10, tetapi dengan lebih sedikit fitur. (ID)

"ПРОСТОЙ" Пакетный калькулятор. Нажмите на нужное число и используйте его в качестве обычного калькулятора, я был вдохновлен калькулятором Windows 10, но с меньшим количеством функций. (RU)







CÓDIGO GS_CALC.BAT
  1. :: ==========================================
  2. :: BATCH FILE: CALCULATOR BATCH GOSCRIPTS
  3. :: AUTOR: Daniel SP
  4. :: YEAR: 2019
  5. :: BUILD: 201901271144
  6. :: REQUIRE: MOUSE.exe, include into code;
  7. :: OUR PAGE (PT_BR): goscripts.blogspot.com
  8. :: ==========================================
  9. @echo off
  10. SETLOCAL ENABLEEXTENSIONS ENABLEDELAYEDEXPANSION
  11. pushd !tmp!
  12. call :function_calc_goscripts_vars
  13. title !gs_title_soft!
  14. ::call :function_calc_goscripts_clear
  15. :function_calc_goscripts_home
  16. call :function_calc_goscripts_check_mouse
  17. ::call :function_calc_goscripts_formules
  18. ::prompt $E
  19. mode 40,25 & color 0a
  20. cls
  21. echo.
  22. echo. BY: Daniel SP
  23. echo.
  24. echo. https://www.goscripts.blogspost.com
  25. echo.
  26. echo        ÚÄÄÄÂÄÄÄÂÄÄÄÂÄÄÄ¿     
  27. echo        ³ C ³ %% ³ ^( ³ ^) ³     
  28. echo        ÃÄÄÄÅÄÄÄÅÄÄÄÅÄÄÄ´     
  29. echo        ³ 7 ³ 8 ³ 9 ³ ö ³     
  30. echo        ÃÄÄÄÅÄÄÄÅÄÄÄÅÄÄÄ´     
  31. echo        ³ 4 ³ 5 ³ 6 ³ x ³     
  32. echo        ÃÄÄÄÅÄÄÄÅÄÄÄÅÄÄÄ´     
  33. echo        ³ 1 ³ 2 ³ 3 ³ - ³     
  34. echo        ÃÄÄÄÅÄÄÄÅÄÄÄÅÄÄij     
  35. echo        ³ . ³ 0 ³ ^= ³ + ³     
  36. echo        ÀÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÙ     
  37. :: VIEW FORMULES AND RESULTS
  38. call :function_calc_goscripts_end %~1
  39. :: MOUSE COMMANDS 
  40. For /f "tokens=1,2,3" %%W in ('"Mouse.exe"') do set /a "c=%%W,x=%%X,y=%%Y"
  41. :: First Line of the Buttons
  42. if %c% equ 1 (if %y% equ 6 (For /l %%a in (8,1,10) do ( if %x% equ %%a ( call :function_calc_goscripts_clear & goto :function_calc_goscripts_home))))
  43. if %c% equ 1 (if %y% equ 6 (For /l %%a in (12,1,14) do ( if %x% equ %%a ( call :function_calc_goscripts_message "Disable Yet", 65 & goto :function_calc_goscripts_home))))
  44. if %c% equ 1 (if %y% equ 6 (For /l %%a in (16,1,18) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^( & goto :function_calc_goscripts_home))))
  45. if %c% equ 1 (if %y% equ 6 (For /l %%a in (20,1,22) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^) & goto :function_calc_goscripts_home))))
  46. :: Second Line of the Buttons
  47. if %c% equ 1 (if %y% equ 8 (For /l %%a in (8,1,10) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^7 & goto :function_calc_goscripts_home))))
  48. if %c% equ 1 (if %y% equ 8 (For /l %%a in (12,1,14) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^8 & goto :function_calc_goscripts_home))))
  49. if %c% equ 1 (if %y% equ 8 (For /l %%a in (16,1,18) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^9 & goto :function_calc_goscripts_home))))
  50. if %c% equ 1 (if %y% equ 8 (For /l %%a in (20,1,22) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^/ & goto :function_calc_goscripts_home))))
  51. :: Third Line of the Buttons
  52. if %c% equ 1 (if %y% equ 10 (For /l %%a in (8,1,10) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^4 & goto :function_calc_goscripts_home))))
  53. if %c% equ 1 (if %y% equ 10 (For /l %%a in (12,1,14) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^5 & goto :function_calc_goscripts_home))))
  54. if %c% equ 1 (if %y% equ 10 (For /l %%a in (16,1,18) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^6 & goto :function_calc_goscripts_home))))
  55. if %c% equ 1 (if %y% equ 10 (For /l %%a in (20,1,22) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^* & goto :function_calc_goscripts_home))))
  56. :: Fourth Line of the Buttons
  57. if %c% equ 1 (if %y% equ 12 (For /l %%a in (8,1,10) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^1 & goto :function_calc_goscripts_home))))
  58. if %c% equ 1 (if %y% equ 12 (For /l %%a in (12,1,14) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^2 & goto :function_calc_goscripts_home))))
  59. if %c% equ 1 (if %y% equ 12 (For /l %%a in (16,1,18) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^3 & goto :function_calc_goscripts_home))))
  60. if %c% equ 1 (if %y% equ 12 (For /l %%a in (20,1,22) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^- & goto :function_calc_goscripts_home))))
  61. :: Fiveth Line of the Buttons
  62. if %c% equ 1 (if %y% equ 14 (For /l %%a in (8,1,10) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^. & goto :function_calc_goscripts_home))))
  63. if %c% equ 1 (if %y% equ 14 (For /l %%a in (12,1,14) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^0 & goto :function_calc_goscripts_home))))
  64. if %c% equ 1 (if %y% equ 14 (For /l %%a in (16,1,18) do ( if %x% equ %%a ( call :function_calc_goscripts_sum_equal_button ^= & goto :function_calc_goscripts_home))))
  65. if %c% equ 1 (if %y% equ 14 (For /l %%a in (20,1,22) do ( if %x% equ %%a ( call :function_calc_goscripts_end ^+ & goto :function_calc_goscripts_home))))

  66. goto :function_calc_goscripts_home
  67. ::exit/b

  68. :: Calc Version end
  69. :function_calc_goscripts_end
  70. set FORM_NEXT=%~1
  71. set FORM_PREVIOUS=%FORM_PREVIOUS%%FORM_NEXT%
  72. set FORM=%FORM_PREVIOUS%
  73. set/p"FORM=%FORM%"<nul
  74. exit/B

  75. :: CALC ALL
  76. :function_calc_goscripts_sum_equal_button
  77. if not exist %gs_calc_core_file% ( echo WScript.Echo Eval^(WScript.Arguments^(0^)^) > !gs_calc_core_file! )

  78. for /f %%# in ('cscript //nologo !gs_calc_core_file! "!FORM!"') do (set gs_calc_sum=%%#)
  79. echo.& echo TOTALS: %gs_calc_sum%
  80. pause
  81. call :function_calc_goscripts_clear
  82. exit/b

  83. :: CLEAR CALCS
  84. :function_calc_goscripts_clear
  85. set "FORM="
  86. set "FORM_PREVIOUS="
  87. set "gs_calc_sum="
  88. exit/b

  89. :function_calc_goscripts_message
  90. if exist "!gs_calc_message!" (del /f /q !gs_calc_message!)
  91. echo MyVar ^= MsgBox ^("%~1", %~2, ^"!gs_title_soft!^"^) > !gs_calc_message!
  92. if exist "!gs_calc_message!" (start !gs_calc_message!)
  93. exit/b

  94. :: VARS OF THE SYSTEM 
  95. :function_calc_goscripts_vars
  96. set gs_calc_core_file=gs_calc_core.vbs
  97. set gs_calc_message=gs_calc_message_general.vbs
  98. set gs_title_soft=CALC BATCH GOSCRIPTS
  99. exit/b

  100. :: CHECK IF MOUSECMD EXISTE, ELSE CREATE A NEW FILE
  101. :function_calc_goscripts_check_mouse
  102. if not exist "Mouse.exe" (call :function_calc_goscripts_mouse)
  103. exit/b

  104. :function_calc_goscripts_mouse
  105. ::Setlocal EnableExtensions EnableDelayedExpansion
  106. ::pushd "!temp!"
  107. Del /f /q /a MouseCMD.exe >nul 2>&1
  108. For %%b In (
  109. "4D53434600000000E5020000000000002C000000000000000301010001000000000000"
  110. "00460000000100010052050000000000000000BB3CE87420004D6F7573652E65786500"
  111. "AE44DE4B97025205434B9D54CD6B1341149F4DABC46ABB117AF1204ED05E4422E8510F"
  112. "151D3FA0D5A1AD17A9A46B77DA0637BBCB66AA15142A6BA121047AD09B07FF88A2D14B"
  113. "02F6500F3D7A2B9883960DF4D0839420B5DB371FE9177ED561DFFCE6FDE6CD9BF9BD9D"
  114. "DDFE7B73A80D21D40E16C70855906ABDE8EF6D1AACEBD4872E347F64295D31FA96D243"
  115. "13B902F6036F3CB0F278D4725D8FE3070C07932ECEB9F8DA9D419CF76C96E9ECEC38A3"
  116. "735082509F91D893B78ECCB6A3C6E13D5CEF71E85260589F4E8C13EADC08ED204D2B5E"
  117. "B436D9A754EC366E836C18F25DFE07AD076DC390F7DC1FE6339C4DF1D661B416B4B70C"
  118. "42EA48C6B6B82574198A18307689DD7957B5FF3DE7DDE2B7E7AB4918CC95C90F1A8923"
  119. "870BED66956C52E836A8F916E80AC2BD8846B386984CC92BD210DDA78F72B978977395"
  120. "F5388E69E4404C916CC89822592E93262D419A6818F81269868BA9B05E0DEB5F147B5B"
  121. "B2CB3335F3C52191F4357465F29D56844A5A267515761E5CF31DA987CD84395340624D"
  122. "14360DB989F9B25654194C39917C2FD6CE261BA75B71897D711D3A2E21E3F4F6271519"
  123. "D61266B5FFEB5831A91CE5AF80DF18027DA5969C57527DAB7EDDB2004AF26A455C3C28"
  124. "1932A064CF643D934A4FF45855B74C56A98CA642AB285159E4B4E46C7709B8ED7DEE6F"
  125. "C671B870AC48D64A648D46D75502D839EE19C6E21B8D7BB8C6298D4F354E6B1CD1686B"
  126. "9CD0E848045A3EBFBB1FB378673C8FD5BD7EB38BFB09638E7FBDB60AFC22D867B015B0"
  127. "751DD701DFE809B0B36097D2078FCD171E8D063C633B0E387E9073F9180CB2A39ECB03"
  128. "CF19F385932D309EB57C3FCB9FF84C12E38CE7AD9C6B05E3E206B1A91C470F59E032E7"
  129. "E2059DEA06E383DCBE69B9B6C3947BD5730B9EC3FAE1A705C4E07E628059B6666EB9FE"
  130. "24BF227E245B") Do >>MouseCMD.exe (Echo.For b=1 To len^(%%b^) Step 2
  131. Echo WScript.StdOut.Write Chr^(Clng^("&H"^&Mid^(%%b,b,2^)^)^) : Next)
  132. Cscript /b /e:vbs MouseCMD.exe > MouseCMD.ex_
  133. Expand -r MouseCMD.ex_ >nul 2>&1
  134. Del MouseCMD.ex_ >nul 2>&1
  135. ::popd
  136. Exit/b

  137. :: CREATE THE COLOR COMMAND
  138. :function_goscripts_color_command
  139. :: NOT INCLUDED IN THIS VERSION
  140. :: You can create the colors the same way you use them in Linux.
  141. exit/b

POWERED Go Scripts© Todos os Direitos Reservados
RM Tutoriais© Todos os Direitos Reservados
H4X0R-SW© Todos os Direitos Reservados
GoScripts Cursos Online© Todos os Direitos Reservados

NOSSAS REDES SOCIAIS

Nenhum comentário:

Postar um comentário