   10REM SAVE"$.Arabic.Util.VDUTabs"
   20DIM Start 5*128
   30P%=Start
   40[OPT 2
   50.SATab
   60  EQUB 128  \ First 32 entries are because Soft characters remain untouched
   70  EQUB 129
   80  EQUB 130
   90  EQUB 131
  100  EQUB 132
  110  EQUB 133
  120  EQUB 134
  130  EQUB 135
  140  EQUB 136
  150  EQUB 137
  160  EQUB 138
  170  EQUB 139
  180  EQUB 140
  190  EQUB 141
  200  EQUB 142
  210  EQUB 143
  220  EQUB 144
  230  EQUB 145
  240  EQUB 146
  250  EQUB 147
  260  EQUB 148
  270  EQUB 149
  280  EQUB 150
  290  EQUB 151
  300  EQUB 152
  310  EQUB 153
  320  EQUB 154
  330  EQUB 155
  340  EQUB 156
  350  EQUB 157
  360  EQUB 158
  370  EQUB 159
  380  EQUB 32  \ SATab?160
  390  EQUB 255  \ SATab?161
  400  EQUB 255  \ SATab?162
  410  EQUB 255  \ SATab?163
  420  EQUB 254  \ SATab?164
  430  EQUB 255  \ SATab?165
  440  EQUB 255  \ SATab?166
  450  EQUB 255  \ SATab?167
  460  EQUB 255  \ SATab?168
  470  EQUB 255  \ SATab?169
  480  EQUB 255  \ SATab?170
  490  EQUB 255  \ SATab?171
  500  EQUB 253  \ SATab?172
  510  EQUB 252  \ SATab?173
  520  EQUB 255  \ SATab?174
  530  EQUB 255  \ SATab?175
  540  EQUB 255  \ SATab?176
  550  EQUB 255  \ SATab?177
  560  EQUB 255  \ SATab?178
  570  EQUB 255  \ SATab?179
  580  EQUB 255  \ SATab?180
  590  EQUB 255  \ SATab?181
  600  EQUB 255  \ SATab?182
  610  EQUB 255  \ SATab?183
  620  EQUB 255  \ SATab?184
  630  EQUB 255  \ SATab?185
  640  EQUB 255  \ SATab?186
  650  EQUB 251  \ SATab?187
  660  EQUB 255  \ SATab?188
  670  EQUB 255  \ SATab?189
  680  EQUB 255  \ SATab?190
  690  EQUB 250  \ SATab?191
  700  EQUB 255  \ SATab?192
  710  EQUB 249  \ SATab?193
  720  EQUB 248  \ SATab?194
  730  EQUB 247  \ SATab?195
  740  EQUB 246  \ SATab?196
  750  EQUB 245  \ SATab?197
  760  EQUB 244  \ SATab?198
  770  EQUB 243  \ SATab?199
  780  EQUB 242  \ SATab?200
  790  EQUB 241  \ SATab?201
  800  EQUB 240  \ SATab?202
  810  EQUB 239  \ SATab?203
  820  EQUB 238  \ SATab?204
  830  EQUB 237  \ SATab?205
  840  EQUB 236  \ SATab?206
  850  EQUB 235  \ SATab?207
  860  EQUB 234  \ SATab?208
  870  EQUB 233  \ SATab?209
  880  EQUB 232  \ SATab?210
  890  EQUB 231  \ SATab?211
  900  EQUB 230  \ SATab?212
  910  EQUB 229  \ SATab?213
  920  EQUB 228  \ SATab?214
  930  EQUB 227  \ SATab?215
  940  EQUB 226  \ SATab?216
  950  EQUB 225  \ SATab?217
  960  EQUB 224  \ SATab?218
  970  EQUB 255  \ SATab?219
  980  EQUB 255  \ SATab?220
  990  EQUB 255  \ SATab?221
 1000  EQUB 255  \ SATab?222
 1010  EQUB 255  \ SATab?223
 1020  EQUB 223  \ SATab?224
 1030  EQUB 222  \ SATab?225
 1040  EQUB 221  \ SATab?226
 1050  EQUB 220  \ SATab?227
 1060  EQUB 219  \ SATab?228
 1070  EQUB 218  \ SATab?229
 1080  EQUB 217  \ SATab?230
 1090  EQUB 216  \ SATab?231
 1100  EQUB 215  \ SATab?232
 1110  EQUB 214  \ SATab?233
 1120  EQUB 213  \ SATab?234
 1130  EQUB 212  \ SATab?235
 1140  EQUB 211  \ SATab?236
 1150  EQUB 210  \ SATab?237
 1160  EQUB 209  \ SATab?238
 1170  EQUB 208  \ SATab?239
 1180  EQUB 207  \ SATab?240
 1190  EQUB 206  \ SATab?241
 1200  EQUB 205  \ SATab?242
 1210  EQUB 255  \ SATab?243
 1220  EQUB 255  \ SATab?244
 1230  EQUB 255  \ SATab?245
 1240  EQUB 255  \ SATab?246
 1250  EQUB 255  \ SATab?247
 1260  EQUB 255  \ SATab?248
 1270  EQUB 255  \ SATab?249
 1280  EQUB 255  \ SATab?250
 1290  EQUB 255  \ SATab?251
 1300  EQUB 255  \ SATab?252
 1310  EQUB 255  \ SATab?253
 1320  EQUB 255  \ SATab?254
 1330  EQUB 255  \ SATab?255
 1340.BegTab
 1350  EQUB 128
 1360  EQUB 129
 1370  EQUB 130
 1380  EQUB 131
 1390  EQUB 132
 1400  EQUB 133
 1410  EQUB 134
 1420  EQUB 135
 1430  EQUB 136
 1440  EQUB 137
 1450  EQUB 138
 1460  EQUB 139
 1470  EQUB 140
 1480  EQUB 141
 1490  EQUB 142
 1500  EQUB 143
 1510  EQUB 144
 1520  EQUB 145
 1530  EQUB 146
 1540  EQUB 147
 1550  EQUB 148
 1560  EQUB 149
 1570  EQUB 150
 1580  EQUB 151
 1590  EQUB 152
 1600  EQUB 153
 1610  EQUB 154
 1620  EQUB 155
 1630  EQUB 156
 1640  EQUB 157
 1650  EQUB 158
 1660  EQUB 159
 1670  EQUB 32  \ BegTab?160
 1680  EQUB 255  \ BegTab?161
 1690  EQUB 255  \ BegTab?162
 1700  EQUB 255  \ BegTab?163
 1710  EQUB 254  \ BegTab?164
 1720  EQUB 255  \ BegTab?165
 1730  EQUB 255  \ BegTab?166
 1740  EQUB 255  \ BegTab?167
 1750  EQUB 255  \ BegTab?168
 1760  EQUB 255  \ BegTab?169
 1770  EQUB 255  \ BegTab?170
 1780  EQUB 255  \ BegTab?171
 1790  EQUB 253  \ BegTab?172
 1800  EQUB 252  \ BegTab?173
 1810  EQUB 255  \ BegTab?174
 1820  EQUB 255  \ BegTab?175
 1830  EQUB 255  \ BegTab?176
 1840  EQUB 255  \ BegTab?177
 1850  EQUB 255  \ BegTab?178
 1860  EQUB 255  \ BegTab?179
 1870  EQUB 255  \ BegTab?180
 1880  EQUB 255  \ BegTab?181
 1890  EQUB 255  \ BegTab?182
 1900  EQUB 255  \ BegTab?183
 1910  EQUB 255  \ BegTab?184
 1920  EQUB 255  \ BegTab?185
 1930  EQUB 255  \ BegTab?186
 1940  EQUB 251  \ BegTab?187
 1950  EQUB 255  \ BegTab?188
 1960  EQUB 255  \ BegTab?189
 1970  EQUB 255  \ BegTab?190
 1980  EQUB 250  \ BegTab?191
 1990  EQUB 255  \ BegTab?192
 2000  EQUB 249  \ BegTab?193
 2010  EQUB 248  \ BegTab?194
 2020  EQUB 247  \ BegTab?195
 2030  EQUB 246  \ BegTab?196
 2040  EQUB 245  \ BegTab?197
 2050  EQUB 244  \ BegTab?198
 2060  EQUB 243  \ BegTab?199
 2070  EQUB 204  \ BegTab?200
 2080  EQUB 241  \ BegTab?201
 2090  EQUB 203  \ BegTab?202
 2100  EQUB 202  \ BegTab?203
 2110  EQUB 201  \ BegTab?204
 2120  EQUB 200  \ BegTab?205
 2130  EQUB 199  \ BegTab?206
 2140  EQUB 235  \ BegTab?207
 2150  EQUB 234  \ BegTab?208
 2160  EQUB 233  \ BegTab?209
 2170  EQUB 232  \ BegTab?210
 2180  EQUB 198  \ BegTab?211
 2190  EQUB 197  \ BegTab?212
 2200  EQUB 196  \ BegTab?213
 2210  EQUB 195  \ BegTab?214
 2220  EQUB 227  \ BegTab?215
 2230  EQUB 226  \ BegTab?216
 2240  EQUB 194  \ BegTab?217
 2250  EQUB 193  \ BegTab?218
 2260  EQUB 255  \ BegTab?219
 2270  EQUB 255  \ BegTab?220
 2280  EQUB 255  \ BegTab?221
 2290  EQUB 255  \ BegTab?222
 2300  EQUB 255  \ BegTab?223
 2310  EQUB 223  \ BegTab?224
 2320  EQUB 192  \ BegTAb?225
 2330  EQUB 191  \ BegTab?226
 2340  EQUB 190  \ BegTab?227
 2350  EQUB 189  \ BegTab?228
 2360  EQUB 188  \ BegTab?229
 2370  EQUB 187  \ BegTab?230
 2380  EQUB 216  \ BegTab?231
 2390  EQUB 215  \ BegTab?232
 2400  EQUB 214  \ BegTab?233
 2410  EQUB 186  \ BegTab?234
 2420  EQUB 212  \ BegTab?235
 2430  EQUB 211  \ BegTab?236
 2440  EQUB 210  \ BegTab?237
 2450  EQUB 209  \ BegTab?238
 2460  EQUB 208  \ BegTab?239
 2470  EQUB 207  \ BegTab?240
 2480  EQUB 206  \ BegTab?241
 2490  EQUB 205  \ BegTab?242
 2500  EQUB 255  \ BegTab?243
 2510  EQUB 255  \ BegTab?244
 2520  EQUB 255  \ BegTab?245
 2530  EQUB 255  \ BegTab?246
 2540  EQUB 255  \ BegTab?247
 2550  EQUB 255  \ BegTab?248
 2560  EQUB 255  \ BegTab?249
 2570  EQUB 255  \ BegTab?250
 2580  EQUB 255  \ BegTab?251
 2590  EQUB 255  \ BegTab?252
 2600  EQUB 255  \ BegTab?253
 2610  EQUB 255  \ BegTab?254
 2620  EQUB 255  \ BegTab?255
 2630.MidTab
 2640  EQUB 128
 2650  EQUB 129
 2660  EQUB 130
 2670  EQUB 131
 2680  EQUB 132
 2690  EQUB 133
 2700  EQUB 134
 2710  EQUB 135
 2720  EQUB 136
 2730  EQUB 137
 2740  EQUB 138
 2750  EQUB 139
 2760  EQUB 140
 2770  EQUB 141
 2780  EQUB 142
 2790  EQUB 143
 2800  EQUB 144
 2810  EQUB 145
 2820  EQUB 146
 2830  EQUB 147
 2840  EQUB 148
 2850  EQUB 149
 2860  EQUB 150
 2870  EQUB 151
 2880  EQUB 152
 2890  EQUB 153
 2900  EQUB 154
 2910  EQUB 155
 2920  EQUB 156
 2930  EQUB 157
 2940  EQUB 158
 2950  EQUB 159
 2960  EQUB 32  \ MidTab?160
 2970  EQUB 255  \ MidTab?161
 2980  EQUB 255  \ MidTab?162
 2990  EQUB 255  \ MidTab?163
 3000  EQUB 254  \ MidTab?164
 3010  EQUB 255  \ MidTab?165
 3020  EQUB 255  \ MidTab?166
 3030  EQUB 255  \ MidTab?167
 3040  EQUB 255  \ MidTab?168
 3050  EQUB 255  \ MidTab?169
 3060  EQUB 255  \ MidTab?170
 3070  EQUB 255  \ MidTab?171
 3080  EQUB 253  \ MidTab?172
 3090  EQUB 252  \ MidTab?173
 3100  EQUB 255  \ MidTab?174
 3110  EQUB 255  \ MidTab?175
 3120  EQUB 255  \ MidTab?176
 3130  EQUB 255  \ MidTab?177
 3140  EQUB 255  \ MidTab?178
 3150  EQUB 255  \ MidTab?179
 3160  EQUB 255  \ MidTab?180
 3170  EQUB 255  \ MidTab?181
 3180  EQUB 255  \ MidTab?182
 3190  EQUB 255  \ MidTab?183
 3200  EQUB 255  \ MidTab?184
 3210  EQUB 255  \ MidTab?185
 3220  EQUB 255  \ MidTab?186
 3230  EQUB 251  \ MidTab?187
 3240  EQUB 255  \ MidTab?188
 3250  EQUB 255  \ MidTab?189
 3260  EQUB 255  \ MidTab?190
 3270  EQUB 250  \ MidTab?191
 3280  EQUB 255  \ MidTab?192
 3290  EQUB 249  \ MidTab?193
 3300  EQUB 185  \ MidTab?194
 3310  EQUB 184  \ MidTab?195
 3320  EQUB 183  \ MidTab?196
 3330  EQUB 182  \ MidTab?197
 3340  EQUB 244  \ MidTab?198
 3350  EQUB 181  \ MidTab?199
 3360  EQUB 204  \ MidTab?200
 3370  EQUB 241  \ MidTab?201
 3380  EQUB 203  \ MidTab?202
 3390  EQUB 202  \ MidTab?203
 3400  EQUB 201  \ MidTab?204
 3410  EQUB 200  \ MidTab?205
 3420  EQUB 199  \ MidTab?206
 3430  EQUB 235  \ MidTab?207
 3440  EQUB 234  \ MidTab?208
 3450  EQUB 233  \ MidTab?209
 3460  EQUB 232  \ MidTab?210
 3470  EQUB 198  \ MidTab?211
 3480  EQUB 197  \ MidTab?212
 3490  EQUB 196  \ MidTab?213
 3500  EQUB 195  \ MidTab?214
 3510  EQUB 227  \ MidTab?215
 3520  EQUB 226  \ MidTab?216
 3530  EQUB 180  \ MidTab?217
 3540  EQUB 179  \ MidTab?218
 3550  EQUB 255  \ MidTab?219
 3560  EQUB 255  \ MidTab?220
 3570  EQUB 255  \ MidTab?221
 3580  EQUB 255  \ MidTab?222
 3590  EQUB 255  \ MidTab?223
 3600  EQUB 223  \ MidTab?224
 3610  EQUB 192  \ MidTab?225
 3620  EQUB 191  \ MidTab?226
 3630  EQUB 190  \ MidTab?227
 3640  EQUB 189  \ MidTab?228
 3650  EQUB 188  \ MidTab?229
 3660  EQUB 187  \ MidTab?230
 3670  EQUB 216  \ MidTab?231
 3680  EQUB 215  \ MidTab?232
 3690  EQUB 214  \ MidTab?233
 3700  EQUB 186  \ MidTab?234
 3710  EQUB 212  \ MidTab?235
 3720  EQUB 211  \ MidTab?236
 3730  EQUB 210  \ MidTab?237
 3740  EQUB 209  \ MidTab?238
 3750  EQUB 208  \ MidTab?239
 3760  EQUB 207  \ MidTab?240
 3770  EQUB 206  \ MidTab?241
 3780  EQUB 205  \ MidTab?242
 3790  EQUB 255  \ MidTab?243
 3800  EQUB 255  \ MidTab?244
 3810  EQUB 255  \ MidTab?245
 3820  EQUB 255  \ MidTab?246
 3830  EQUB 255  \ MidTab?247
 3840  EQUB 255  \ MidTab?248
 3850  EQUB 255  \ MidTab?249
 3860  EQUB 255  \ MidTab?250
 3870  EQUB 255  \ MidTab?251
 3880  EQUB 255  \ MidTab?252
 3890  EQUB 255  \ MidTab?253
 3900  EQUB 255  \ MidTab?254
 3910  EQUB 255  \ MidTab?255
 3920.EndTab
 3930  EQUB 128
 3940  EQUB 129
 3950  EQUB 130
 3960  EQUB 131
 3970  EQUB 132
 3980  EQUB 133
 3990  EQUB 134
 4000  EQUB 135
 4010  EQUB 136
 4020  EQUB 137
 4030  EQUB 138
 4040  EQUB 139
 4050  EQUB 140
 4060  EQUB 141
 4070  EQUB 142
 4080  EQUB 143
 4090  EQUB 144
 4100  EQUB 145
 4110  EQUB 146
 4120  EQUB 147
 4130  EQUB 148
 4140  EQUB 149
 4150  EQUB 150
 4160  EQUB 151
 4170  EQUB 152
 4180  EQUB 153
 4190  EQUB 154
 4200  EQUB 155
 4210  EQUB 156
 4220  EQUB 157
 4230  EQUB 158
 4240  EQUB 159
 4250  EQUB 32  \ EndTab?160
 4260  EQUB 255  \ EndTab?161
 4270  EQUB 255  \ EndTab?162
 4280  EQUB 255  \ EndTab?163
 4290  EQUB 254  \ EndTab?164
 4300  EQUB 255  \ EndTab?165
 4310  EQUB 255  \ EndTab?166
 4320  EQUB 255  \ EndTab?167
 4330  EQUB 255  \ EndTab?168
 4340  EQUB 255  \ EndTab?169
 4350  EQUB 255  \ EndTab?170
 4360  EQUB 255  \ EndTab?171
 4370  EQUB 253  \ EndTab?172
 4380  EQUB 252  \ EndTab?173
 4390  EQUB 255  \ EndTab?174
 4400  EQUB 255  \ EndTab?175
 4410  EQUB 255  \ EndTab?176
 4420  EQUB 255  \ EndTab?177
 4430  EQUB 255  \ EndTab?178
 4440  EQUB 255  \ EndTab?179
 4450  EQUB 255  \ EndTab?180
 4460  EQUB 255  \ EndTab?181
 4470  EQUB 255  \ EndTab?182
 4480  EQUB 255  \ EndTab?183
 4490  EQUB 255  \ EndTab?184
 4500  EQUB 255  \ EndTab?185
 4510  EQUB 255  \ EndTab?186
 4520  EQUB 251  \ EndTab?187
 4530  EQUB 255  \ EndTab?188
 4540  EQUB 255  \ EndTab?189
 4550  EQUB 255  \ EndTab?190
 4560  EQUB 250  \ EndTab?191
 4570  EQUB 255  \ EndTab?192
 4580  EQUB 249  \ EndTab?193
 4590  EQUB 185  \ EndTab?194
 4600  EQUB 184  \ EndTab?195
 4610  EQUB 183  \ EndTab?196
 4620  EQUB 182  \ EndTab?197
 4630  EQUB 244  \ EndTab?198
 4640  EQUB 181  \ EndTab?199
 4650  EQUB 242  \ EndTab?200
 4660  EQUB 241  \ EndTab?201
 4670  EQUB 240  \ EndTab?202
 4680  EQUB 239  \ EndTab?203
 4690  EQUB 238  \ EndTab?204
 4700  EQUB 237  \ EndTab?205
 4710  EQUB 236  \ EndTab?206
 4720  EQUB 235  \ EndTab?207
 4730  EQUB 234  \ EndTab?208
 4740  EQUB 233  \ EndTab?209
 4750  EQUB 232  \ EndTab?210
 4760  EQUB 231  \ EndTab?211
 4770  EQUB 230  \ EndTab?212
 4780  EQUB 229  \ EndTab?213
 4790  EQUB 228  \ EndTab?214
 4800  EQUB 227  \ EndTab?215
 4810  EQUB 226  \ EndTab?216
 4820  EQUB 178  \ EndTab?217
 4830  EQUB 177  \ EndTab?218
 4840  EQUB 255  \ EndTab?219
 4850  EQUB 255  \ EndTab?220
 4860  EQUB 255  \ EndTab?221
 4870  EQUB 255  \ EndTab?222
 4880  EQUB 255  \ EndTab?223
 4890  EQUB 223  \ EndTab?224
 4900  EQUB 222  \ EndTab?225
 4910  EQUB 221  \ EndTab?226
 4920  EQUB 220  \ EndTab?227
 4930  EQUB 219  \ EndTab?228
 4940  EQUB 218  \ EndTab?229
 4950  EQUB 217  \ EndTab?230
 4960  EQUB 176  \ EndTab?231
 4970  EQUB 215  \ EndTab?232
 4980  EQUB 214  \ EndTab?233
 4990  EQUB 213  \ EndTab?234
 5000  EQUB 212  \ EndTab?235
 5010  EQUB 211  \ EndTab?236
 5020  EQUB 210  \ EndTab?237
 5030  EQUB 209  \ EndTab?238
 5040  EQUB 208  \ EndTab?239
 5050  EQUB 207  \ EndTab?240
 5060  EQUB 206  \ EndTab?241
 5070  EQUB 205  \ EndTab?242
 5080  EQUB 255  \ EndTab?243
 5090  EQUB 255  \ EndTab?244
 5100  EQUB 255  \ EndTab?245
 5110  EQUB 255  \ EndTab?246
 5120  EQUB 255  \ EndTab?247
 5130  EQUB 255  \ EndTab?248
 5140  EQUB 255  \ EndTab?249
 5150  EQUB 255  \ EndTab?250
 5160  EQUB 255  \ EndTab?251
 5170  EQUB 255  \ EndTab?252
 5180  EQUB 255  \ EndTab?253
 5190  EQUB 255  \ EndTab?254
 5200  EQUB 255  \ EndTab?255
 5210.Reverse
 5220  EQUB 128
 5230  EQUB 129
 5240  EQUB 130
 5250  EQUB 131
 5260  EQUB 132
 5270  EQUB 133
 5280  EQUB 134
 5290  EQUB 135
 5300  EQUB 136
 5310  EQUB 137
 5320  EQUB 138
 5330  EQUB 139
 5340  EQUB 140
 5350  EQUB 141
 5360  EQUB 142
 5370  EQUB 143
 5380  EQUB 144
 5390  EQUB 145
 5400  EQUB 146
 5410  EQUB 147
 5420  EQUB 148
 5430  EQUB 149
 5440  EQUB 150
 5450  EQUB 151
 5460  EQUB 152
 5470  EQUB 153
 5480  EQUB 154
 5490  EQUB 155
 5500  EQUB 156
 5510  EQUB 157
 5520  EQUB 158
 5530  EQUB 159
 5540  EQUB 255  \ Reverse?160
 5550  EQUB 255  \ Reverse?161
 5560  EQUB 255  \ Reverse?162
 5570  EQUB 255  \ Reverse?163
 5580  EQUB 255  \ Reverse?164
 5590  EQUB 255  \ Reverse?165
 5600  EQUB 255  \ Reverse?166
 5610  EQUB 255  \ Reverse?167
 5620  EQUB 255  \ Reverse?168
 5630  EQUB 255  \ Reverse?169
 5640  EQUB 255  \ Reverse?170
 5650  EQUB 255  \ Reverse?171
 5660  EQUB 255  \ Reverse?172
 5670  EQUB 255  \ Reverse?173
 5680  EQUB 255  \ Reverse?174
 5690  EQUB 255  \ Reverse?175
 5700  EQUB 231  \ Reverse?176
 5710  EQUB 218  \ Reverse?177
 5720  EQUB 217  \ Reverse?178
 5730  EQUB 218  \ Reverse?179
 5740  EQUB 217  \ Reverse?180
 5750  EQUB 199  \ Reverse?181
 5760  EQUB 197  \ Reverse?182
 5770  EQUB 196  \ Reverse?183
 5780  EQUB 195  \ Reverse?184
 5790  EQUB 194  \ Reverse?185
 5800  EQUB 234  \ Reverse?186
 5810  EQUB 230  \ Reverse?187
 5820  EQUB 229  \ Reverse?188
 5830  EQUB 228  \ Reverse?189
 5840  EQUB 227  \ Reverse?190
 5850  EQUB 226  \ Reverse?191
 5860  EQUB 225  \ Reverse?192
 5870  EQUB 218  \ Reverse?193
 5880  EQUB 217  \ Reverse?194
 5890  EQUB 214  \ Reverse?195
 5900  EQUB 213  \ Reverse?196
 5910  EQUB 212  \ Reverse?197
 5920  EQUB 211  \ Reverse?198
 5930  EQUB 206  \ Reverse?199
 5940  EQUB 205  \ Reverse?200
 5950  EQUB 204  \ Reverse?201
 5960  EQUB 203  \ Reverse?202
 5970  EQUB 202  \ Reverse?203
 5980  EQUB 200  \ Reverse?204
 5990  EQUB 242  \ Reverse?205
 6000  EQUB 241  \ Reverse?206
 6010  EQUB 240  \ Reverse?207
 6020  EQUB 239  \ Reverse?208
 6030  EQUB 238  \ Reverse?209
 6040  EQUB 237  \ Reverse?210
 6050  EQUB 236  \ Reverse?211
 6060  EQUB 235  \ Reverse?212
 6070  EQUB 234  \ Reverse?213
 6080  EQUB 233  \ Reverse?214
 6090  EQUB 232  \ Reverse?215
 6100  EQUB 231  \ Reverse?216
 6110  EQUB 230  \ Reverse?217
 6120  EQUB 229  \ Reverse?218
 6130  EQUB 228  \ Reverse?219
 6140  EQUB 227  \ Reverse?220
 6150  EQUB 226  \ Reverse?221
 6160  EQUB 225  \ Reverse?222
 6170  EQUB 224  \ Reverse?223
 6180  EQUB 218  \ Reverse?224
 6190  EQUB 217  \ Reverse?225
 6200  EQUB 216  \ Reverse?226
 6210  EQUB 215  \ Reverse?227
 6220  EQUB 214  \ Reverse?228
 6230  EQUB 213  \ Reverse?229
 6240  EQUB 212  \ Reverse?230
 6250  EQUB 211  \ Reverse?231
 6260  EQUB 210  \ Reverse?232
 6270  EQUB 209  \ Reverse?233
 6280  EQUB 208  \ Reverse?234
 6290  EQUB 207  \ Reverse?235
 6300  EQUB 206  \ Reverse?236
 6310  EQUB 205  \ Reverse?237
 6320  EQUB 204  \ Reverse?238
 6330  EQUB 203  \ Reverse?239
 6340  EQUB 202  \ Reverse?240
 6350  EQUB 201  \ Reverse?241
 6360  EQUB 200  \ Reverse?242
 6370  EQUB 199  \ Reverse?243
 6380  EQUB 198  \ Reverse?244
 6390  EQUB 197  \ Reverse?245
 6400  EQUB 196  \ Reverse?246
 6410  EQUB 195  \ Reverse?247
 6420  EQUB 194  \ Reverse?248
 6430  EQUB 193  \ Reverse?249
 6440  EQUB 191  \ Reverse?250
 6450  EQUB 187  \ Reverse?251
 6460  EQUB 173  \ Reverse?252
 6470  EQUB 172  \ Reverse?253
 6480  EQUB 164  \ Reverse?254
 6490  EQUB 161  \ Reverse?255
 6500]
 6510PROCSave("SATab")
 6520PROCSave("BegTab")
 6530PROCSave("MidTab")
 6540PROCSave("EndTab")
 6550PROCSave("Reverse")
 6560END
 6570DEFPROCSave(TabName$)
 6580OSCLI("SAVE $.Arabic.Object."+TabName$+" "+STR$~(EVAL(TabName$))+" +80")
 6590ENDPROC
