Diponegoro Visual Basic Event of Scout IV