sub horse_mount()
    var horse_name = "JollyJumper"
    var horse_serial = "0x001B3F3F"
    var own_serial = "0x0008bc20"
    uo.deletejournal()
    wait(200)
    uo.click(horse_serial)
    wait(500)
    if (uo.injournal(horse_name)==1) then
        #mount
        uo.useobject(horse_serial)
    else
        #dismount
        uo.useobject(own_serial)
    endif
end sub