i think this will work.
Call WriteAbyte("Warrock", 4FCF35 , &H90)
Call WriteAbyte("Warrock", 4FCF36 , &H90)
Call WriteAbyte("Warrock", 4FCF37 , &H90)
Call WriteAbyte("Warrock", 4FCF38 , &H90)
Call WriteAbyte("Warrock", 4FCF39 , &H90)
Call WriteAbyte("Warrock", 4FCF3A , &H90)