API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Aug 24th, 2019
191
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Game Maker 53.51 KB | None | 0 0
raw download clone embed print report
  1. /* Always have possible moves (AHM)! */
  2.  
  3. #region SHAPE
  4. /*
  5.  
  6. Use argument0.gemsfallen[i,j] or gemboard!
  7. We will divide the cases from minimum gapss first. Of course the single gaps can work on 2+ gapss aswell, etc.
  8.  
  9. ************ONE SPAWN***********************
  10.  
  11.      |1|
  12. --SINGLE gaps-- (dont forget the O's gapss aswell, AND THEIR LIMITS!!)
  13.  
  14.          X
  15. 0) O O Δ           00
  16.                            
  17.          Χ                      
  18. 1) Ο Δ Ο            01              
  19.                                  
  20.        Χ
  21. 2) O Δ   O         02
  22.  
  23.      X
  24. 3) Ο   Δ O            03
  25.  
  26.    x
  27. 4)   O Δ Ο            04
  28.  
  29.    Χ
  30. 5)   Δ Ο Ο           05
  31.  
  32.  
  33.      |2|
  34. --2 gapsS-- (dont forget the O's gapss aswell!)
  35.  
  36.        X
  37. 0) O O              06
  38.    Δ Δ
  39.    
  40.      Χ
  41. 1) Ο   Ο
  42.    Δ   Δ          07
  43.  
  44.    Χ
  45. 2)   Ο Ο
  46.      Δ Δ          08
  47.  
  48.  
  49.      |3|
  50. --3 gapsS-- (dont forget the O's gapss aswell!)
  51.  
  52.      Χ
  53. 0) Ο               09
  54.    Ο
  55.    Δ
  56.  
  57.    Χ
  58. 1)  Ο              10
  59.     Ο
  60.     Δ
  61.    
  62.      |4|
  63. -- MINUS 6 gapsS-- (dont forget the O's gapss aswell!)
  64.    Χ          
  65. 0)   Δ Δ          11
  66.    Δ Ο Ο
  67.  
  68.      Χ
  69. 1) Δ   Δ          12
  70.    Ο Δ Ο
  71.  
  72.        Χ
  73. 3) Δ Δ
  74.    Ο Ο Δ         13
  75.    
  76.      |5|
  77. -- MINUS 5 gapsS-- (dont forget the O's gapss aswell!)
  78.  
  79. 0) Χ      
  80.      Δ      
  81.    Δ Ο                14
  82.    Δ Ο        
  83.                
  84. 1)   Χ
  85.    Δ
  86.    Ο Δ                15
  87.    Ο Δ
  88.  
  89.    Χ
  90. 2)   Δ
  91.    Ο Δ                16
  92.    Δ Ο
  93.  
  94.      Χ
  95. 3) Δ
  96.    Δ Ο                17
  97.    Ο Δ
  98.  
  99.    Χ
  100. 4)   Ο
  101.      Δ             18
  102.    Δ Ο
  103.  
  104.      Χ
  105. 5) Ο
  106.    Δ               19
  107.    Ο Δ
  108.    
  109.      |6|
  110. -- MINUS 4 gapsS-- (dont forget the O's gapss aswell!)
  111.  
  112. 1) Χ   2) Χ           20
  113.    
  114.    Ο      Δ
  115.    Δ      Ο           21
  116.    Ο      Ο
  117.  
  118.      |7|
  119. -- CHANGING CREATIONS-- (dont forget the O's gapss aswell!)
  120.  
  121. 1) X O       2) Ο Χ       3)   Χ Ο    4)   Ο Χ            22 23 24 25
  122.        Δ Ο          Δ Ο     Ο Δ         Ο Δ
  123.    
  124.      |8|
  125. -- Cascade-- (dont forget the O's gapss aswell!)
  126.        X        X O     26  31
  127. 1) O O      5)O
  128.                         27  32
  129.      X          Ο Χ
  130. 2) Ο   Ο    6)Ο          28  33
  131.  
  132.    X          Χ Ο     29  34
  133. 3)   Ο Ο    7)    Ο
  134.  
  135. 4)X         8)Ο Χ     30  35
  136.                   Ο
  137.   Ο
  138.   Ο
  139.  
  140. ***************************CREATE MORE THAN ONE SPAWNS (Θ)**************************************
  141.       Χ Θ     Θ
  142. 1)O Δ        X
  143.             7)Δ
  144.               Ο
  145.     Χ   Θ        
  146. 2)Ο   Δ       Θ
  147.               Δ
  148.               Χ
  149.             8)
  150.   X   Θ       Ο
  151. 3)  Δ   Ο
  152.  
  153.   Χ Θ
  154. 4)    Δ Ο
  155.  
  156.   Χ     Θ
  157. 5)  Ο Δ
  158.  
  159.   Χ     Θ
  160. 6)  Δ Ο
  161. */
  162. #endregion
  163. var nextspawn = noone
  164. var newg = noone
  165. ds_list_clear(num_choices) //number of choices reset
  166.  
  167. for(i=0;i<=7;i++)
  168. {
  169.     gaps[i] = argument0.gaps[i]
  170. }
  171.  
  172. havedone = false
  173.  
  174. //--------------------1--------------------\\
  175. //0
  176.  
  177. {
  178.     if j>=3 //have space to check back
  179.     {
  180.         g1 = argument0.gemboard[gaps[j]-1,j-2]
  181.         g2 = argument0.gemboard[gaps[j]-1,j-3]
  182.         if (g1 == g2) && (g2 != -1) && (g1 != 7)
  183.         {
  184.             //with(Gem_create) set_skin(other.g1)
  185.             ds_list_add(num_choices,0)
  186.             havedone = true;
  187.         }
  188.     }
  189. }
  190.  
  191. //1
  192.  
  193. {
  194.     if j>=3 //have space to check back
  195.     {
  196.         g1 = argument0.gemboard[gaps[j]-1,j-1]
  197.         g2 = argument0.gemboard[gaps[j]-1,j-3]
  198.         if (g1 == g2) && (g2 != -1) && (g1 != 7)
  199.         {
  200.             //with(Gem_create) set_skin(other.g1)
  201.             ds_list_add(num_choices,1)
  202.             havedone = true;
  203.         }
  204.     }
  205. }
  206.  
  207. //2
  208.  
  209. {
  210.     if j>=2 && j<=6 //have space to check back
  211.     {
  212.         g1 = argument0.gemboard[gaps[j]-1,j-2]
  213.         g2 = argument0.gemboard[gaps[j]-1,j+1]
  214.         if (g1 == g2) && (g2 != -1) && (g1 != 7)
  215.         {
  216.             //with(Gem_create) set_skin(other.g1)
  217.             ds_list_add(num_choices,2)
  218.             havedone = true;
  219.         }
  220.     }
  221. }
  222.  
  223. //3
  224.  
  225. {
  226.     if j>=1 && j<=5 //have space to check back
  227.     {
  228.         g1 = argument0.gemboard[gaps[j]-1,j-1]
  229.         g2 = argument0.gemboard[gaps[j]-1,j+2]
  230.         if (g1 == g2) && (g2 != -1) && (g1 != 7)
  231.         {
  232.             //with(Gem_create) set_skin(other.g1)
  233.             ds_list_add(num_choices,3)
  234.             havedone = true;
  235.         }
  236.     }
  237. }
  238.  
  239. //4
  240.  
  241. {
  242.     if j<=4 //have space to check back
  243.     {
  244.         g1 = argument0.gemboard[gaps[j]-1,j+1]
  245.         g2 = argument0.gemboard[gaps[j]-1,j+3]
  246.         if (g1 == g2) && (g2 != -1) && (g1 != 7)
  247.         {
  248.             //with(Gem_create) set_skin(other.g1)
  249.             ds_list_add(num_choices,4)
  250.             havedone = true;
  251.         }
  252.     }
  253. }
  254.  
  255. //5
  256.  
  257. {
  258.     if j<=4 //have space to check back
  259.     {
  260.         g1 = argument0.gemboard[gaps[j]-1,j+2]
  261.         g2 = argument0.gemboard[gaps[j]-1,j+3]
  262.         if (g1 == g2) && (g2 != -1) && (g1 != 7)
  263.         {
  264.             //with(Gem_create) set_skin(other.g1)
  265.             ds_list_add(num_choices,5)
  266.             havedone = true;
  267.         }
  268.     }
  269. }
  270.  
  271. //--------------------2--------------------\\
  272.  
  273. //0
  274.  if gaps[j] >= 2 && j>=2
  275. {
  276.     g1 = argument0.gemboard[gaps[j]-2,j-1]
  277.     g2 = argument0.gemboard[gaps[j]-2,j-2]
  278.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  279.         {  
  280.             //with(Gem_create) set_skin(other.g1)
  281.             ds_list_add(num_choices,12)
  282.             havedone = true;
  283.         }
  284. }
  285.  
  286. //1
  287.  if gaps[j] >= 2 && j>=1 && j<=6
  288. {
  289.     g1 = argument0.gemboard[gaps[j]-2,j-1]
  290.     g2 = argument0.gemboard[gaps[j]-2,j+1]
  291.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  292.         {  
  293.             //with(Gem_create) set_skin(other.g1)
  294.             ds_list_add(num_choices,13)
  295.             havedone = true;
  296.         }
  297. }
  298.  
  299. //2
  300.  if gaps[j] >= 2 && j<=5
  301. {
  302.     g1 = argument0.gemboard[gaps[j]-2,j+1]
  303.     g2 = argument0.gemboard[gaps[j]-2,j+2]
  304.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  305.         {  
  306.             //with(Gem_create) set_skin(other.g1)
  307.             ds_list_add(num_choices,14)
  308.             havedone = true;
  309.         }
  310. }
  311.  
  312. //--------------------3--------------------\\
  313.  
  314. //0
  315.  if gaps[j] >= 3 && j>=1
  316. {
  317.     g1 = argument0.gemboard[gaps[j]-3,j-1]
  318.     g2 = argument0.gemboard[gaps[j]-2,j-1]
  319.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  320.         {  
  321.             //with(Gem_create) set_skin(other.g1)
  322.             ds_list_add(num_choices,15)
  323.             havedone = true;
  324.         }
  325. }
  326.  
  327. //1
  328.  if gaps[j] >= 3 && j<=6
  329. {
  330.     g1 = argument0.gemboard[gaps[j]-3,j+1]
  331.     g2 = argument0.gemboard[gaps[j]-2,j+1]
  332.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  333.         {  
  334.             //with(Gem_create) set_skin(other.g1)
  335.             ds_list_add(num_choices,16)
  336.             havedone = true;
  337.         }
  338. }
  339.  
  340. //--------------------4--------------------\\
  341.  
  342. //0
  343.  if gaps[j] <= global.board_rows-1 && j<=5
  344. {
  345.     g1 = argument0.gemboard[gaps[j],j+1]
  346.     g2 = argument0.gemboard[gaps[j],j+2]
  347.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  348.         {  
  349.             //with(Gem_create) set_skin(other.g1)
  350.             ds_list_add(num_choices,17)
  351.             havedone = true;
  352.         }
  353. }
  354.  
  355. //1
  356.  if gaps[j] <= global.board_rows-1 && j>=1 && j<=6
  357. {
  358.     g1 = argument0.gemboard[gaps[j],j-1]
  359.     g2 = argument0.gemboard[gaps[j],j+1]
  360.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  361.         {  
  362.             //with(Gem_create) set_skin(other.g1)
  363.             ds_list_add(num_choices,18)
  364.             havedone = true;
  365.         }
  366. }
  367.  
  368. //2
  369.  if gaps[j] <= global.board_rows-1 && j>=2
  370. {
  371.     g1 = argument0.gemboard[gaps[j],j-1]
  372.     g2 = argument0.gemboard[gaps[j],j-2]
  373.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  374.         {  
  375.             //with(Gem_create) set_skin(other.g1)
  376.             ds_list_add(num_choices,19)
  377.             havedone = true;
  378.         }
  379. }
  380.  
  381. //--------------------5--------------------\\
  382.  
  383. //0
  384.  if gaps[j] <= global.board_rows-2 && j<=6
  385. {
  386.     g1 = argument0.gemboard[gaps[j],j+1]
  387.     g2 = argument0.gemboard[gaps[j]+1,j+1]
  388.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  389.         {  
  390.             //with(Gem_create) set_skin(other.g1)
  391.             ds_list_add(num_choices,20)
  392.             havedone = true;
  393.         }
  394. }
  395.  
  396. //1
  397.  if gaps[j] <= global.board_rows-2 && j>=1
  398. {
  399.     g1 = argument0.gemboard[gaps[j],j-1]
  400.     g2 = argument0.gemboard[gaps[j]+1,j-1]
  401.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  402.         {  
  403.             //with(Gem_create) set_skin(other.g1)
  404.             ds_list_add(num_choices,21)
  405.             havedone = true;
  406.         }
  407. }
  408.  
  409. //2
  410.  if gaps[j] <= global.board_rows-2 && j<=6
  411. {
  412.     g1 = argument0.gemboard[gaps[j],j]
  413.     g2 = argument0.gemboard[gaps[j]+1,j+1]
  414.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  415.         {  
  416.             //with(Gem_create) set_skin(other.g1)
  417.             ds_list_add(num_choices,22)
  418.             havedone = true;
  419.         }
  420. }
  421.  
  422. //3
  423.  if gaps[j] <= global.board_rows-2 && j>=1
  424. {
  425.     g1 = argument0.gemboard[gaps[j],j]
  426.     g2 = argument0.gemboard[gaps[j]+1,j-1]
  427.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  428.         {  
  429.             //with(Gem_create) set_skin(other.g1)
  430.             ds_list_add(num_choices,23)
  431.             havedone = true;
  432.         }
  433. }
  434.  
  435. //4
  436.  if gaps[j] <= global.board_rows-1 && gaps[j] >= 2 && j<=6
  437. {
  438.     g1 = argument0.gemboard[gaps[j]-2,j+1]
  439.     g2 = argument0.gemboard[gaps[j],j+1]
  440.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  441.         {  
  442.             //with(Gem_create) set_skin(other.g1)
  443.             ds_list_add(num_choices,24)
  444.             havedone = true;
  445.         }
  446. }
  447.  
  448. //5
  449.  if gaps[j] <= global.board_rows-1 && gaps[j] >= 2 && j>=1
  450. {
  451.     g1 = argument0.gemboard[gaps[j]-2,j-1]
  452.     g2 = argument0.gemboard[gaps[j],j-1]
  453.     if (g1 == g2) && (g2 != -1) && (g1 != 7)
  454.         {  
  455.             //with(Gem_create) set_skin(other.g1)
  456.             ds_list_add(num_choices,25)
  457.             havedone = true;
  458.         }
  459. }
  460.  
  461. //--------------------6--------------------\\
  462.  
  463.  
  464.     //1
  465.      if gaps[j] <= global.board_rows-4
  466.     {      
  467.         g1 = argument0.gemboard[gaps[j],j]
  468.         g2 = argument0.gemboard[gaps[j]+2,j]
  469.         if (g1 == g2) && (g2 != -1) && (g1 != 7)
  470.             {  
  471.                 //with(Gem_create) set_skin(other.g1)
  472.                 ds_list_add(num_choices,26)
  473.                 havedone = true;
  474.             }
  475.     }
  476.    
  477.     //2
  478.      if gaps[j] <= global.board_rows-4
  479.     {      
  480.         g1 = argument0.gemboard[gaps[j]+1,j]
  481.         g2 = argument0.gemboard[gaps[j]+2,j]
  482.         if (g1 == g2) && (g2 != -1) && (g1 != 7)
  483.             {  
  484.                 //with(Gem_create) set_skin(other.g1)
  485.                 ds_list_add(num_choices,27)
  486.                 havedone = true;
  487.             }
  488.     }
  489. //--------------------7--------------------\\
  490. if j <= 4
  491. {
  492.     if (gaps[j] == gaps[j+1]) && (gaps[j] == gaps[j+3])
  493.     {
  494.         nextspawn = instance_position(Gem_create.x+64,y,argument1)
  495.         if nextspawn != noone
  496.         {
  497.             g1 = argument0.gemboard[gaps[j]-1,j+3]
  498.             if g1 != -1 && (g1 != 7)
  499.             {
  500.                 ds_list_add(num_choices,32)
  501.                 havedone = true;
  502.             }
  503.         }
  504.     }
  505. }
  506.  
  507. if (j>=1 && j<=5)
  508. {
  509.     if (gaps[j] == gaps[j-1]) && (gaps[j] == gaps[j+2])
  510.     {
  511.         nextspawn = instance_position(Gem_create.x-64,y,argument1)
  512.         if nextspawn != noone
  513.         {
  514.             g1 = argument0.gemboard[gaps[j]-1,j+2]
  515.             if g1 != -1 && (g1 != 7)
  516.             {
  517.                 ds_list_add(num_choices,33)
  518.                 havedone = true;
  519.             }
  520.         }
  521.     }
  522. }
  523.  
  524. if (j>=2 && j<=6)
  525. {
  526.     if (gaps[j] == gaps[j-2]) && (gaps[j] == gaps[j+1])
  527.     {
  528.         nextspawn = instance_position(Gem_create.x+64,y,argument1)
  529.         if nextspawn != noone
  530.         {
  531.             g1 = argument0.gemboard[gaps[j]-1,j-2]
  532.             if g1 != -1 && (g1 != 7)
  533.             {
  534.             ds_list_add(num_choices,34)
  535.             havedone = true;
  536.             }
  537.         }
  538.     }
  539. }
  540.  
  541. if (j>=3)
  542. {
  543.     if (gaps[j] == gaps[j-3]) && (gaps[j] == gaps[j-1])
  544.     {
  545.         nextspawn = instance_position(Gem_create.x-64,y,argument1)
  546.         if nextspawn != noone
  547.         {
  548.             g1 = argument0.gemboard[gaps[j]-1,j-3]
  549.             if g1 != -1 && (g1 != 7)
  550.             {
  551.             ds_list_add(num_choices,35)
  552.             havedone = true;
  553.             }
  554.         }
  555.     }
  556. }
  557.    
  558. //--------------------8--------------------\\
  559. if !havedone
  560. {
  561.     //1
  562.      if j >= 2
  563.     {      
  564.         g1 = argument0.gemboard[gaps[j]-1,j-1]
  565.         g2 = argument0.gemboard[gaps[j]-1,j-2]
  566.         if (g1 == g2) && (g2 != -1) && (g1 != 7)
  567.             {  
  568.                 //with(Gem_create) set_skin(other.g1)
  569.                 ds_list_add(num_choices,28)
  570.                 havedone = true;
  571.             }
  572.     }
  573.    
  574.     //2
  575.      if j >= 1 && j <= 6
  576.     {      
  577.         g1 = argument0.gemboard[gaps[j]-1,j-1]
  578.         g2 = argument0.gemboard[gaps[j]-1,j+1]
  579.         if (g1 == g2) && (g2 != -1) && (g1 != 7)
  580.             {  
  581.                 //with(Gem_create) set_skin(other.g1)
  582.                 ds_list_add(num_choices,29)
  583.                 havedone = true;
  584.             }
  585.     }
  586.    
  587.     //3
  588.      if j <= 5
  589.     {      
  590.         g1 = argument0.gemboard[gaps[j]-1,j+2]
  591.         g2 = argument0.gemboard[gaps[j]-1,j+1]
  592.         if (g1 == g2) && (g2 != -1) && (g1 != 7)
  593.             {  
  594.                 //with(Gem_create) set_skin(other.g1)
  595.                 ds_list_add(num_choices,30)
  596.                 havedone = true;
  597.             }
  598.     }
  599.    
  600.     //4
  601.      if gaps[j] <= global.board_rows-2
  602.     {      
  603.         g1 = argument0.gemboard[gaps[j],j]
  604.         g2 = argument0.gemboard[gaps[j]+1,j]
  605.         if (g1 == g2) && (g2 != -1) && (g1 != 7)
  606.             {  
  607.                 //with(Gem_create) set_skin(other.g1)
  608.                 ds_list_add(num_choices,31)
  609.                 havedone = true;
  610.             }
  611.     }
  612.    
  613.     //5
  614.     if j >= 1
  615.     {
  616.         nextspawn = instance_position(Gem_create.x+64,y,argument1)
  617.         if nextspawn != noone
  618.         {
  619.             g1 = argument0.gemboard[gaps[j]-1,j-1]
  620.             if (g1 != -1) && (gaps[j+1] == gaps[j]) && (g1 != 7)
  621.             {
  622.                 ds_list_add(num_choices,36)
  623.                 havedone = true;
  624.             }
  625.         }
  626.     }
  627.    
  628.     //6
  629.     if j >= 2
  630.     {
  631.         nextspawn = instance_position(Gem_create.x-64,y,argument1)
  632.         if nextspawn != noone
  633.         {
  634.             g1 = argument0.gemboard[gaps[j]-1,j-2]
  635.             if (g1 != -1) && (gaps[j-1] == gaps[j]) && (g1 != 7)
  636.             {
  637.                 ds_list_add(num_choices,37)
  638.                 havedone = true;
  639.             }
  640.         }
  641.     }
  642.    
  643.     //7
  644.     if j <= 5
  645.     {
  646.         nextspawn = instance_position(Gem_create.x+64,y,argument1)
  647.         if nextspawn != noone
  648.         {
  649.             g1 = argument0.gemboard[gaps[j]-1,j+2]
  650.             if (g1 != -1) && (gaps[j+1] == gaps[j]) && (g1 != 7)
  651.             {
  652.                 ds_list_add(num_choices,38)
  653.                 havedone = true;
  654.             }
  655.         }
  656.     }
  657.    
  658.     //8
  659.     if j <= 6
  660.     {
  661.         nextspawn = instance_position(Gem_create.x-64,y,argument1)
  662.         if nextspawn != noone
  663.         {
  664.             g1 = argument0.gemboard[gaps[j]-1,j+1]
  665.             if (g1 != -1) && (gaps[j-1] == gaps[j]) && (g1 != 7)
  666.             {
  667.                 ds_list_add(num_choices,39)
  668.                 havedone = true;
  669.             }
  670.         }
  671.     }
  672. }
  673.  
  674.  
  675. /*--------------------9------------------------*/
  676. //1
  677. {
  678.     if j>=2 && j<=6 //have space to check back
  679.     {
  680.         if gaps[j] == gaps[j+1]
  681.         {
  682.             g1 = argument0.gemboard[gaps[j]-1,j-2]
  683.             if (g1 != -1) && (g1 != 7) && instance_position(Gem_create.x + 64,Gem_create.y,argument1) = noone
  684.             {
  685.                 //with(Gem_create) set_skin(other.g1)
  686.                 //newg = instance_create(Gem_create.x + 64, Gem_create.y,argument1)
  687.                 //with(newg) {set_skin(other.g1); acc = other.Gem_create.acc}
  688.                 ds_list_add(num_choices,40)
  689.                 havedone = true;
  690.             }
  691.         }
  692.     }
  693. }
  694.  
  695. //2
  696.  
  697. {
  698.     if j>=1 && j<=5 //have space to check back
  699.     {
  700.         if gaps[j] == gaps[j+2]
  701.         {
  702.             g1 = argument0.gemboard[gaps[j]-1,j-1]
  703.             if (g1 != -1) && (g1 != 7) && instance_position(Gem_create.x + 128,Gem_create.y,argument1) = noone
  704.             {
  705.                 //with(Gem_create) set_skin(other.g1)
  706.                 //newg = instance_create(Gem_create.x + 128, Gem_create.y,argument1)
  707.                 //with(newg) {set_skin(other.g1); acc = other.Gem_create.acc}
  708.                 ds_list_add(num_choices,41)
  709.                 havedone = true;
  710.             }
  711.         }
  712.     }
  713. }
  714.  
  715. //3
  716.  
  717. {
  718.     if j<=4 //have space to check back
  719.     {
  720.         if gaps[j] == gaps[j+2]
  721.         {
  722.             g1 = argument0.gemboard[gaps[j]-1,j+3]
  723.             if (g1 != -1) && (g1 != 7) && instance_position(Gem_create.x + 128,Gem_create.y,argument1) = noone
  724.             {
  725.                 //with(Gem_create) set_skin(other.g1)
  726.                 //newg = instance_create(Gem_create.x + 128, Gem_create.y,argument1)
  727.                 //with(newg) {set_skin(other.g1); acc = other.Gem_create.acc}
  728.                 ds_list_add(num_choices,42)
  729.                 havedone = true;
  730.             }
  731.         }
  732.     }
  733. }
  734.  
  735. //4
  736.  
  737. {
  738.     if j<=4 //have space to check back
  739.     {
  740.         if gaps[j] == gaps[j+1]
  741.         {
  742.             g1 = argument0.gemboard[gaps[j]-1,j+3]
  743.             if (g1 != -1) && (g1 != 7) && instance_position(Gem_create.x + 64,Gem_create.y,argument1) = noone
  744.             {
  745.                 //with(Gem_create) set_skin(other.g1)
  746.                 //newg = instance_create(Gem_create.x + 64, Gem_create.y,argument1)
  747.                 //with(newg) {set_skin(other.g1); acc = other.Gem_create.acc}
  748.                 ds_list_add(num_choices,43)
  749.                 havedone = true;
  750.             }
  751.         }
  752.     }
  753. }
  754.  
  755. //5
  756.  
  757. {
  758.     if j<=4 //have space to check back
  759.     {
  760.         if gaps[j] == gaps[j+3]
  761.         {
  762.             g1 = argument0.gemboard[gaps[j]-1,j+1]
  763.             if (g1 != -1) && (g1 != 7) && instance_position(Gem_create.x + 64*3,Gem_create.y,argument1) = noone
  764.             {
  765.                 //with(Gem_create) set_skin(other.g1)
  766.                 //newg = instance_create(Gem_create.x + 64*3, Gem_create.y,argument1)
  767.                 //with(newg) {set_skin(other.g1); acc = other.Gem_create.acc}
  768.                 ds_list_add(num_choices,44)
  769.                 havedone = true;
  770.             }
  771.         }
  772.     }
  773. }
  774.  
  775. //6
  776.  
  777. {
  778.     if j<=4 //have space to check back
  779.     {
  780.         if gaps[j] == gaps[j+3]
  781.         {
  782.             g1 = argument0.gemboard[gaps[j]-1,j+2]
  783.             if (g1 != -1) && (g1 != 7) && instance_position(Gem_create.x + 64*3,Gem_create.y,argument1) = noone
  784.             {
  785.                 //with(Gem_create) set_skin(other.g1)
  786.                 //newg = instance_create(Gem_create.x + 64*3, Gem_create.y,argument1)
  787.                 //with(newg) {set_skin(other.g1); acc = other.Gem_create.acc}
  788.                 ds_list_add(num_choices,45)
  789.                 havedone = true;
  790.             }
  791.         }
  792.     }
  793. }
  794.  
  795. //7
  796.  
  797. {
  798.     if gaps[j] >= 2 && gaps[j] <= global.board_rows - 3 //have space to check back
  799.     {
  800.         g1 = argument0.gemboard[gaps[j]+1,j]
  801.         if (g1 != -1) && (g1 != 7)
  802.         {
  803.             //with(Gem_create) set_skin(other.g1)
  804.             //newg = instance_create(Gem_create.x + 64*3, Gem_create.y,argument1)
  805.             //with(newg) {set_skin(other.g1); acc = other.Gem_create.acc}
  806.             ds_list_add(num_choices,46)
  807.             havedone = true;
  808.         }
  809.     }
  810. }
  811.  
  812. //8
  813. {
  814.     if gaps[j] >= 3 && gaps[j] <= global.board_rows - 2 //have space to check back
  815.     {
  816.         g1 = argument0.gemboard[gaps[j],j]
  817.         if (g1 != -1) && (g1 != 7)
  818.         {
  819.             //with(Gem_create) set_skin(other.g1)
  820.             //newg = instance_create(Gem_create.x + 64*3, Gem_create.y,argument1)
  821.             //with(newg) {set_skin(other.g1); acc = other.Gem_create.acc}
  822.             ds_list_add(num_choices,47)
  823.             havedone = true;
  824.         }
  825.     }
  826. }
  827. //Now make a random selection
  828. if !ds_list_empty(num_choices)
  829. {
  830.     var sel = irandom(ds_list_size(num_choices)-1)
  831.     showme = "case " + string(num_choices[|sel]) + " from col" + string(j) +"\nchoices: " + string(ds_list_size(num_choices))
  832.     if Gamerule_1.debug show_debug_message(showme)
  833.     switch num_choices[|sel]
  834.     {
  835.         case 0:
  836.             g1 = argument0.gemboard[gaps[j]-1,j-2]
  837.             with(Gem_create) set_skin(other.g1)
  838.             #region online
  839.             if global.online
  840.             {
  841.                 with(global.mynet)
  842.                 {
  843.                     buffer_seek(buffer,buffer_seek_start,0)
  844.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  845.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  846.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  847.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  848.                 }
  849.             }
  850.             #endregion
  851.             break;
  852.         case 1:
  853.             g1 = argument0.gemboard[gaps[j]-1,j-1]
  854.             with(Gem_create) set_skin(other.g1)
  855.             #region online
  856.             if global.online
  857.             {
  858.                 with(global.mynet)
  859.                 {
  860.                     buffer_seek(buffer,buffer_seek_start,0)
  861.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  862.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  863.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  864.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  865.                 }
  866.             }
  867.             #endregion
  868.             break;
  869.         case 2:
  870.             g1 = argument0.gemboard[gaps[j]-1,j-2]
  871.             with(Gem_create) set_skin(other.g1)
  872.             #region online
  873.             if global.online
  874.             {
  875.                 with(global.mynet)
  876.                 {
  877.                     buffer_seek(buffer,buffer_seek_start,0)
  878.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  879.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  880.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  881.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  882.                 }
  883.             }
  884.             #endregion
  885.             break;
  886.         case 3:
  887.             g1 = argument0.gemboard[gaps[j]-1,j-1]
  888.             with(Gem_create) set_skin(other.g1)
  889.             #region online
  890.             if global.online
  891.             {
  892.                 with(global.mynet)
  893.                 {
  894.                     buffer_seek(buffer,buffer_seek_start,0)
  895.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  896.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  897.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  898.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  899.                 }
  900.             }
  901.             #endregion
  902.             break;
  903.         case 4:
  904.             g1 = argument0.gemboard[gaps[j]-1,j+1]
  905.             with(Gem_create) set_skin(other.g1)
  906.             #region online
  907.             if global.online
  908.             {
  909.                 with(global.mynet)
  910.                 {
  911.                     buffer_seek(buffer,buffer_seek_start,0)
  912.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  913.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  914.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  915.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  916.                 }
  917.             }
  918.             #endregion
  919.             break;
  920.         case 5:
  921.             g1 = argument0.gemboard[gaps[j]-1,j+2]
  922.             with(Gem_create) set_skin(other.g1)
  923.             #region online
  924.             if global.online
  925.             {
  926.                 with(global.mynet)
  927.                 {
  928.                     buffer_seek(buffer,buffer_seek_start,0)
  929.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  930.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  931.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  932.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  933.                 }
  934.             }
  935.             #endregion
  936.             break;
  937.         case 6:
  938.             g1 = argument0.gemboard[gaps[j]-1,j-2]
  939.             with(Gem_create) set_skin(other.g1)
  940.             newg = instance_create(Gem_create.x + 64, Gem_create.y,argument1)
  941.             with(newg) {scr_add_gemid(Gamerule_1);set_skin(other.g1); acc = other.Gem_create.acc}
  942.             //REPLAY SETTINGS REFESH\\
  943.             replay_script(j+1, newg,true)
  944.             //--------------------\\
  945.             #region online
  946.             if global.online
  947.             {
  948.                 with(global.mynet)
  949.                 {
  950.                     buffer_seek(buffer,buffer_seek_start,0)
  951.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  952.                     buffer_write(buffer,buffer_s8,newg._i)
  953.                     buffer_write(buffer,buffer_u8,newg._j)
  954.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  955.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  956.                 }
  957.                 with(global.mynet)
  958.                 {
  959.                     buffer_seek(buffer,buffer_seek_start,0)
  960.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  961.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  962.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  963.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  964.                 }
  965.             }
  966.             #endregion
  967.             break;
  968.         case 7:
  969.             g1 = argument0.gemboard[gaps[j]-1,j-1]
  970.             with(Gem_create) set_skin(other.g1)
  971.             newg = instance_create(Gem_create.x + 128, Gem_create.y,argument1)
  972.             with(newg) {scr_add_gemid(Gamerule_1);set_skin(other.g1); acc = other.Gem_create.acc}
  973.             //REPLAY SETTINGS REFESH\\
  974.             replay_script(j+2, newg,true)
  975.             //--------------------\\
  976.             #region online
  977.             if global.online
  978.             {
  979.                 with(global.mynet)
  980.                 {
  981.                     buffer_seek(buffer,buffer_seek_start,0)
  982.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  983.                     buffer_write(buffer,buffer_s8,newg._i)
  984.                     buffer_write(buffer,buffer_u8,newg._j)
  985.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  986.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  987.                 }
  988.                 with(global.mynet)
  989.                 {
  990.                     buffer_seek(buffer,buffer_seek_start,0)
  991.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  992.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  993.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  994.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  995.                 }
  996.             }
  997.             #endregion
  998.             break;
  999.         case 8:
  1000.             g1 = argument0.gemboard[gaps[j]-1,j+3]
  1001.             with(Gem_create) set_skin(other.g1)
  1002.             newg = instance_create(Gem_create.x + 128, Gem_create.y,argument1)
  1003.             with(newg) {scr_add_gemid(Gamerule_1);set_skin(other.g1); acc = other.Gem_create.acc}
  1004.             //REPLAY SETTINGS REFESH\\
  1005.             replay_script(j+2, newg,true)
  1006.             //--------------------\\
  1007.             #region online
  1008.             if global.online
  1009.             {
  1010.                 with(global.mynet)
  1011.                 {
  1012.                     buffer_seek(buffer,buffer_seek_start,0)
  1013.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  1014.                     buffer_write(buffer,buffer_s8,newg._i)
  1015.                     buffer_write(buffer,buffer_u8,newg._j)
  1016.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  1017.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1018.                 }
  1019.                 with(global.mynet)
  1020.                 {
  1021.                     buffer_seek(buffer,buffer_seek_start,0)
  1022.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1023.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1024.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1025.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1026.                 }
  1027.             }
  1028.             #endregion
  1029.             break;
  1030.         case 9:
  1031.             g1 = argument0.gemboard[gaps[j]-1,j+3]
  1032.             with(Gem_create) set_skin(other.g1)
  1033.             newg = instance_create(Gem_create.x + 64, Gem_create.y,argument1)
  1034.             with(newg) {scr_add_gemid(Gamerule_1);set_skin(other.g1); acc = other.Gem_create.acc}
  1035.             //REPLAY SETTINGS REFESH\\
  1036.             replay_script(j+1, newg,true)
  1037.             //--------------------\\
  1038.             #region online
  1039.             if global.online
  1040.             {
  1041.                 with(global.mynet)
  1042.                 {
  1043.                     buffer_seek(buffer,buffer_seek_start,0)
  1044.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  1045.                     buffer_write(buffer,buffer_s8,newg._i)
  1046.                     buffer_write(buffer,buffer_u8,newg._j)
  1047.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  1048.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1049.                 }
  1050.                 with(global.mynet)
  1051.                 {
  1052.                     buffer_seek(buffer,buffer_seek_start,0)
  1053.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1054.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1055.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1056.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1057.                 }
  1058.             }
  1059.             #endregion
  1060.             break;
  1061.         case 10:
  1062.             g1 = argument0.gemboard[gaps[j]-1,j+1]
  1063.             with(Gem_create) set_skin(other.g1)
  1064.             newg = instance_create(Gem_create.x + 64*3, Gem_create.y,argument1)
  1065.             with(newg) {scr_add_gemid(Gamerule_1);set_skin(other.g1); acc = other.Gem_create.acc}
  1066.             //REPLAY SETTINGS REFESH\\
  1067.             replay_script(j+3, newg,true)
  1068.             //--------------------\\
  1069.             #region online
  1070.             if global.online
  1071.             {
  1072.                 with(global.mynet)
  1073.                 {
  1074.                     buffer_seek(buffer,buffer_seek_start,0)
  1075.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  1076.                     buffer_write(buffer,buffer_s8,newg._i)
  1077.                     buffer_write(buffer,buffer_u8,newg._j)
  1078.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  1079.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1080.                 }
  1081.                 with(global.mynet)
  1082.                 {
  1083.                     buffer_seek(buffer,buffer_seek_start,0)
  1084.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1085.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1086.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1087.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1088.                 }
  1089.             }
  1090.             #endregion
  1091.             break;
  1092.         case 11:
  1093.             g1 = argument0.gemboard[gaps[j]-1,j+2]
  1094.             with(Gem_create) set_skin(other.g1)
  1095.             newg = instance_create(Gem_create.x + 64*3, Gem_create.y,argument1)
  1096.             with(newg) {scr_add_gemid(Gamerule_1);set_skin(other.g1); acc = other.Gem_create.acc}
  1097.             //REPLAY SETTINGS REFESH\\
  1098.             replay_script(j+3, newg,true)
  1099.             //--------------------\\
  1100.             #region online
  1101.             if global.online
  1102.             {
  1103.                 with(global.mynet)
  1104.                 {
  1105.                     buffer_seek(buffer,buffer_seek_start,0)
  1106.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  1107.                     buffer_write(buffer,buffer_s8,newg._i)
  1108.                     buffer_write(buffer,buffer_u8,newg._j)
  1109.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  1110.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1111.                 }
  1112.                 with(global.mynet)
  1113.                 {
  1114.                     buffer_seek(buffer,buffer_seek_start,0)
  1115.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1116.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1117.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1118.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1119.                 }
  1120.             }
  1121.             #endregion
  1122.             break;
  1123.         case 12:
  1124.             g1 = argument0.gemboard[gaps[j]-2,j-1]
  1125.             with(Gem_create) set_skin(other.g1)
  1126.             #region online
  1127.             if global.online
  1128.             {
  1129.                 with(global.mynet)
  1130.                 {
  1131.                     buffer_seek(buffer,buffer_seek_start,0)
  1132.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1133.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1134.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1135.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1136.                 }
  1137.             }
  1138.             #endregion
  1139.             break;
  1140.         case 13:
  1141.             g1 = argument0.gemboard[gaps[j]-2,j-1]
  1142.             with(Gem_create) set_skin(other.g1)
  1143.             #region online
  1144.             if global.online
  1145.             {
  1146.                 with(global.mynet)
  1147.                 {
  1148.                     buffer_seek(buffer,buffer_seek_start,0)
  1149.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1150.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1151.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1152.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1153.                 }
  1154.             }
  1155.             #endregion
  1156.             break;
  1157.         case 14:
  1158.             g1 = argument0.gemboard[gaps[j]-2,j+1]
  1159.             with(Gem_create) set_skin(other.g1)
  1160.             #region online
  1161.             if global.online
  1162.             {
  1163.                 with(global.mynet)
  1164.                 {
  1165.                     buffer_seek(buffer,buffer_seek_start,0)
  1166.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1167.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1168.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1169.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1170.                 }
  1171.             }
  1172.             #endregion
  1173.             break;
  1174.         case 15:
  1175.             g1 = argument0.gemboard[gaps[j]-3,j-1]
  1176.             with(Gem_create) set_skin(other.g1)
  1177.             #region online
  1178.             if global.online
  1179.             {
  1180.                 with(global.mynet)
  1181.                 {
  1182.                     buffer_seek(buffer,buffer_seek_start,0)
  1183.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1184.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1185.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1186.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1187.                 }
  1188.             }
  1189.             #endregion
  1190.             break;
  1191.         case 16:
  1192.             g1 = argument0.gemboard[gaps[j]-3,j+1]
  1193.             with(Gem_create) set_skin(other.g1)
  1194.             #region online
  1195.             if global.online
  1196.             {
  1197.                 with(global.mynet)
  1198.                 {
  1199.                     buffer_seek(buffer,buffer_seek_start,0)
  1200.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1201.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1202.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1203.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1204.                 }
  1205.             }
  1206.             #endregion
  1207.             break;
  1208.         case 17:
  1209.             g1 = argument0.gemboard[gaps[j],j+1]
  1210.             with(Gem_create) set_skin(other.g1)
  1211.             #region online
  1212.             if global.online
  1213.             {
  1214.                 with(global.mynet)
  1215.                 {
  1216.                     buffer_seek(buffer,buffer_seek_start,0)
  1217.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1218.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1219.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1220.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1221.                 }
  1222.             }
  1223.             #endregion
  1224.             break;
  1225.         case 18:
  1226.             g1 = argument0.gemboard[gaps[j],j-1]
  1227.             with(Gem_create) set_skin(other.g1)
  1228.             #region online
  1229.             if global.online
  1230.             {
  1231.                 with(global.mynet)
  1232.                 {
  1233.                     buffer_seek(buffer,buffer_seek_start,0)
  1234.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1235.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1236.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1237.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1238.                 }
  1239.             }
  1240.             #endregion
  1241.             break;
  1242.         case 19:
  1243.             g1 = argument0.gemboard[gaps[j],j-1]
  1244.             with(Gem_create) set_skin(other.g1)
  1245.             #region online
  1246.             if global.online
  1247.             {
  1248.                 with(global.mynet)
  1249.                 {
  1250.                     buffer_seek(buffer,buffer_seek_start,0)
  1251.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1252.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1253.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1254.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1255.                 }
  1256.             }
  1257.             #endregion
  1258.             break;
  1259.         case 20:
  1260.             g1 = argument0.gemboard[gaps[j],j+1]
  1261.             with(Gem_create) set_skin(other.g1)
  1262.             #region online
  1263.             if global.online
  1264.             {
  1265.                 with(global.mynet)
  1266.                 {
  1267.                     buffer_seek(buffer,buffer_seek_start,0)
  1268.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1269.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1270.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1271.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1272.                 }
  1273.             }
  1274.             #endregion
  1275.             break;
  1276.         case 21:
  1277.             g1 = argument0.gemboard[gaps[j],j-1]
  1278.             with(Gem_create) set_skin(other.g1)
  1279.             #region online
  1280.             if global.online
  1281.             {
  1282.                 with(global.mynet)
  1283.                 {
  1284.                     buffer_seek(buffer,buffer_seek_start,0)
  1285.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1286.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1287.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1288.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1289.                 }
  1290.             }
  1291.             #endregion
  1292.             break; 
  1293.         case 22:
  1294.             g1 = argument0.gemboard[gaps[j],j]
  1295.             with(Gem_create) set_skin(other.g1)
  1296.             #region online
  1297.             if global.online
  1298.             {
  1299.                 with(global.mynet)
  1300.                 {
  1301.                     buffer_seek(buffer,buffer_seek_start,0)
  1302.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1303.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1304.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1305.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1306.                 }
  1307.             }
  1308.             #endregion
  1309.             break;
  1310.         case 23:
  1311.             g1 = argument0.gemboard[gaps[j],j]
  1312.             with(Gem_create) set_skin(other.g1)
  1313.             #region online
  1314.             if global.online
  1315.             {
  1316.                 with(global.mynet)
  1317.                 {
  1318.                     buffer_seek(buffer,buffer_seek_start,0)
  1319.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1320.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1321.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1322.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1323.                 }
  1324.             }
  1325.             #endregion
  1326.             break;
  1327.         case 24:
  1328.             g1 = argument0.gemboard[gaps[j]-2,j+1]
  1329.             with(Gem_create) set_skin(other.g1)
  1330.             #region online
  1331.             if global.online
  1332.             {
  1333.                 with(global.mynet)
  1334.                 {
  1335.                     buffer_seek(buffer,buffer_seek_start,0)
  1336.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1337.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1338.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1339.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1340.                 }
  1341.             }
  1342.             #endregion
  1343.             break;
  1344.         case 25:
  1345.             g1 = argument0.gemboard[gaps[j]-2,j-1]
  1346.             with(Gem_create) set_skin(other.g1)
  1347.             #region online
  1348.             if global.online
  1349.             {
  1350.                 with(global.mynet)
  1351.                 {
  1352.                     buffer_seek(buffer,buffer_seek_start,0)
  1353.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1354.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1355.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1356.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1357.                 }
  1358.             }
  1359.             #endregion
  1360.             break;
  1361.         case 26:
  1362.             g1 = argument0.gemboard[gaps[j],j]
  1363.             with(Gem_create) set_skin(other.g1)
  1364.             #region online
  1365.             if global.online
  1366.             {
  1367.                 with(global.mynet)
  1368.                 {
  1369.                     buffer_seek(buffer,buffer_seek_start,0)
  1370.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1371.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1372.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1373.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1374.                 }
  1375.             }
  1376.             #endregion
  1377.             break;
  1378.         case 27:
  1379.             g1 = argument0.gemboard[gaps[j]+1,j]
  1380.             with(Gem_create) set_skin(other.g1)
  1381.             #region online
  1382.             if global.online
  1383.             {
  1384.                 with(global.mynet)
  1385.                 {
  1386.                     buffer_seek(buffer,buffer_seek_start,0)
  1387.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1388.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1389.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1390.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1391.                 }
  1392.             }
  1393.             #endregion
  1394.             break;
  1395.         case 28:
  1396.             g1 = argument0.gemboard[gaps[j]-1,j-1]
  1397.             with(Gem_create) set_skin(other.g1)
  1398.             #region online
  1399.             if global.online
  1400.             {
  1401.                 with(global.mynet)
  1402.                 {
  1403.                     buffer_seek(buffer,buffer_seek_start,0)
  1404.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1405.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1406.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1407.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1408.                 }
  1409.             }
  1410.             #endregion
  1411.             break;
  1412.         case 29:
  1413.             g1 = argument0.gemboard[gaps[j]-1,j-1]
  1414.             with(Gem_create) set_skin(other.g1)
  1415.             #region online
  1416.             if global.online
  1417.             {
  1418.                 with(global.mynet)
  1419.                 {
  1420.                     buffer_seek(buffer,buffer_seek_start,0)
  1421.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1422.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1423.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1424.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1425.                 }
  1426.             }
  1427.             #endregion
  1428.             break;
  1429.         case 30:
  1430.             g1 = argument0.gemboard[gaps[j]-1,j+2]
  1431.             with(Gem_create) set_skin(other.g1)
  1432.             #region online
  1433.             if global.online
  1434.             {
  1435.                 with(global.mynet)
  1436.                 {
  1437.                     buffer_seek(buffer,buffer_seek_start,0)
  1438.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1439.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1440.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1441.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1442.                 }
  1443.             }
  1444.             #endregion
  1445.             break;
  1446.         case 31:
  1447.             g1 = argument0.gemboard[gaps[j],j]
  1448.             with(Gem_create) set_skin(other.g1)
  1449.             #region online
  1450.             if global.online
  1451.             {
  1452.                 with(global.mynet)
  1453.                 {
  1454.                     buffer_seek(buffer,buffer_seek_start,0)
  1455.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1456.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1457.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1458.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1459.                 }
  1460.             }
  1461.             #endregion
  1462.             break;
  1463.         case 32:
  1464.             g1 = argument0.gemboard[gaps[j]-1,j+3]
  1465.             nextspawn = instance_position(Gem_create.x+64,y,argument1)
  1466.             with(Gem_create) set_skin(other.g1)
  1467.             with(nextspawn) set_skin(other.g1)
  1468.             //REPLAY SETTINGS REFESH\\
  1469.             replay_script(j+1, nextspawn,false)
  1470.             //--------------------\\
  1471.             #region online
  1472.             if global.online
  1473.             {
  1474.                 with(global.mynet)
  1475.                 {
  1476.                     buffer_seek(buffer,buffer_seek_start,0)
  1477.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1478.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1479.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1480.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1481.                 }
  1482.                 with(global.mynet)
  1483.                 {
  1484.                     buffer_seek(buffer,buffer_seek_start,0)
  1485.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1486.                     buffer_write(buffer,buffer_u8,nextspawn.myid)
  1487.                     buffer_write(buffer,buffer_u8,nextspawn.skinnum)
  1488.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1489.                 }
  1490.             }
  1491.             #endregion
  1492.             break;
  1493.         case 33:
  1494.             g1 = argument0.gemboard[gaps[j]-1,j+2]
  1495.             nextspawn = instance_position(Gem_create.x-64,y,argument1)
  1496.             with(Gem_create) set_skin(other.g1)
  1497.             with(nextspawn) set_skin(other.g1)
  1498.             //REPLAY SETTINGS REFESH\\
  1499.             replay_script(j-1, nextspawn,false)
  1500.             //--------------------\\
  1501.             #region online
  1502.             if global.online
  1503.             {
  1504.                 with(global.mynet)
  1505.                 {
  1506.                     buffer_seek(buffer,buffer_seek_start,0)
  1507.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1508.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1509.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1510.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1511.                 }
  1512.                 with(global.mynet)
  1513.                 {
  1514.                     buffer_seek(buffer,buffer_seek_start,0)
  1515.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1516.                     buffer_write(buffer,buffer_u8,nextspawn.myid)
  1517.                     buffer_write(buffer,buffer_u8,nextspawn.skinnum)
  1518.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1519.                 }
  1520.             }
  1521.             #endregion
  1522.             break;
  1523.         case 34:
  1524.             g1 = argument0.gemboard[gaps[j]-1,j-2]
  1525.             nextspawn = instance_position(Gem_create.x+64,y,argument1)
  1526.             with(Gem_create) set_skin(other.g1)
  1527.             with(nextspawn) set_skin(other.g1)
  1528.             //REPLAY SETTINGS REFESH\\
  1529.             replay_script(j+1, nextspawn,false)
  1530.             //--------------------\\
  1531.             #region online
  1532.             if global.online
  1533.             {
  1534.                 with(global.mynet)
  1535.                 {
  1536.                     buffer_seek(buffer,buffer_seek_start,0)
  1537.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1538.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1539.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1540.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1541.                 }
  1542.                 with(global.mynet)
  1543.                 {
  1544.                     buffer_seek(buffer,buffer_seek_start,0)
  1545.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1546.                     buffer_write(buffer,buffer_u8,nextspawn.myid)
  1547.                     buffer_write(buffer,buffer_u8,nextspawn.skinnum)
  1548.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1549.                 }
  1550.             }
  1551.             #endregion
  1552.             break;
  1553.         case 35:
  1554.             g1 = argument0.gemboard[gaps[j]-1,j-3]
  1555.             nextspawn = instance_position(Gem_create.x-64,y,argument1)
  1556.             with(Gem_create) set_skin(other.g1)
  1557.             with(nextspawn) set_skin(other.g1)
  1558.             //REPLAY SETTINGS REFESH\\
  1559.             replay_script(j-1, nextspawn,false)
  1560.             //--------------------\\
  1561.             #region online
  1562.             if global.online
  1563.             {
  1564.                 with(global.mynet)
  1565.                 {
  1566.                     buffer_seek(buffer,buffer_seek_start,0)
  1567.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1568.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1569.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1570.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1571.                 }
  1572.                 with(global.mynet)
  1573.                 {
  1574.                     buffer_seek(buffer,buffer_seek_start,0)
  1575.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1576.                     buffer_write(buffer,buffer_u8,nextspawn.myid)
  1577.                     buffer_write(buffer,buffer_u8,nextspawn.skinnum)
  1578.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1579.                 }
  1580.             }
  1581.             #endregion
  1582.             break;
  1583.         case 36:
  1584.             g1 = argument0.gemboard[gaps[j]-1,j-1]
  1585.             nextspawn = instance_position(Gem_create.x+64,y,argument1)
  1586.             with(Gem_create) set_skin(other.g1)
  1587.             with(nextspawn) set_skin(other.g1)
  1588.             //REPLAY SETTINGS REFESH\\
  1589.             replay_script(j+1, nextspawn,false)
  1590.             //--------------------\\
  1591.             #region online
  1592.             if global.online
  1593.             {
  1594.                 with(global.mynet)
  1595.                 {
  1596.                     buffer_seek(buffer,buffer_seek_start,0)
  1597.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1598.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1599.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1600.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1601.                 }
  1602.                 with(global.mynet)
  1603.                 {
  1604.                     buffer_seek(buffer,buffer_seek_start,0)
  1605.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1606.                     buffer_write(buffer,buffer_u8,nextspawn.myid)
  1607.                     buffer_write(buffer,buffer_u8,nextspawn.skinnum)
  1608.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1609.                 }
  1610.             }
  1611.             #endregion
  1612.             break;
  1613.         case 37:
  1614.             g1 = argument0.gemboard[gaps[j]-1,j-2]
  1615.             nextspawn = instance_position(Gem_create.x-64,y,argument1)
  1616.             with(Gem_create) set_skin(other.g1)
  1617.             with(nextspawn) set_skin(other.g1)
  1618.             //REPLAY SETTINGS REFESH\\
  1619.             replay_script(j-1, nextspawn,false)
  1620.             //--------------------\\
  1621.             #region online
  1622.             if global.online
  1623.             {
  1624.                 with(global.mynet)
  1625.                 {
  1626.                     buffer_seek(buffer,buffer_seek_start,0)
  1627.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1628.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1629.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1630.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1631.                 }
  1632.                 with(global.mynet)
  1633.                 {
  1634.                     buffer_seek(buffer,buffer_seek_start,0)
  1635.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1636.                     buffer_write(buffer,buffer_u8,nextspawn.myid)
  1637.                     buffer_write(buffer,buffer_u8,nextspawn.skinnum)
  1638.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1639.                 }
  1640.             }
  1641.             #endregion
  1642.             break;
  1643.         case 38:
  1644.             g1 = argument0.gemboard[gaps[j]-1,j+2]
  1645.             nextspawn = instance_position(Gem_create.x+64,y,argument1)
  1646.             with(Gem_create) set_skin(other.g1)
  1647.             with(nextspawn) set_skin(other.g1)
  1648.             //REPLAY SETTINGS REFESH\\
  1649.             replay_script(j+1, nextspawn,false)
  1650.             //--------------------\\
  1651.             #region online
  1652.             if global.online
  1653.             {
  1654.                 with(global.mynet)
  1655.                 {
  1656.                     buffer_seek(buffer,buffer_seek_start,0)
  1657.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1658.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1659.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1660.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1661.                 }
  1662.                 with(global.mynet)
  1663.                 {
  1664.                     buffer_seek(buffer,buffer_seek_start,0)
  1665.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1666.                     buffer_write(buffer,buffer_u8,nextspawn.myid)
  1667.                     buffer_write(buffer,buffer_u8,nextspawn.skinnum)
  1668.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1669.                 }
  1670.             }
  1671.             #endregion
  1672.             break;
  1673.         case 39:
  1674.             g1 = argument0.gemboard[gaps[j]-1,j+1]
  1675.             nextspawn = instance_position(Gem_create.x-64,y,argument1)
  1676.             with(Gem_create) set_skin(other.g1)
  1677.             with(nextspawn) set_skin(other.g1)
  1678.             //REPLAY SETTINGS REFESH\\
  1679.             replay_script(j-1, nextspawn,false)
  1680.             //--------------------\\
  1681.             #region online
  1682.             if global.online
  1683.             {
  1684.                 with(global.mynet)
  1685.                 {
  1686.                     buffer_seek(buffer,buffer_seek_start,0)
  1687.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1688.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1689.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1690.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1691.                 }
  1692.                 with(global.mynet)
  1693.                 {
  1694.                     buffer_seek(buffer,buffer_seek_start,0)
  1695.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1696.                     buffer_write(buffer,buffer_u8,nextspawn.myid)
  1697.                     buffer_write(buffer,buffer_u8,nextspawn.skinnum)
  1698.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1699.                 }
  1700.             }
  1701.             #endregion
  1702.             break;
  1703.         case 40:
  1704.             g1 = argument0.gemboard[gaps[j]-1,j-2]
  1705.             newg = instance_create(Gem_create.x + 64, Gem_create.y,argument1)
  1706.             newacc = Gem_create.acc
  1707.             with(Gem_create) set_skin(other.g1)
  1708.             with(newg) {scr_add_gemid(Gamerule_1);set_skin(other.g1); acc = other.newacc}
  1709.             //REPLAY SETTINGS REFESH\\
  1710.             replay_script(j+1, newg,true)
  1711.             #region online
  1712.             if global.online
  1713.             {
  1714.                 with(global.mynet)
  1715.                 {
  1716.                     buffer_seek(buffer,buffer_seek_start,0)
  1717.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  1718.                     buffer_write(buffer,buffer_s8,newg._i)
  1719.                     buffer_write(buffer,buffer_u8,newg._j)
  1720.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  1721.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1722.                 }
  1723.                 with(global.mynet)
  1724.                 {
  1725.                     buffer_seek(buffer,buffer_seek_start,0)
  1726.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1727.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1728.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1729.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1730.                 }
  1731.             }
  1732.             #endregion
  1733.             //--------------------\\
  1734.             break;
  1735.         case 41:
  1736.             g1 = argument0.gemboard[gaps[j]-1,j-1]
  1737.             newg = instance_create(Gem_create.x + 128, Gem_create.y,argument1)
  1738.             newacc = Gem_create.acc
  1739.             with(Gem_create) set_skin(other.g1)
  1740.             with(newg) {scr_add_gemid(Gamerule_1);set_skin(other.g1); acc = other.newacc}
  1741.             //REPLAY SETTINGS REFESH\\
  1742.             replay_script(j+2, newg,true)
  1743.             //--------------------\\
  1744.             #region online
  1745.             if global.online
  1746.             {
  1747.                 with(global.mynet)
  1748.                 {
  1749.                     buffer_seek(buffer,buffer_seek_start,0)
  1750.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  1751.                     buffer_write(buffer,buffer_s8,newg._i)
  1752.                     buffer_write(buffer,buffer_u8,newg._j)
  1753.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  1754.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1755.                 }
  1756.                 with(global.mynet)
  1757.                 {
  1758.                     buffer_seek(buffer,buffer_seek_start,0)
  1759.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1760.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1761.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1762.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1763.                 }
  1764.             }
  1765.             #endregion
  1766.             break;
  1767.         case 42:
  1768.             g1 = argument0.gemboard[gaps[j]-1,j+3]
  1769.             newg = instance_create(Gem_create.x + 128, Gem_create.y,argument1)
  1770.             newacc = Gem_create.acc
  1771.             with(Gem_create) set_skin(other.g1)
  1772.             with(newg) {scr_add_gemid(Gamerule_1);set_skin(other.g1); acc = other.newacc}
  1773.             //REPLAY SETTINGS REFESH\\
  1774.             replay_script(j+2, newg,true)
  1775.             //--------------------\\
  1776.             #region online
  1777.             if global.online
  1778.             {
  1779.                 with(global.mynet)
  1780.                 {
  1781.                     buffer_seek(buffer,buffer_seek_start,0)
  1782.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  1783.                     buffer_write(buffer,buffer_s8,newg._i)
  1784.                     buffer_write(buffer,buffer_u8,newg._j)
  1785.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  1786.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1787.                 }
  1788.                 with(global.mynet)
  1789.                 {
  1790.                     buffer_seek(buffer,buffer_seek_start,0)
  1791.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1792.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1793.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1794.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1795.                 }
  1796.             }
  1797.             #endregion
  1798.             break;
  1799.         case 43:
  1800.             g1 = argument0.gemboard[gaps[j]-1,j+3]
  1801.             newg = instance_create(Gem_create.x + 64, Gem_create.y,argument1)
  1802.             newacc = Gem_create.acc
  1803.             with(Gem_create) set_skin(other.g1)
  1804.             with(newg) {scr_add_gemid(Gamerule_1);set_skin(other.g1); acc = other.newacc}
  1805.             //REPLAY SETTINGS REFESH\\
  1806.             replay_script(j+1, newg,true)
  1807.             //--------------------\\
  1808.             #region online
  1809.             if global.online
  1810.             {
  1811.                 with(global.mynet)
  1812.                 {
  1813.                     buffer_seek(buffer,buffer_seek_start,0)
  1814.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  1815.                     buffer_write(buffer,buffer_s8,newg._i)
  1816.                     buffer_write(buffer,buffer_u8,newg._j)
  1817.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  1818.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1819.                 }
  1820.                 with(global.mynet)
  1821.                 {
  1822.                     buffer_seek(buffer,buffer_seek_start,0)
  1823.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1824.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1825.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1826.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1827.                 }
  1828.             }
  1829.             #endregion
  1830.             break;
  1831.         case 44:
  1832.             g1 = argument0.gemboard[gaps[j]-1,j+1]
  1833.             newg = instance_create(Gem_create.x + 64*3, Gem_create.y,argument1)
  1834.             newacc = Gem_create.acc
  1835.             with(Gem_create) set_skin(other.g1)
  1836.             with(newg) {scr_add_gemid(Gamerule_1);set_skin(other.g1); acc = other.newacc}
  1837.             //REPLAY SETTINGS REFESH\\
  1838.             replay_script(j+3, newg,true)
  1839.             //--------------------\\
  1840.             #region online
  1841.             if global.online
  1842.             {
  1843.                 with(global.mynet)
  1844.                 {
  1845.                     buffer_seek(buffer,buffer_seek_start,0)
  1846.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  1847.                     buffer_write(buffer,buffer_s8,newg._i)
  1848.                     buffer_write(buffer,buffer_u8,newg._j)
  1849.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  1850.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1851.                 }
  1852.                 with(global.mynet)
  1853.                 {
  1854.                     buffer_seek(buffer,buffer_seek_start,0)
  1855.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1856.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1857.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1858.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1859.                 }
  1860.             }
  1861.             #endregion
  1862.             break;
  1863.         case 45:
  1864.             g1 = argument0.gemboard[gaps[j]-1,j+2]
  1865.             newg = instance_create(Gem_create.x + 64*3, Gem_create.y,argument1)
  1866.             newacc = Gem_create.acc
  1867.             with(Gem_create) set_skin(other.g1)
  1868.             with(newg) {scr_add_gemid(Gamerule_1); set_skin(other.g1); acc = other.newacc}
  1869.             //REPLAY SETTINGS REFESH\\
  1870.             replay_script(j+3, newg,true)
  1871.             //--------------------\\
  1872.             #region online
  1873.             if global.online
  1874.             {
  1875.                 with(global.mynet)
  1876.                 {
  1877.                     buffer_seek(buffer,buffer_seek_start,0)
  1878.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  1879.                     buffer_write(buffer,buffer_s8,newg._i)
  1880.                     buffer_write(buffer,buffer_u8,newg._j)
  1881.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  1882.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1883.                 }
  1884.                 with(global.mynet)
  1885.                 {
  1886.                     buffer_seek(buffer,buffer_seek_start,0)
  1887.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1888.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1889.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1890.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1891.                 }
  1892.             }
  1893.             #endregion
  1894.             break;
  1895.         case 46:
  1896.             g1 = argument0.gemboard[gaps[j]+1,j]
  1897.             if Gamerule_1.debug show_debug_message(gaps[j])
  1898.             newg = instance_create(Gem_create.x, Gem_create.y-64,argument1)
  1899.             newacc = Gem_create.acc
  1900.             with(Gem_create) set_skin(other.g1)
  1901.             with(newg) {scr_add_gemid(Gamerule_1); set_skin(other.g1); acc = other.newacc}
  1902.             //REPLAY SETTINGS REFESH\\
  1903.             replay_script(j, newg,true)
  1904.             //--------------------\\
  1905.             #region online
  1906.             if global.online
  1907.             {
  1908.                 with(global.mynet)
  1909.                 {
  1910.                     buffer_seek(buffer,buffer_seek_start,0)
  1911.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  1912.                     buffer_write(buffer,buffer_s8,newg._i)
  1913.                     buffer_write(buffer,buffer_u8,newg._j)
  1914.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  1915.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1916.                 }
  1917.                 with(global.mynet)
  1918.                 {
  1919.                     buffer_seek(buffer,buffer_seek_start,0)
  1920.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1921.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1922.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1923.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1924.                 }
  1925.             }
  1926.             #endregion
  1927.             break;
  1928.         case 47:
  1929.             g1 = argument0.gemboard[gaps[j],j]
  1930.             if Gamerule_1.debug show_debug_message(gaps[j])
  1931.             randg = instance_create(Gem_create.x, Gem_create.y-64,argument1)
  1932.             newg = instance_create(Gem_create.x, Gem_create.y-128,argument1)
  1933.             newacc = Gem_create.acc
  1934.             with(Gem_create) set_skin(other.g1)
  1935.             with(randg) {scr_add_gemid(Gamerule_1);acc = other.newacc}
  1936.             with(newg) {scr_add_gemid(Gamerule_1);set_skin(other.g1); acc = other.newacc}
  1937.             //REPLAY SETTINGS REFESH\\
  1938.             //replay_script(j, randg,true)
  1939.             #region online
  1940.             if global.online
  1941.             {
  1942.                 with(global.mynet)
  1943.                 {
  1944.                     buffer_seek(buffer,buffer_seek_start,0)
  1945.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  1946.                     buffer_write(buffer,buffer_s8,other.randg._i)
  1947.                     buffer_write(buffer,buffer_u8,other.randg._j)
  1948.                     buffer_write(buffer,buffer_u8,other.randg.skinnum)
  1949.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1950.                 }
  1951.                 with(global.mynet)
  1952.                 {
  1953.                     buffer_seek(buffer,buffer_seek_start,0)
  1954.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SPAWN)
  1955.                     buffer_write(buffer,buffer_s8,newg._i)
  1956.                     buffer_write(buffer,buffer_u8,newg._j)
  1957.                     buffer_write(buffer,buffer_u8,newg.skinnum)
  1958.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1959.                 }
  1960.                 with(global.mynet)
  1961.                 {
  1962.                     buffer_seek(buffer,buffer_seek_start,0)
  1963.                     buffer_write(buffer,buffer_u8,NN_MATCH_AHM_SETSKIN)
  1964.                     buffer_write(buffer,buffer_u8,other.Gem_create.myid)
  1965.                     buffer_write(buffer,buffer_u8,other.Gem_create.skinnum)
  1966.                     network_send_packet(client_socket,buffer,buffer_tell(buffer))
  1967.                 }
  1968.             }
  1969.             #endregion
  1970.             replay_script(j, newg,true)
  1971.             replay_script(j, randg,true)
  1972.             //--------------------\\
  1973.             break;
  1974.     }
  1975. }
  1976. else showme = -1
  1977.  
  1978. //if havedone argument0.future_summoves++
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!