Handa Yazı tura

[anyone,"tavernkeeper_buy_drinks",
   [
    ], "Of course, {my lord/my lady}. I reckon {reg5} denars should be enough for that. What should I tell the lads?", "tavernkeeper_buy_drinks_2",[
        (assign, "$temp", 1000),
        (assign, reg5, "$temp"),
        ]],

 [anyone|plyr,"tavernkeeper_talk", [
      (store_current_hours,":cur_hours"),
      (val_sub, ":cur_hours", 6),
      (gt, ":cur_hours", "$gamble_last_time"),
      ], "Seninle para cevirme oynamak istiyorum", "tavernkeeper_coin",[]],
 
  [anyone,"tavernkeeper_coin", [
      ], "Peki. Ne kadar kaybetmek istiyorsun?", "tavernkeeper_coin2",[]],
 
  [anyone|plyr,"tavernkeeper_coin2", [
      (store_troop_gold, ":gold", "trp_player"),
      (ge,":gold",50),
      ], "50 Denars.", "tavernkeeper_coin3",[
          (assign, reg6, 50),]],
  [anyone|plyr,"tavernkeeper_coin2", [
      (store_troop_gold, ":gold", "trp_player"),
      (ge,":gold",100),
      ], "100 Denars.", "tavernkeeper_coin3",[
          (assign, reg6, 100),]],
  [anyone|plyr,"tavernkeeper_coin2", [
      (store_troop_gold, ":gold", "trp_player"),
      (ge,":gold",200),
      ], "200 Denars.", "tavernkeeper_coin3",[
          (assign, reg6, 200),]],
  [anyone|plyr,"tavernkeeper_coin2", [
      (store_troop_gold, ":gold", "trp_player"),
      (ge,":gold",500),
      ], "500 Denars.", "tavernkeeper_coin3",[
          (assign, reg6, 500),]],
  [anyone|plyr,"tavernkeeper_coin2", [
      (store_troop_gold, ":gold", "trp_player"),
      (ge,":gold",1000),
      ], "1000 Denars.", "tavernkeeper_coin3",[
          (assign, reg6, 1000),]],
  [anyone|plyr,"tavernkeeper_coin2", [
      (store_troop_gold, ":gold", "trp_player"),
      (ge,":gold",2000),
      ], "20000 Denars.", "tavernkeeper_coin3",[
          (assign, reg6, 2000),]],
  [anyone|plyr,"tavernkeeper_coin2", [
      ], "Bos ver simdilik durumum yok.", "tavernkeeper_coinn",[]],
 
  [anyone,"tavernkeeper_coinn", [
      ], "Her neyse.", "tavernkeeper_talk",[]],
 
  [anyone,"tavernkeeper_coin3", [
      ], "Hadi bakalim yazi mi tura mi?", "tavernkeeper_coin4",[]],
 
  [anyone|plyr,"tavernkeeper_coin4", [
      ], "Tura.", "tavernkeeper_coin5",[
          (str_store_string, s2, "@head"),
          (str_store_string, s3, "@tail"),]],
  [anyone|plyr,"tavernkeeper_coin4", [
      ], "Yazi.", "tavernkeeper_coin5",[
          (str_store_string, s2, "@tail"),
          (str_store_string, s3, "@head"),]],
 
  [anyone,"tavernkeeper_coin5", [
      ], "Haydi rastgele... (Parayı cevirir.)", "tavernkeeper_coin6",[
        (store_random_in_range, "$rand2", 0, 2),]],
 
  [anyone,"tavernkeeper_coin6", [
       (eq,"$rand2",0),
      ], "Hahaha {s3}! Kaybettin.", "tavernkeeper_coin6a",[]],
  [anyone,"tavernkeeper_coin6", [
       (eq,"$rand2",1),
      ], "Hass... {s2}... Al parani.", "tavernkeeper_pretalk",[
          (troop_add_gold,"trp_player",reg6),
          (store_current_hours,":cur_hours"),
          (assign, "$gamble_last_time", ":cur_hours"),]],
 
  [anyone|plyr,"tavernkeeper_coin6a", [
      ], "{reg6} Denarin burada.", "tavernkeeper_pretalk",[
       (troop_remove_gold,"trp_player",reg6),
       (store_current_hours,":cur_hours"),
       (assign, "$gamble_last_time", ":cur_hours"),]],