powered by
write.gra(map, file, replace = FALSE)
bnd2gra
read.gra
read.bnd
write.bnd
data("FantasyBnd") tfile <- tempfile() write.gra(bnd2gra(FantasyBnd), file = tfile) cat(readLines(tfile), sep = "") unlink(tfile)
Run the code above in your browser using DataLab