Ragnarok Auto Potion Free

 Posted admin
I'm posting here a very useful tool.
There you can set to automatically use your potion or Ygg when his HP reaches a certain percentage (in which you choose)
You need microsoft net framework updated.
How is an easy to configure, do not post details the step by step. more if there are any questions, just come here to ask
@I'm having problem to upload the files forum, so up in 4shared
RoMedic.rar - 4shared.com - online file sharing and storage - download
@I helped you? thank
@scan
http://www.virustotal.com/file-scan/..cf0-1314708220

Auto HP - Auto SP - Dual key for both HP and SP for 2 type of potion/berry - Battlemode Key - Run autopot at the background for RO even when I am on Facebook page. Telecharger autocad 2013 gratuit avec crack windows 10. MsgBox, 49,, After this message box disappear`nthe next location you click will be the coordinate this script moniter`nWhenever the coordinate's color change`, potion will be use`n`nUse (Alt + Tab) to switch window and `nI RECOMMEND you to pick coordinate when SP is 100 `% FULL.

Apr 8, 2018 - I am just getting started and was shopping around and found a brand called Alpine Designs. I have a tent of theirs from. And now the name. Alpine design tent replacement parts. Mar 25, 2018 - Alpine Design Tent Manual. Bought the three-season 'Alpine Design Horizon 3' Tent from Sports. Download Adobe's Acrobat Reader. Mar 31, 2018 - Alpine Design Horizon 5 Person Tent - $69.99 - The Alpine Design Horizon 5-person dome tent is set-up with a detachable rainfly for extra.

Permalink

Join GitHub today

Ragnarok auto potion config

GitHub is home to over 36 million developers working together to host and review code, manage projects, and build software together.

Sign up
Branch:master
Find file Copy path
1 contributor
#NoEnv; Recommended for performance and compatibility with future AutoHotkey releases.
; #Warn ; Enable warnings to assist with detecting common errors.
SendModeInput ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
#SingleInstance Force
if not A_IsAdmin
{
Run*RunAs'%A_ScriptFullPath%' ; Requires v1.0.92.01+
ExitApp
}
IfNotExist, ROAPscreenCapture.exe
{
batScript =
(
//2>nul@goto :batch
/*
:batch
@echo off
setlocal
:: find csc.exe
set 'csc='
for /r '`%SystemRoot`%Microsoft.NETFramework' `%`%# in ('*csc.exe') do set 'csc=`%`%#'
if not exist '`%csc`%' (
echo no .net framework installed
exit /b 10
`)
if not exist '`%~n0.exe' (
call `%csc`% /nologo /r:'Microsoft.VisualBasic.dll' /out:'`%~n0.exe' '`%~dpsfnx0' (
exit /b `%errorlevel`%
`)
`)
`%~n0.exe `%*
endlocal & exit /b `%errorlevel`%
*/
// reference
// https://gallery.technet.microsoft.com/scriptcenter/eeff544a-f690-4f6b-a586-11eea6fc5eb8
using System;
using System.Runtime.InteropServices;
using System.Drawing;
using System.Drawing.Imaging;
using System.Collections.Generic;
using Microsoft.VisualBasic;
/// Provides functions to capture the entire screen, or a particular window, and save it to a file.
public class ScreenCapture
{
/// Creates an Image object containing a screen shot the active window
public Image CaptureActiveWindow()
{
return CaptureWindow(User32.GetForegroundWindow());
}
/// Creates an Image object containing a screen shot of the entire desktop
public Image CaptureScreen()
{
return CaptureWindow(User32.GetDesktopWindow());
}
/// Creates an Image object containing a screen shot of a specific window
private Image CaptureWindow(IntPtr handle)
{
// get te hDC of the target window
IntPtr hdcSrc = User32.GetWindowDC(handle);
// get the size
User32.RECT windowRect = new User32.RECT();
User32.GetWindowRect(handle, ref windowRect);
int width = windowRect.right- windowRect.left;
int height = windowRect.bottom - windowRect.top;
// create a device context we can copy to
IntPtr hdcDest = GDI32.CreateCompatibleDC(hdcSrc);
// create a bitmap we can copy it to,
// using GetDeviceCaps to get the width/height
IntPtr hBitmap = GDI32.CreateCompatibleBitmap(hdcSrc, width, height);
// select the bitmap object
IntPtr hOld = GDI32.SelectObject(hdcDest, hBitmap);
// bitblt over
GDI32.BitBlt(hdcDest, 0, 0, width, height, hdcSrc, 0, 0, GDI32.SRCCOPY);
//restore selection
GDI32.SelectObject(hdcDest, hOld);
// clean up
GDI32.DeleteDC(hdcDest);
User32.ReleaseDC(handle, hdcSrc);
// get a .NET image object for it
Image img = Image.FromHbitmap(hBitmap);
// free up the Bitmap object
GDI32.DeleteObject(hBitmap);
return img;
}
public void CaptureActiveWindowToFile(string filename, ImageFormat format)
{
Image img = CaptureActiveWindow();
img.Save(filename, format);
}
public void CaptureScreenToFile(string filename, ImageFormat format)
{
Image img = CaptureScreen();
img.Save(filename, format);
}
static bool fullscreen = true;
static String file = 'screenshot.bmp';
static System.Drawing.Imaging.ImageFormat format = System.Drawing.Imaging.ImageFormat.Bmp;
static String windowTitle = ';
static void parseArguments()
{
String[] arguments = Environment.GetCommandLineArgs();
if (arguments.Length1)
{
printHelp();
Environment.Exit(0);
}
if (arguments[1].ToLower().Equals('/h') arguments[1].ToLower().Equals('/help'))
{
printHelp();
Environment.Exit(0);
}
file = arguments[1];
Dictionary<String, System.Drawing.Imaging.ImageFormat> formats =
new Dictionary<String, System.Drawing.Imaging.ImageFormat>();
formats.Add('bmp', System.Drawing.Imaging.ImageFormat.Bmp);
formats.Add('emf', System.Drawing.Imaging.ImageFormat.Emf);
formats.Add('exif', System.Drawing.Imaging.ImageFormat.Exif);
formats.Add('jpg', System.Drawing.Imaging.ImageFormat.Jpeg);
formats.Add('jpeg', System.Drawing.Imaging.ImageFormat.Jpeg);
formats.Add('gif', System.Drawing.Imaging.ImageFormat.Gif);
formats.Add('png', System.Drawing.Imaging.ImageFormat.Png);
formats.Add('tiff', System.Drawing.Imaging.ImageFormat.Tiff);
formats.Add('wmf', System.Drawing.Imaging.ImageFormat.Wmf);
String ext = ';
if (file.LastIndexOf('.') > -1)
{
ext = file.ToLower().Substring(file.LastIndexOf('.') +1, file.Length- file.LastIndexOf('.') -1);
}
else
{
Console.WriteLine('Invalid file name - no extension');
Environment.Exit(7);
}
try
{
format = formats[ext];
}
catch (Exception e)
{
Console.WriteLine('Probably wrong file format:'+ ext);
Console.WriteLine(e.ToString());
Environment.Exit(8);
}
if (arguments.Length > 2)
{
windowTitle = arguments[2];
fullscreen = false;
}
}
static void printHelp()
{
//clears the extension from the script name
String scriptName = Environment.GetCommandLineArgs()[0];
scriptName = scriptName.Substring(0, scriptName.Length);
Console.WriteLine(scriptName +' captures the screen or the active window and saves it to a file.');
Console.WriteLine(');
Console.WriteLine('Usage:');
Console.WriteLine(''+ scriptName +' filename [WindowTitle]');
Console.WriteLine(');
Console.WriteLine('finename - the file where the screen capture will be saved');
Console.WriteLine(' allowed file extensions are - Bmp,Emf,Exif,Gif,Icon,Jpeg,Png,Tiff,Wmf.');
Console.WriteLine('WindowTitle - instead of capture whole screen you can point to a window ');
Console.WriteLine(' with a title which will put on focus and captuted.');
Console.WriteLine(' For WindowTitle you can pass only the first few characters.');
Console.WriteLine(' If don't want to change the current active window pass only '');
}
public static void Main()
{
parseArguments();
ScreenCapture sc = new ScreenCapture();
if (!fullscreen &&!windowTitle.Equals('))
{
try
{
Interaction.AppActivate(windowTitle);
Console.WriteLine('setting '+ windowTitle +' on focus');
}
catch (Exception e)
{
Console.WriteLine('Probably there's no window like '+ windowTitle);
Console.WriteLine(e.ToString());
Environment.Exit(9);
}
}
try
{
if (fullscreen)
{
Console.WriteLine('Taking a capture of the whole screen to '+ file);
sc.CaptureScreenToFile(file, format);
}
else
{
Console.WriteLine('Taking a capture of the active window to '+ file);
sc.CaptureActiveWindowToFile(file, format);
}
}
catch (Exception e)
{
Console.WriteLine('Check if file path is valid '+ file);
Console.WriteLine(e.ToString());
}
}
/// Helper class containing Gdi32 API functions
private class GDI32
{
public const int SRCCOPY = 0x00CC0020; // BitBlt dwRop parameter
[DllImport('gdi32.dll')]
public static extern bool BitBlt(IntPtr hObject, int nXDest, int nYDest,
int nWidth, int nHeight, IntPtr hObjectSource,
int nXSrc, int nYSrc, int dwRop);
[DllImport('gdi32.dll')]
public static extern IntPtr CreateCompatibleBitmap(IntPtr hDC, int nWidth,
int nHeight);
[DllImport('gdi32.dll')]
public static extern IntPtr CreateCompatibleDC(IntPtr hDC);
[DllImport('gdi32.dll')]
public static extern bool DeleteDC(IntPtr hDC);
[DllImport('gdi32.dll')]
public static extern bool DeleteObject(IntPtr hObject);
[DllImport('gdi32.dll')]
public static extern IntPtr SelectObject(IntPtr hDC, IntPtr hObject);
}
/// Helper class containing User32 API functions
private class User32
{
[StructLayout(LayoutKind.Sequential)]
public struct RECT
{
public int left;
public int top;
public int right;
public int bottom;
}
[DllImport('user32.dll')]
public static extern IntPtr GetDesktopWindow();
[DllImport('user32.dll')]
public static extern IntPtr GetWindowDC(IntPtr hWnd);
[DllImport('user32.dll')]
public static extern IntPtr ReleaseDC(IntPtr hWnd, IntPtr hDC);
[DllImport('user32.dll')]
public static extern IntPtr GetWindowRect(IntPtr hWnd, ref RECT rect);
[DllImport('user32.dll')]
public static extern IntPtr GetForegroundWindow();
}
}
)
FileAppend, %batScript%, ROAPscreenCapture.bat
Run, %comspec% /c ROAPscreenCapture.bat ,,Hide,cmdPID
while!FileExist('ROAPscreenCapture.exe')
Sleep10
FileDelete, ROAPscreenCapture.bat
screenCapture_check := 1
}
else
screenCapture_check := 1
;~ SetBatchLines -1
ListLinesOff
; LOAD INI
IniRead, HP_Button, ROAP.ini, Hotkey, HP
IniRead, SP_Button, ROAP.ini, Hotkey, SP
IniRead, sendMode, ROAP.ini, Hotkey, SendMode
IfInString, sendMode, control
sendMode = 1
else
sendMode = 2
IniRead, HP, ROAP.ini, Trigger, HP
IniRead, SP, ROAP.ini, Trigger, SP
IniRead, HP_Delay, ROAP.ini, Delay, HP
IniRead, SP_Delay, ROAP.ini, Delay, SP
IniRead, auto_HP, ROAP.ini, Checkbox, HP
IniRead, auto_SP, ROAP.ini, Checkbox, SP
Gui, Color, 2b2b2b
Gui, Font, cWhite
Gui, Add, Text, x10 y15 vProcess w500, Noprocess selected
Gui, Add, ActiveX, xp y40 w350 h150 vWB +ReadOnly, Shell.Explorer
WB.Navigate('about:blank')
WB.silent := true
Gui, Add, Groupbox, cBlue xpyp+160 w350 h80 vGroupbox
Gui, font, w1000
if auto_HP
Gui, Add, Checkbox, xp+45yp+25+Checked c00FF00 vauto_HP, Auto HP
else
Gui, Add, Checkbox, xp+45yp+25 c00FF00 vauto_HP, Auto HP
Gui, font, w8
Gui, Add, Text, xp+80yp, Press:
StringRight, temp, HP_Button, 1
Gui, Add, DropdownList, xp+38yp-3 w50 +Choose%temp% vHP_Button,F1F2F3F4F5F6F7F8F9
Gui, Add, Text, xp+58yp+3, if HP <
Gui, Add, Edit, xp+40yp-3 vHP w40 cBlack +Number Limit2,
Gui, Add, Updown, Range20-99, %HP%
Gui, Add, Text, xp+45yp+3, `%
Gui, font, w1000
if auto_SP
Gui, Add, Checkbox, x55 yp+27+Checked c00FFFF vauto_SP, Auto SP
else
Gui, Add, Checkbox, x55 yp+27 c00FFFF vauto_SP, Auto SP
Gui, font, w8
Gui, Add, Text, xp+80yp, Press:
StringRight, temp, SP_Button, 1
Gui, Add, DropdownList, xp+38yp-3 w50 +Choose%temp% vSP_Button,F1F2F3F4F5F6F7F8F9
Gui, Add, Text, xp+58yp+3, if SP <
Gui, Add, Edit, xp+40yp-3 vSP w40 cBlack +Number Limit2,
Gui, Add, Updown, Range20-99, %SP%
Gui, Add, Text, xp+45yp+3, `%
Gui, Add, Text,x246 y288 c00FF00 , HP-Delay:
Gui, Add, Edit, xp+55yp-4+number w60 cBlack vHP_Delay, %HP_Delay%
Gui, Add, Text,x246 y310 c00FFFF , SP-Delay:
Gui, Add, Edit, xp+55yp-4+number w60 cBlack vSP_Delay, %SP_Delay%
Gui, Add, Text, x10 y310 +BackgroundTrans, CTRL+F1- to select client`nCTRL +F5- to start/stop auto potion
Gui, Add, Link, xpyp+40 cBlack +BackgroundTrans, Credit / About:`nThis was made based on'Ragnarok Auto Potion' from `n<a href='http://www.garenathai.com'>http://www.garenathai.com</a>
Gui, Add, Button, x280 y330 w80 h60 vstart gstart, Start`n(Ctrl+F5)
Gui, Add, ActiveX, vAD x10 y395 w350 h100, Shell.Explorer
AD.Navigate('http://textuploader.com/dd0f6/raw')
AD.silent := true
Gui, +Resize
guiW = 370
guiH = 500
Gui, Show, w%guiW% h%guiH%, RO Auto Pot ( AHK Re-made) - http://ragindex.blogspot.com
return
~LButton::placeArrow('HP')
~RButton::placeArrow('SP')
^F1::
if!screenCapture_check
{
ToolTip, Making screenCapture.exe`, please wait.
SetTimer, removeTT, 500
return
}
FileDelete, ROAP.bmp
WinGetActiveTitle, ActiveTitle
GuiControl,, Process, %ActiveTitle%
Run, %comspec% /c ROAPscreenCapture ROAP.bmp '%ActiveTitle%' ,,Hide,cmdPID
html =
(LtrimJoin
<!doctype html>
<html>
<head>
<style>
body {
background-color: #2b2b2b;
margin: 0;
padding: 0;
}
img {
-moz-user-select: none;
-webkit-user-select: none;
-ms-user-select: none;
user-select: none;
-webkit-user-drag: none;
user-drag: none;
-webkit-touch-callout: none;
}
/* Health Point -> Arrow */
#arrow-HP1 {
position: absolute;
top: -100px;
left: -100px;
z-index: 999;
width: 0;
height: 0;
border-top: 5px solid transparent;
border-bottom: 5px solid transparent;
border-right: 5px solid red;
}
#arrow-HP2 {
position: absolute;
top: -100px;
left: -100px;
z-index: 999;
width: 20px;
height: 0px;
border: 1px solid red;
}
#arrow-HP3 {
position: absolute;
top: -100px;
left: -100px;
z-index: 999;
width: 0;
height: 0;
border-top: 5px solid transparent;
border-bottom: 5px solid transparent;
border-left: 5px solid red;
}
/* Mana Point -> Arrow */
#arrow-SP1 {
position: absolute;
top: -100px;
left: -100px;
z-index: 999;
width: 0;
height: 0;
border-top: 5px solid transparent;
border-bottom: 5px solid transparent;
border-right: 5px solid blue;
}
#arrow-SP2 {
position: absolute;
top: -100px;
left: -100px;
z-index: 999;
width: 20px;
height: 0px;
border: 1px solid blue;
}
#arrow-SP3 {
position: absolute;
top: -100px;
left: -100px;
z-index: 999;
width: 0;
height: 0;
border-top: 5px solid transparent;
border-bottom: 5px solid transparent;
border-left: 5px solid blue;
}
</style>
<script type='text/javascript'>
function nocontext(e) {
var clickedTag = (enull) ? event.srcElement.tagName : e.target.tagName;
if (clickedTag 'IMG')
returnfalse;
}
document.oncontextmenu = nocontext;
</script>
</head>
<body onmousemove ='showCoor(event)'onmouseout='clearCoor()'>
<!-- HP / SP-->
<div id='arrow-HP1'></div>
<div id='arrow-HP2'></div>
<div id='arrow-HP3'></div>
<div id='arrow-SP1'></div>
<div id='arrow-SP2'></div>
<div id='arrow-SP3'></div>
<!-- Info -->
<p id='Coordinate'style='display: none;'></p>
<script>
function showCoor(event) {
var x, y;
if (event.pageX event.pageY) {
x = event.pageX;
y = event.pageY;
}
else {
x = event.clientX + document.body.scrollLeft + document.documentElement.scrollLeft;
y = event.clientY + document.body.scrollTop + document.documentElement.scrollTop;
}
var coor = x +','+ y;
document.getElementById('Coordinate').innerHTML = coor;
}
function clearCoor() {
document.getElementById('Coordinate').innerHTML = ';
}
</script>
<img src='%A_ScriptDir%ROAP.bmp' draggable='false'>
</body>
</html>
)
while!FileExist('ROAP.bmp')
Sleep20
WB.Navigate('about:blank')
Sleep50
WB.Document.Write(html)
html=
return
^F5::
start:
if!ActiveTitle
{
MsgBox, 262160, ERROR, Noprocess selected
return
}
start := !start
Gui, submit, nohide
if start
{
GuiControl,, start, Stop`n(Ctrl+F5)
ToolTip, STARTED
SetTimer, removeTT, On
WinGetPos, winX, winY,,, %ActiveTitle%
setMark('HP',HP)
setMark('SP',SP)
; Identify white cell to determine if @jump @refresh
whiteY := HP_Y
Loop
{
whiteY--
CoordMode, pixel, screen
PixelGetColor, whiteColor, HP_EndX, whiteY, RGB
if (whiteColor = '0xFFFFFF')
break
}
if auto_HP
SetTimer, HP_Watch, %HP_Delay%
if auto_SP
SetTimer, SP_Watch, %SP_Delay%
}
else
{
GuiControl,, start, Start`n(Ctrl+F5)
ToolTip, STOPPED
SetTimer, removeTT, On
SetTimer, HP_Watch, Off
SetTimer, SP_Watch, Off
}
return
HP_Watch:
IfWinNotActive, %ActiveTitle%
return
CoordMode, pixel, screen
PixelGetColor, HP_new_color, HP_WatchX, HP_WatchY, RGB
PixelGetColor, whiteColor, HP_EndX, whiteY, RGB
if (whiteColor != '0xFFFFFF')
{
Sleep1100
return
}
if (HP_new_color = '0x000000')
{
Sleep1100
return
}
else if (HP_new_color != HP_base_color)
ifsendMode = 1
ControlSend,, {%HP_Button%}, %ActiveTitle%
else
Send, {%HP_Button%}
return
SP_Watch:
IfWinNotActive, %ActiveTitle%
return
CoordMode, pixel, screen
PixelGetColor, SP_new_color, SP_WatchX, SP_WatchY, RGB
PixelGetColor, whiteColor, HP_EndX, whiteY, RGB
if (whiteColor != '0xFFFFFF')
{
Sleep1100
return
}
if (SP_new_color = '0x000000')
{
Sleep1100
return
}
else if (SP_new_color != SP_base_color)
ifsendMode = 1
ControlSend,, {%SP_Button%}, %ActiveTitle%
else
Send, {%SP_Button%}
return
removeTT:
Sleep500
ToolTip
SetTimer, removeTT, Off
return
GuiSize:
WB_w := A_GuiWidth-20
GuiControl, Move, WB, x10 y40 w%WB_w%
GuiControl, Move, Groupbox, x10 y200 w%WB_w%
return
GuiClose:
FileDelete, ROAP.bmp
Gui, submit, nohide
IniWrite, %HP_Button%, ROAP.ini, Hotkey, HP
IniWrite, %SP_Button%, ROAP.ini, Hotkey, SP
IniWrite, %HP%, ROAP.ini, Trigger, HP
IniWrite, %SP%, ROAP.ini, Trigger, SP
IniWrite, %HP_Delay%, ROAP.ini, Delay, HP
IniWrite, %SP_Delay%, ROAP.ini, Delay, SP
IniWrite, %auto_HP%, ROAP.ini, Checkbox, HP
IniWrite, %auto_SP%, ROAP.ini, Checkbox, SP
ExitApp
; FUNCTION
setMark(HP_SP,mark) {
global
%HP_SP%_mark := Round(((%HP_SP%_EndX - %HP_SP%_StartX) /100)*mark,0)
%HP_SP%_WatchX := winX + %HP_SP%_StartX + %HP_SP%_mark
%HP_SP%_WatchY := winY + %HP_SP%_Y
; Check if mark is 0x000000 if so move over to right
PixelGetColor, check_mark, %HP_SP%_WatchX, %HP_SP%_WatchY, RGB
Loop
if (check_mark = '0x000000')
%HP_SP%_WatchX++
else
break
}
placeArrow(HP_SP) {
global wb, HP_StartX, HP_EndX, SP_StartX, SP_EndX, HP_base_color, SP_base_color, HP_Y, SP_Y
if wb.document.getElementById('Coordinate').innerHTML
{
; store Coordinate
pageCoor := wb.document.getElementById('Coordinate').innerHTML
StringSplit, coor_, pageCoor, `,
MouseGetPos, MouseX, MouseY
; Move the arrow out of the way
WB.document.getElementById('arrow-' HP_SP '1').style.left := -100
WB.document.getElementById('arrow-' HP_SP '1').style.top := -100
WB.document.getElementById('arrow-' HP_SP '2').style.left := -100
WB.document.getElementById('arrow-' HP_SP '2').style.top := -100
WB.document.getElementById('arrow-' HP_SP '3').style.left := -100
WB.document.getElementById('arrow-' HP_SP '3').style.top := -100
Sleep50
PixelGetColor, %HP_SP%_base_color, %MouseX%, %MouseY%, RGB
ToolTip identifying %HP_SP% bar ..
if!ErrorLevel
{
; Loop to the LEFT
tempX := MouseX
Loop
{
tempX--
PixelGetColor, color, %tempX%, %MouseY%, RGB
if (color = '0x000000')
continue
if (%HP_SP%_base_color != color)
break
}
; Loop to the RIGHT
tempX1 := MouseX
Loop
{
tempX1++
PixelGetColor, color, %tempX1%, %MouseY%, RGB
if (color = '0x000000')
continue
if (%HP_SP%_base_color != color)
break
}
%HP_SP%_StartX := coor_1 - (MouseX - tempX)
%HP_SP%_EndX := %HP_SP%_StartX + (tempX1 - tempX)
%HP_SP%_Y := coor_2
; Move arrow to coor
WB.document.getElementById('arrow-' HP_SP '1').style.left := coor_1 - (MouseX - tempX)
WB.document.getElementById('arrow-' HP_SP '1').style.top := coor_2 -5
WB.document.getElementById('arrow-' HP_SP '2').style.left := coor_1 - (MouseX - tempX)
WB.document.getElementById('arrow-' HP_SP '2').style.top := coor_2 -1
WB.document.getElementById('arrow-' HP_SP '2').style.width := tempX1 - tempX
WB.document.getElementById('arrow-' HP_SP '3').style.left := coor_1 + (tempX1 - MouseX)-4
WB.document.getElementById('arrow-' HP_SP '3').style.top := coor_2 -5
ToolTip
}
}
}

Ragnarok Auto Potion Free Download

  • Copy lines
  • Copy permalink