即时攻略自制教程大改进！这是人类的胜利！
R4即使攻略制作解剖
总的来说...............就是任何攻略都可以转换成文字+图片进行批量处理
好了 开讲
其实很简单的........但是楼主兜了一个大弯才学会编辑
首先任何攻略拿到手 有表格的去掉表格【这里注意：表格是指的一行一列的或者一行3列以下的
过多的格子不适宜去掉表格 反而会造成阅读不便】
【word的表格变成文字楼主也补充一下好了 全选之后 菜单→表格→转换→表格转换成文字】
这里再三强调.........一定是只剩下文字和图片........其他一律删掉【举例子就请去TUS的MHP3村长任务攻略看看
可以看到除了图片和文字之外.......是还有一条小小的横线的....务必记住 请删去所有和文字图片东西无关的东西】
剩下的操作非常简单，大概分为3步：
1、用你的word2003打开你清理过后的攻略，全选【ctrl+A】
然后：菜单→格式→段落→缩进和间距→对齐方式：两端对齐→大纲级别：正文文本→
→缩进：左右都是零字符，特殊格式无→段前段后都是0行→行距：单倍
2、菜单→文件→页面设置→页边距的左设为0厘米
3、菜单→工具→宏→visual basic编辑器→在编辑界面的菜单里面选择插入模块
在给大家代码之前大家请确信好自己的原先的游戏截图是有多大
然后SST允许的最大图片是256*192【PIXEL】请记好
用sst的图片边距除以你原本的图片边距算出比值
例：我的图片大小是320*200 那么缩小同样的比率
200这个边肯定符合要求 所以我们用320除以256算出比值
再举一个例子：假如比值算出来是0.6
那么我们的代码就可以写这样一段代码:
Sub Macro()
For Each iShape In ActiveDocument.InlineShapes
iShape.Height = iShape.Height * 0.6
iShape.Width = iShape.Width * 0.6
Next iShape
End Sub
回车【楼主没有回车那个符号】
然后F5 确认【在第三步之前已经存档了】
楼主要提示的是，不要随便去掉空格键
不要随便多加回车 回车就一个
光标停留在End Sub的下面 然后刷新
最后的成果全选复制
打开你的SST修改器
黏贴到左边的篮筐里面就大功告成了！
而雷顿的做法和上述有所不同.......就是建立于2003无法转换表格的基础上
和上面基本一样
但是第一个步骤缩进右改成20
然后转换RTF格式然后用SST打开生成........
完美KO
‘固定的高度和宽度,如5cm高，7cm宽，注意0.353的意义【1磅＝0.353厘米】。
iShape.Height = 50/0.353 ’其单位为磅
iShape.Width = 70/0.353 ’其单位为磅
总的来说...............就是任何攻略都可以转换成文字+图片进行批量处理
好了 开讲
其实很简单的........但是楼主兜了一个大弯才学会编辑
首先任何攻略拿到手 有表格的去掉表格【这里注意：表格是指的一行一列的或者一行3列以下的
过多的格子不适宜去掉表格 反而会造成阅读不便】
 |
楼主特别批注：此类型的表格无论以表格方式或者文字方式都成功不了.......有兴趣的同学可以自己 |
【word的表格变成文字楼主也补充一下好了 全选之后 菜单→表格→转换→表格转换成文字】
这里再三强调.........一定是只剩下文字和图片........其他一律删掉【举例子就请去TUS的MHP3村长任务攻略看看
可以看到除了图片和文字之外.......是还有一条小小的横线的....务必记住 请删去所有和文字图片东西无关的东西】
剩下的操作非常简单，大概分为3步：
1、用你的word2003打开你清理过后的攻略，全选【ctrl+A】
然后：菜单→格式→段落→缩进和间距→对齐方式：两端对齐→大纲级别：正文文本→
→缩进：左右都是零字符，特殊格式无→段前段后都是0行→行距：单倍
2、菜单→文件→页面设置→页边距的左设为0厘米
3、菜单→工具→宏→visual basic编辑器→在编辑界面的菜单里面选择插入模块
在给大家代码之前大家请确信好自己的原先的游戏截图是有多大
然后SST允许的最大图片是256*192【PIXEL】请记好
用sst的图片边距除以你原本的图片边距算出比值
例：我的图片大小是320*200 那么缩小同样的比率
200这个边肯定符合要求 所以我们用320除以256算出比值
再举一个例子：假如比值算出来是0.6
那么我们的代码就可以写这样一段代码:
Sub Macro()
For Each iShape In ActiveDocument.InlineShapes
iShape.Height = iShape.Height * 0.6
iShape.Width = iShape.Width * 0.6
Next iShape
End Sub
回车【楼主没有回车那个符号】
然后F5 确认【在第三步之前已经存档了】
楼主要提示的是，不要随便去掉空格键
不要随便多加回车 回车就一个
光标停留在End Sub的下面 然后刷新
最后的成果全选复制
打开你的SST修改器
黏贴到左边的篮筐里面就大功告成了！
 |
例如：这是楼主做的例子 |
 |
再例如：这是楼主做的雷顿 |
而雷顿的做法和上述有所不同.......就是建立于2003无法转换表格的基础上
和上面基本一样
但是第一个步骤缩进右改成20
然后转换RTF格式然后用SST打开生成........
完美KO
‘固定的高度和宽度,如5cm高，7cm宽，注意0.353的意义【1磅＝0.353厘米】。
iShape.Height = 50/0.353 ’其单位为磅
iShape.Width = 70/0.353 ’其单位为磅
