Cómo utilizar el código fuente de los sueños
Inicio REM
x1=3
y1=22
x2=643
y2 =502
Base remota del mouse
VBSCall FindColor(x1, y1, x2, y2, "c87c20", x3, y3)
Si x3 gt0 e y3 gt0
IfColor x3 1, y3 1, A86c30, 0
IfColor x3 3, y3 3, 804c28, 0
x3=x3-19-3
y3=y3-18-3
Otros
x1=x3 1
y1=y3 1
Ir al asiento del mouse
EndIf
Otro
x1=x3 1
y1=y3 1
Ir al asiento del mouse
EndIf
Otro
Ir al asiento del mouse
EndIf
Cálculo del asiento remoto del mouse
x5=x-x3
y5=y-y3
EBV x4=Abs(x-x3)
EBV y4= Abs (y-y3)
Si x4 gt50 o y4 gt50
Si x5 gt10//Si quieres moverte más rápido, puedes cambiar los 10 aquí a 20, 30, 50, etc. .
x5=10
EndIf
Si x5 lt-10
x5=-10
EndIf
Si y5 gt10
y5=10
EndIf
Si y5 lt-10
y5=-10
EndIf
Movers x5, y5
VBSCall GetCursorPos(x3, y3)
Ir al cálculo del asiento del mouse
EndIf
Si x4 lt4 y y4 lt cuatro
Otros
Motores x5, y5
Retraso 100
Ir al asiento del mouse
EndIf
Regresar
// La subrutina del script anterior ha resuelto el problema de la deriva del mouse en los sueños. Si quieres ser más perfecto, simplemente haz cambios basados en esto.
// -
//Ejemplo:
//x=100
//y=100
//gosub drift
//No es necesario usar moveto.
// -
//Entorno de ejecución: 32 colores, tema clásico, posición de ventana 0,0.
// -