Calculate the correct current limit for driver A4988

this one using accellibrary actually do work but only when running it on 7 volts which causes my stepper to heat up

#include <AccelStepper.h>

AccelStepper myStepper; // Defaults to AccelStepper::FULL4WIRE (4 pins) on 2, 3, 4, 5
const int stepperSpeed = 400;

void setup()
{
  myStepper.setMaxSpeed(1500);
  myStepper.setSpeed(stepperSpeed);
  myStepper.setCurrentPosition(-100);

}

void loop()
{
  if (myStepper.distanceToGo() == 0) {
    myStepper.moveTo(-myStepper.currentPosition());
  }
  myStepper.setSpeed(stepperSpeed);

  myStepper.runSpeedToPosition();
}